R中的仿真

Question

我需要模拟100个n = 100的数据集。 我正在尝试类似的东西：

x1 = NULL 
for (i in 1:100){
set.seed(i)
x1[i] <- sample(1:4, 100, replace=TRUE)
}

但是我不断收到错误消息：x1 [i] <-sample（1：4，100，replace = TRUE）：要替换的项目数不是替换长度的倍数

我感到难过。 任何帮助，将不胜感激。 谢谢！

Answer 1

您也可以像这样使用“复制”功能：

x1 <- replicate(100, sample(1:4,100,replace=T))
split(x1, col(x1))

如果您有兴趣，可以为R的初学者阅读一本优秀的电子书，称为“ R基础和图形”。

Answer 2

您需要做的就是将x1[i]更改为x1[[i]]

保罗