r - 查找数据框中的唯一组合数和每个组合中的观察数

Question

这个问题来自 a previous question .如果我们有三列或更多列，而不是两列呢？考虑以下数据。

x <- c(600, 600, 600, 600, 600, 600, 600, 600, 600, 800, 800, 800, 800, 800, 800, 800, 800, 800,
       600, 600, 600, 600, 600, 600, 600, 600, 600, 800, 800, 800, 800, 800, 800, 800, 800, 800,
       600, 600, 600, 600, 600, 600, 600, 600, 600, 800, 800, 800, 800, 800, 800, 800, 800, 800)

y <- c(1,  1,  1,  1,  1,  1,  1, 1,  1,  1,  1,  1,  1,  1,  1,  1,  1,  1,
       80, 80, 80, 80, 80, 80, 80, 80, 80, 80, 80, 80, 80, 80, 80, 80, 80, 80,
       3,  3,  3,  3,  3,  3,  3,  3,  3,  3,  3,  3,  3,  3,  3,  3,  3,  3)

z <- c(1, 2, 3, 1, 2, 3, 1, 2, 3, 1, 2, 3, 1, 2, 3, 1, 2, 3, 1, 2, 3, 1, 2, 3,
       1, 2, 3, 1, 2, 3, 1, 2, 3, 1, 2, 3, 1, 2, 3, 1, 2, 3, 1, 2, 3, 1, 2, 3,
       1, 2, 3, 1, 2, 3)

xyz <- data.frame(cbind(x, y, z))

如果我们将所有列视为具有有限级数的因子。我想要得到的是 x、y 和 z 的每个唯一组合中的观察次数。答案是 18 个独特的组合，每个组合有 3 个观察值。请问我怎样才能在 R 中做到这一点？谢谢!

Answer 1

使用 table 或 tabulate 与 interaction

tabulate(with(xyz, interaction(x,y,z)))

table(with(xyz, interaction(x,y,z)))

或拆分的交互并使用lengths,

lengths(split(xyz, with(xyz, interaction(x,y,z))))

或

aggregate(seq_along(x)~ x+y+z, data=xyz, FUN=length)