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

要按除1之外的所有列进行分组，您可以使用：

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

解释：setdiff采用setdiff(x, y)的一般形式，返回x以外的所有y值。在这种情况下，它表示除了collapse - 列之外都返回所有列名。

两种选择：

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

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

data.table - 除了一列

1 个答案: