r - dplyr 0.7 等效于弃用的 mutate_

Question

我找不到dplyr 0.7替换将被弃用的mutate_函数的方法。

mutate_函数在我的用例中很有用：我在数据库（字符串格式）中存储了许多指令（可以根据需要进行过滤）并将这些指令应用于一个或多个数据帧。

例如 ：

dplyr::tibble(test = "test@test") %>% 
  dplyr::mutate_(.dots = list("test2" = "substr(test, 1, 5)",
                              "test3" = "substr(test, 5, 5)"))

有没有办法使用 dplyr 0.7 将变量和指令保持为字符？

Answer 1

为了进一步扩展MrFlick的示例，我们假设您有许多存储为字符串的指令，以及您想要分配给结果计算的相应名称：

ln <- list( "test2", "test3" )
lf <- list( "substr(test, 1, 5)", "substr(test, 5, 5)" )

将名称与他们的说明相匹配，并将所有内容转换为 quosures：

ll <- setNames( lf, ln ) %>% lapply( rlang::parse_quosure )

根据aosmith的建议，现在可以使用特殊!!!运算符将整个列表传递给 mutate：

tibble( test = "test@test" ) %>% mutate( !!! ll )
# # A tibble: 1 x 3
#        test test2 test3
#       <chr> <chr> <chr>
# 1 test@test test@     @

Answer 2

这是另一种选择

a <- "test2"
b <- "test3"
dplyr::tibble(test = "test@test") %>% 
dplyr::mutate(a := !!rlang::parse_expr("substr(test, 1, 5)"),
  b := !!rlang::parse_expr("substr(test, 5, 5)"))
# # A tibble: 1 x 3
#        test     a     b
#       <chr> <chr> <chr>
# 1 test@test test@     @

我们使用:=操作符来动态命名带有字符串的参数，我们解析表达式字符串进行转换并用!!