我正在尝试从平均值为 5、标准差为 3 的正态分布模拟 5000 个大小为 5 的样本。然后我想计算每个样本的平均值并制作样本平均值的直方图
我当前的代码没有给我错误,但我认为这是不对的:
nrSamples = 5000
e <- list(mode="vector",length=nrSamples)
for (i in 1:nrSamples) {
e[[i]] <- rnorm(n = 5, mean = 5, sd = 3)
}
sample_means <- matrix(NA, 5000,1)
for (i in 1:5000){
sample_means[i] <- mean(e[[i]])
}
Run Code Online (Sandbox Code Playgroud)
关于如何解决这个问题有什么想法吗?我对 R 非常非常陌生!