对物种 x 样本矩阵进行子采样 - 生态学

Question

我有大量来自

239 species

的

140 sites

数据。

Species are columns

，和

sites are rows

.

矩阵看起来像下面的简化矩阵。我想从每个站点抽样 5 个人而不更换。

有什么功能可以让我这样做吗？

matrix <-
structure(c(0L, 0L, 1L, 0L, 0L, 0L, 0L, 1L, 0L, 4L, 1L, 1L, 
1L, 1L, 1L, 1L, 1L, 1L, 1L, 1L, 0L, 0L, 0L, 0L, 0L, 0L, 
0L, 1L, 0L, 1L, 2L, 2L, 2L, 2L, 2L, 2L, 2L, 2L, 2L, 2L, 1L, 
0L, 1L, 0L, 1L, 0L, 1L, 0L, 1L, 0L, 10L, 10L, 5L, 0L, 1L, 0L, 0L, 0L, 0L, 0L), 
.Dim = c(6L, 10L), .Dimnames = list(NULL, c("Species1", "Species2", "Species3", "Species4", 
"Species5", "Species6", "Species7", "Species8", "Species9", "Species10")))`

我尝试了 Sample 函数，但它返回整个丰度物种而不是该物种的 1 个个体，并选择了五个物种，即使是样本中值为 0 的物种。

我需要一个函数，在每个样本中一次对每个样本采样一个样本，直到达到 5 个样本，然后移动到下一个样本。

谢谢！