r - 如何通过变量将列名传递给 data.table 中的函数？

Question

我想将函数应用于名称在变量中的某个列。我可以使用 eval() 选择它，但不能将它传递给函数。

library(data.table)
dt <- data.table(col1 = 1:10)
mnem <- colnames(dt)[1]

# This works fine
dt[, eval(mnem)]

# None of these works
dt[, sum(mnem)]
dt[, sum(mnem), with = FALSE]

dt[, sum(eval(mnem))]
dt[, sum(eval(mnem)), with = FALSE]

Answer 1

人们已经说出了正确的答案，或者你可以这样做:

dt[, sum(eval(parse(text = mnem)))]