Name, Email, and Session















R Basics



scores <- c(85, 90, 88, 92, 87)
weights <- c(1, 2, 1, 1, 3)
weighted_mean <- [?]


x <- c(5, 7, 6, 9, 100, 8, 5, 7, 6)
q1 <- [Blank 1](x, 0.25)
q3 <- [Blank 2](x, [Blank 3])
iqr_value <- q3 - q1


lower_bound <- q1 - 1.5 * iqr_value
upper_bound <- q3 + 1.5 * iqr_value
outliers_lower <- [Blank 1]
outliers_upper <- [Blank 2]


x <- c(3, 5, 8, 12, 14, 15, 18, 20)
n <- length(x)
mean_x <- mean(x)
sd_x <- sd(x)
skewness <- [?]


v <- c(2, 3, 5, 5, 6, 7, 3, 5)
mode_v <- [Blank 1]::[Blank 2](v)


x <- c(10, 20, 30, 40, 50)
z <- [?]


Short-Answer Questions