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

Question

我知道我们可以在通过引用创建列时动态添加列名称（使用:=），如下所述：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]