根据不同的假设，创建矩阵以确定值的所有可能组合

Question

我想制作一个矩阵，其中包含基于每行不同假设的所有可能的值组合。

我成功创建了以下矩阵：

total_nr_beds <- 32

nr_of_specs <- 7

bed_combs <- as.matrix(compositions(total_nr_beds, nr_of_specs, include.zero=FALSE))

我想为每个规范指定一个条件（7行）

我使用以下代码尝试了它，但不幸的是代码仍然在没有端点的情况下运行。

bed_combs_spec1_5 <- filter(bed_combs, (bed_combs[1,] < 9 & bed_combs[1,] >= 2))

bed_combs<-bed_combs[,(bed_combs[1,]==2 | bed_combs[1,]==3 | bed_combs[1,]==4 | bed_combs[1,]==5 | bed_combs[1,]==6 | bed_combs[1,]==7 | bed_combs[1,]==8)]

任何人都可以帮助我吗？

Answer 1

作品是包装的功能＆＃34;分区＆＃34;。

最简单的方法是使用以下内容转置矩阵：

GCI C:\Users\Example\Desktop\Test -Include *txt |
  ? { $_.LastWriteTime -lt (Get-Date).AddDays(-30) } |
  Remove-Item -Force

现在它有比行更多的行，这在计算上是可行的（与非转置矩阵相比）。

现在你可以使用：

t(bed_combs)

做其余的伎俩。