, quosure. sym parse_expr rlang , !! unquote:
library(dplyr)
variable <- rlang::sym("Species")
# variable <- rlang::parse_expr("Species")
iris %>%
group_by(!! variable) %>%
summarise(Petal.Length = mean(Petal.Length))
!! UQ(), . variable , , group_by.
sym parse_expr , ?
: .
:
- R, "" . , sym as.name R. parse_expr, , R-. parse R.
R-, , R-. , , R, - sym, , , .
, sym, ( parse_expr ) parse_expr, R .
variable , sym . , , , group_by !!.