是否有可能从总体中生成10个样本，并重复采样1000次？

Question

我正在尝试从一个种群中随机抽取10个人，并重复1000次。这可能吗？到目前为止，这是我的代码，我不确定自己是否走对了。我不断收到错误“要替换的项目数不是替换长度的倍数”。

这是我的代码：

B<-1000
for (i in 1:B){

  FR3_Acropora_Sample[i]<-(sample(FR3_Acropora$Ratio,size=10,replace=TRUE))

}

Answer 1

我相信您可以按以下步骤完成此操作。我创建了一个数字1到50的样本数据集-您当然可以跳过此步骤。我初始化一个长度为100的列表向量。我从1循环到100，然后选择一个随机样本分配给向量中的每个空白空间。然后，我可以使用sampleList[[x]]访问任何样本，其中x是1到100的任何数字。

x <- c(1:50)

sampleList <- vector(mode="list", length=100)

for (i in 1:100) {
sampleList[[i]] = sample(x, size = 10, replace = TRUE)
}