r - data.table-按除一列以外的所有元素分组

Question

我可以使用data.table对除一列以外的所有列进行分组吗？我有很多专栏文章，所以我宁愿避免写出所有colnames。

原因是我想将表中的重复项折叠起来，在该表中我知道一列没有相关性。

library(data.table)

DT <- structure(list(N = c(1, 2, 2), val = c(50, 60, 60), collapse = c("A", 
"B", "C")), .Names = c("N", "val", "collapse"), row.names = c(NA, 
-3L), class = c("data.table", "data.frame"))

> DT
   N val collapse
1: 1  50        A
2: 2  60        B
3: 2  60        C

也就是说，给定 DT，是否有类似 DT[, print(.SD), by = !collapse]这样的内容:

> DT[, print(.SD), .(N, val)]
   collapse
1:        A
   collapse
1:        B
2:        C

无需实际指定 .(N, val)？我意识到我可以通过复制和粘贴列名来做到这一点，但是我认为可能也有一些优雅的方法可以做到这一点。

Answer 1

要按除一列以外的所有列进行分组，可以使用:

by = setdiff(names(DT), "collapse")

说明: setdiff采用 setdiff(x, y)的一般形式，该格式返回 x中没有的所有 y值。在这种情况下，这意味着将返回除 collapse -column之外的所有列名。

两种选择:

# with '%in%'
names(dt1)[!names(dt1) %in% 'colB']

# with 'is.element'
names(dt1)[!is.element(names(dt1), 'colB')]