我有以下数据:
(function (global) {
global.x = 'meh';
})(window);
(function () {
alert(typeof x); // string
})();
我已经重新采样了数据
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)
现在,我需要对该数据重新采样1k次,并将每个采样作为矩阵或数据帧的一列。我最好的尝试是这样:
resample <- sample(x, replace=TRUE)
答案 0 :(得分:0)
您可以使用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
...