具有动态变量名的r dplyr筛选器

我正在尝试仅选择不带NAs的行：

library(dplyr)
x = data.frame(a = c(NA, 2, 3, 4))
var_a <- "a"
# This works:
x %>% filter(!is.na(a))
# That works too:
var_a <- quo(a)
x %>% filter(!is.na(!!var_a))
# But this doesn't work:
var_a <- "a"
x %>% filter(!is.na(!!var_a))

库（dplyr）
x=数据帧（a=c（NA，2，3，4））
变量a%过滤器（！is.na（a））
#这也行得通：
变量a%过滤器（！is.na（！！变量a））
#但这不起作用：
变量a%过滤器（！is.na（！！变量a））

---

我应该在最后一行更改什么才能使其工作？因为我必须使用var_a而不是按列的名称引用，所以只需将整个列作为筛选依据即可

x = data.frame(a = c(NA, 2, 3, 4))
var_a <- "a"
x %>% filter(!is.na(!!x[,var_a])) 

x=data.frame（a=c（NA，2，3，4））
变量a%过滤器（！is.na（！！x[，变量a]））

---

注意，我刚刚将

var\u a

更改为

x[，var\u a]

它是一个字符串，因此我们可以使用

sym

转换为符号，然后使用

x %>% 
   filter(!is.na(!!rlang::sym(var_a)))
#  a
#1 2
#2 3
#3 4


或者另一个选项是在

处的

filter\u中指定对象，然后执行过滤

x %>% 
   filter_at(var_a, all_vars(!is.na(.)))
#  a
#1 2
#2 3
#3 4

非常感谢你！伙计，这对DPLYR来说有点痛。注意，这不能在DPLYR堆中间进行。