使用dplyr :: filter的tidyeval方法是什么?

Sha*_*anu 5 r dplyr tidyeval

使用调用下面的函数foo(c("b"))。输出显示为内联。

什么是正确的写作方式df %>% filter(!!x > (!!x))

我提供了一个使用mutatetidyeval风格与进行对比的示例filter

foo <- function(variables) {

  x <- rlang::sym(variables[[1]])

  print(x)
  #> b

  print(typeof(x))
  #> [1] "symbol"

  df <- data_frame(a = 1, b = 2)

  print(df %>% mutate(!!x := 100 + !!x))

  #> # A tibble: 1 x 2
  #>         a     b
  #>       <dbl> <dbl>
  #>   1     1   102  

  print(df %>% filter(!!x  > (!!x)))

  #> Error in !x : invalid argument type

  print(df %>% filter(magrittr::is_greater_than(!!x, !!x)))

  #> # A tibble: 0 x 2
  #> # ... with 2 variables: a <dbl>, b <dbl>

}
Run Code Online (Sandbox Code Playgroud)

Kev*_*eau 3

除了一个小拼写错误之外,您的大部分内容都已完成,过滤器语句中的圆括号应该位于变量上,而不是值上。

print(df %>% filter((!!x) > !!x))

#> # A tibble: 0 x 2
#> # ... with 2 variables: a <dbl>, b <dbl>
Run Code Online (Sandbox Code Playgroud)