如何从 R 矩阵中随机选择重复的行样本？

Question

如何从 R 矩阵中随机选择重复的行样本？

所以请明确一点，我将从一个 100 行的矩阵开始，我可以选择其中 5 行并创建一个新矩阵。我希望可以选择在更换或不更换的情况下执行此操作。

Answer 1

在具有 replace=TRUE 或 replace=FALSE 的行上使用 sample。

如果 X 是您的原始矩阵，那么

X[sample(nrow(X),size=5,replace=TRUE),]

或

X[sample(nrow(X),size=5,replace=FALSE),]

应该可以工作。 （如果您首先选择示例：s <- example(...)，然后选择子集：newmat <- X[s,]，则可能更具可读性）

Answer 2

使用 sample 函数：

x <- matrix(1:1000, nrow=100)

有替换：

x[sample(1:100, 5, replace=TRUE), ]
     [,1] [,2] [,3] [,4] [,5] [,6] [,7] [,8] [,9] [,10]
[1,]   19  119  219  319  419  519  619  719  819   919
[2,]   51  151  251  351  451  551  651  751  851   951
[3,]   42  142  242  342  442  542  642  742  842   942
[4,]   48  148  248  348  448  548  648  748  848   948
[5,]   73  173  273  373  473  573  673  773  873   973

无替换：

x[sample(1:100, 5, replace=FALSE), ]
     [,1] [,2] [,3] [,4] [,5] [,6] [,7] [,8] [,9] [,10]
[1,]   64  164  264  364  464  564  664  764  864   964
[2,]   67  167  267  367  467  567  667  767  867   967
[3,]   20  120  220  320  420  520  620  720  820   920
[4,]   17  117  217  317  417  517  617  717  817   917
[5,]    6  106  206  306  406  506  606  706  806   906

Answer 3

这似乎对数据框更有效：

sample_df<-x[sample.int(nrow(x),size=100,replace=TRUE),]