R里面有很多工具包，接收的數(shù)據(jù)不能直接處理字符串
像ggplot2， ggplot(data, aes(x=AAA))，
這個(gè)的AAA必須是data中的表頭。
如果你自己提前定義quote='AAA'，
然后再ggplot(data, aes(x=quote))就會(huì)報(bào)錯(cuò)。

還有dplyr、subset都是如此
這種情況，如果自己希望去寫一個(gè)靈活的函數(shù)時(shí)，就很麻煩。

提供一個(gè)解決方案

library(ggplot2)
library(rlang)

mine_func = function(data, x){
  quo_x = sym(x)
  
  ggplot(diamonds, aes(x= !! quo_x))+
    geom_bar()
  
}

quote='cut'
mine_func(diamonds, quote)