不要在by=2的data.table中降低空值

Question

我需要展示像这样的各个层次：

require(data.table)
x <- data.table(x=runif(3), group=factor(c('a','b','a'), 
  levels=c('a','b','c')),group2=factor(c('u','f','l')))

data.frame(xtabs(~group+group2,x))

 group group2 Freq
     a      f    0
     b      f    1
     c      f    0
     a      l    1
     b      l    0
     c      l    0
     a      u    1
     b      u    0
     c      u    0

有一种优雅的方法可以在data.table结构中获得相同的结果吗？我试过这个：

x[,.N,list(group,group2)]

   group group2 N
1:     a      u 1
2:     a      l 1
3:     b      f 1

但不起作用。一些想法？提前感谢

Answer 1

如果要按两列进行分组，则可以使用级别在CJ中创建所有组合。

setkeyv(x, c('group','group2'))
x[CJ(levels(group),levels(group2)), .N]

#    group group2 N
# 1:     a      f 0
# 2:     a      l 1
# 3:     a      u 1
# 4:     b      f 1
# 5:     b      l 0
# 6:     b      u 0
# 7:     c      f 0
# 8:     c      l 0
# 9:     c      u 0