在 dplyr 的函数中使用字符串

Question

当我想在dplyr函数中使用字符串时，使用拥抱运算符{{ }}并没有达到预期的效果。

例如，假设我想以编程方式group_by在data.frame名称中找到的变量

library(tidyverse)
library(palmerpenguins)

palmerpenguins::penguins %>% 
  select(c(1, 2, 8)) %>% 
  names %>% 
  map(
    function(i)
      penguins %>%
        group_by({{ i }}) %>% 
        tally
  )

返回

[[1]]
# A tibble: 1 x 2
  `"species"`     n
  <chr>       <int>
1 species       344

[[2]]
# A tibble: 1 x 2
  `"island"`     n
  <chr>      <int>
1 island       344

但我想group_by传递给map的变量名

Answer 1

{{}}运算符不打算用于字符串，而是用于符号。 使用字符串，您可以执行

palmerpenguins::penguins %>% 
  select(c(1, 2, 8)) %>% 
  names %>% 
  map(
    function(i)
      penguins %>%
      group_by(!!rlang::sym(i)) %>% 
      tally
  )

或者

palmerpenguins::penguins %>% 
  select(c(1, 2, 8)) %>% 
  names %>% 
  map(
    function(i)
      penguins %>%
      group_by(.data[[i]]) %>% 
      tally
  )

后者是 tidyverse 作者目前首选的方法。