r - `sym()` 对 tidyeval 做了什么？

Question

library(tidyverse)
input_name <- "birth_year"
input_value <- 19

quo(filter(starwars, !!input_name == !!input_value))       # line 5
quo(filter(starwars, !!sym(input_name) == !!input_value))  # line 6

第 5 行和第 6 行有什么区别，以及 sym() 函数的使用？为什么 sym() 只需要在第 6 行等式的左侧？

sym() 的目的是获取字符串并将它们取消引用为符号吗？

第 5 行

<quosure>
  expr: ^filter(data, "birth_year" == 19)
  env:  global

第 6 行

<quosure>
  expr: ^filter(data, birth_year == 19)
  env:  global

Answer 1

在第一种情况下，不对列求值，对字符串求值。但是，通过转换为 symbol 并对其求值，它会返回列值。 lhs 中需要 sym 因为我们不是要获取文字值，而是要提取列值

根据 ?sym

sym() creates a symbol from a string and syms() creates a list of symbols from a character vector.

和 ?"!!"

The !! operator unquotes its argument. It gets evaluated immediately in the surrounding context.