需要在R中生成5000个手段[重复]

Posted 2023-03-29

【中文标题】需要在R中生成5000个手段[重复]

【英文标题】：Need to generate 5000 means in R [duplicate]

【发布时间】：2021-03-02 06:28:25

【问题描述】：

我有一个标准差、平均值和样本量。我需要创建一个循环来生成 5000 个样本均值

我该怎么做？

【参考方案1】：

set.seed(123)
#Data
mean.val <- 2
sd.val <- 0.5
nsamples <- 5000
#Empty matrix
Mymat <- matrix(0,nrow = nsamples,ncol = nsamples)
#Fill
for(i in 1:nsamples)

  Mymat[,i]<-rnorm(nsamples,mean = mean.val,sd=sd.val)

#Compute values
vecupper <- apply(Mymat,2,function(x) mean(x)+2.66*sum(abs(diff(x)))/length(x))
veclow <- apply(Mymat,2,function(x) mean(x)-2.66*sum(abs(diff(x)))/length(x))

【讨论】：

好的，现在如果我想从 5000 中计算每个样本的上限和下限，我不能只使用：2s = mean(vecmean) + 2.66*sum(abs( diff(vecmean)))/length(vecmean) b/c 它只给了我 1 个上限和下限

@WW93 稍等一下，你想要 5000 个值的 5000 个样本吗？

所以我得到了 5000 个样本，现在我被要求计算每个 5000 个样本的上限和下限

@WW93 我已经添加了一个更新，希望对你有帮助！

你摇滚！！！！！！