r - 计算 R 中的现有排列

Question

我有一个包含列 IDNum、Var1、Var2、Var3、Var4、Var5、Var6 的大型数据集。变量是 bool 值，值为 0 或 1。每一行可以是 64 种不同可能排列中的一种。我想计算与每个排列对应的行数。有没有一种有效的方法可以在 R 中编写它？

Answer 1

aggregate 可以做到这一点。这是一个较短的示例:

r <- function() rbinom(10, 1, .5)
d <- data.frame(IDNum=1:10, Var1=r(), Var2=r())
d
   IDNum Var1 Var2
1      1    0    1
2      2    0    1
3      3    0    0
4      4    1    0
5      5    1    1
6      6    0    0
7      7    1    1
8      8    1    0
9      9    0    1
10    10    0    1

现在计算每个组合的数量:

> aggregate(d$IDNum, d[-1], FUN=length)
  Var1 Var2 x
1    0    0 2
2    1    0 2
3    0    1 4
4    1    1 2

d$IDNum 中的值实际上并未在这里使用，但必须将某些内容传递给 length 函数。 d$IDNum 中每个组合的值被传递给 length 以获取计数。