如何使用单个直方图展示样本均值

Question

假设我有如下数据：

df1<-rnorm(400000, 65,10)

我想绘制 1000 个大小为 100 的样本并使用样本均值绘制直方图。在直方图中，x 轴为 "Mean"，y 轴为 "Frequency"，红线显示直方图中间的样本平均值。

很抱歉，我无法开发直方图来显示它。我希望我的描述清楚。任何帮助将不胜感激。

Answer 1

回答问题的简单方法是以下示例实现

a<-rnorm(1000, 5,2)

#intialize empty vector and fill with means
xbar = rep(0,250)  
for (i in 1:250) { xbar[i]=sample(a, 50) }

# make histogram
hist(xbar,prob=TRUE,breaks=12)

因为这个问题听起来很像作业题，所以我在上面给了你一个部分的解决方案。确保您知道这些功能中的每一个都在做什么，因为它将在很长一段时间内对您有很大帮助 运行。您必须编辑以上内容以适合您问题的确切参数。同样，我会把你问题的最后一部分留给你自己回答，但你可能想使用 xline

Answer 2

d = replicate(1000, mean(sample(df1, 100)))
hist(d)
abline(v = mean(d), col = "red")