将使用mutate_创建的新变量分配给将在dplyr中作为字符串传递的名称

Question

我想使用带有dplyr表达式的字符串，特别是我希望将表达式作为字符串传递给mutate来创建新变量并为这些变量分配名称，这些变量也将作为字符串传递。

此时我的代码如下：

library(dplyr)
library(tidyverse)

data(mtcars)

mutate_expr = "gear * carb"

mtcars %>% mutate_(mutate_expr)

新变量在这里被命名为＆gear; * *＆＃39;。我怎么能给它起名字＆＃39; gear_carb＆＃39;将名称作为字符串传递给dplyr表达式？

您的建议将不胜感激。

Answer 1

现在使用tidyeval执行此操作：

library(dplyr)

mutate_expr <- quo(gear * carb)

mtcars %>% mutate(new_col = !!mutate_expr) %>% head()
#>     mpg cyl  disp  hp drat    wt  qsec vs am gear carb new_col
#> 1  21.0   6 160.0 110 3.90 2.620 16.46  0  1    4    4      16
#> 2  21.0   6 160.0 110 3.90 2.875 17.02  0  1    4    4      16
#> 3  22.8   4 108.0  93 3.85 2.320 18.61  1  1    4    1       4
#> 4  21.4   6 258.0 110 3.08 3.215 19.44  1  0    3    1       3
#> 5  18.7   8 360.0 175 3.15 3.440 17.02  0  0    3    2       6
#> 6  18.1   6 225.0 105 2.76 3.460 20.22  1  0    3    1       3

如果必须将表达式存储为字符串，则可以使用sym代替quo（在此上下文中真的为rlang::parse_expr），但存储代码作为一个字符串是一个坏主意。