评估 data.table 中的表达式

Question

我正在尝试将字符串评估为公式：

在 dplyr 中它看起来像这样：

dt = data.table(a = 1:10)
expr = 'sum(a)'

dt %>% 
  mutate(b := !!parse_expr(expr))

但是，当我尝试使用 data.table 时出现错误：

dt[, b := parse_expr(expr)]

[.data.table(dt, , :=(b, parse_expr(expr))) 中的错误： 赋值的 RHS 不是 NULL，不是原子向量（参见 ?is.atomic），也不是列表列。

Answer 1

可以用eval(parse代替parse_expr

dt[, b := eval(parse(text = expr))]

或者在parse_expr 上用eval 包装，因为!! 正在tidyverse 中进行评估

dt[, b := eval(rlang::parse_expr(expr)) ]