如何解决如何使用 dplyr 在 NSE 中获取变量的名称
所以我多次找到各种不同的方法来实现这一点,但在过去一年左右的时间里,dplyr 处理非标准评估的方式发生了变化。基本上实现这一目标的一种方法如下:
require("dplyr")
test <- function(var){
mtcars %>% select({{var}})
print(quo_name(enquo(var)))
}
test(wt)
#> [1] "wt"
到 2021 年,是否有更直接的方法来实现这一目标?我可以发誓有更简单的东西。
解决方法
使用 ensym()
中的 rlang
:
require("dplyr")
require("rlang")
test <- function(var){
mtcars %>% select({{var}})
print(ensym(var))
}
test(wt)
#>wt
as.character(test(wt))
#>wt
#>[1] "wt"
,
我们可以在deparse/substitute
中使用base R
test <- function(var) deparse(substitute(var))
test(wt)
#[1] "wt"
版权声明:本文内容由互联网用户自发贡献,该文观点与技术仅代表作者本人。本站仅提供信息存储空间服务,不拥有所有权,不承担相关法律责任。如发现本站有涉嫌侵权/违法违规的内容, 请发送邮件至 dio@foxmail.com 举报,一经查实,本站将立刻删除。