Возьмите одну систематическую c выборку размером 20 из вектора длиной 300. Рассматривая эту выборку как SRS, оцените среднюю оценку учащихся. Установите 95-процентную границу ошибки оценки и укажите 95-процентный доверительный интервал.
Будет ли это работать? (Если мой вектор длины 300 равен x). Кроме того, я не уверен, правильно ли я включил границу ошибки 95%.
set.seed(123)
n <- 20
s <- sample(x, n, replace = FALSE)
x_bar <- mean(s)
s2_x <- var(s)
b_sample <- 2*sqrt(s2_x)
con_int<- cbind(x_bar - b_sample, x_bar + b_sample)
con_int
Спасибо!