(R) -创建重采样数据的数据帧

Question

我有以下数据：

x <- c(2, 2, 3, 2, 1, 5, 4, 6, 5, 2, 6, 4, 5, 5, 4, 6, 1, 1, 4, 4, 5, 5, 6, 5, 4, 4, 5, 1, 4, 5, 3, 2, 5)

我对这些数据进行了重新采样

resample <- sample(x, replace=TRUE)

现在，我需要对此数据重新采样1k次，并将每个样本作为矩阵或数据帧的一列。我最好的尝试是：

for (i in 1:1000) {
    bootstrap <- matrix(resample,ncol=i)
}

Answer 1

您可以使用replicate来完成此操作。例如，对于10个重采样：

replicate(10,sample(x,replace=TRUE))
      [,1] [,2] [,3] [,4] [,5] [,6] [,7] [,8] [,9] [,10]
 [1,]    6    5    2    4    1    5    6    2    6     5
 [2,]    5    5    5    6    3    2    5    5    4     4
 [3,]    4    2    5    6    2    6    6    5    5     5
 [4,]    6    2    4    5    4    5    5    2    2     5
 [5,]    4    5    4    4    4    6    5    2    1     4
...