f1<-function(var1,var2){
dplyr::summarise(mtcars,mean=mean({{var1}}+{{var2}}))
}
f1(mpg,cyl)f2<-function(var1,var2){
dplyr::summarise(mtcars,mean=mean(!!sym(var1)+!!sym(var2)))
}
f2('mpg','cyl')x <- "name"
list2("{{ x }}" := 1)$`"name"`
[1] 1#> $`"name"`
#> [1] 1
list2("{x}" := 1)$name
[1] 1