在聚合时动态地将列名添加到data.table

Question

我知道我们可以在通过引用创建列时动态添加列名（使用:=），如在这里：Dynamic column names in data.table。

但是，我希望在汇总时动态添加列名。你能帮帮忙吗？

test_dtb <- data.table(a = sample(1:100, 100), b = sample(1:100, 100), id = rep(1:10, 10))
m = "blah"
test_dtb[ , list((m) = mean(b)), by = id]

我得到的错误是

Error: unexpected '=' in "test_dtb[ , list((m) =

Answer 1

正如lukeA的评论所述，可以使用setNames：

m <- c("blah", "foo")
test_dtb[ , setNames(list(mean(b), median(b)), m), by = id] 

Answer 2

只需确保data.table知道“m”不是变量名。

圆括号或“c”表示。

test_dtb[, (m)  := mean(b),by = id]
test_dtb[, c(m) := mean(b),by = id]