r - 関数入力が変数の場合の R dplyr Quosure ロジック

Question

quosure を使用してカスタム group_by 関数を動作させようとしています。関数への入力がフィールドの名前である場合、正常に機能します。ただし、関数に挿入するフィールドの名前を含む変数を作成したい場合、フィールドが引用符で囲まれているために行き詰まります。誰でもこれを回避する方法を知っています。下記を参照してください

 groupedMean<-function(field){  
    expr<-enquo(field)

   mtcars%>%
       group_by(!!expr)%>%
       summarise(mean(mpg))  
 }

 #Works
 groupedMean(cyl)

 #Doesn't work
 groupFields<-c("cyl","gear")

 for(var in groupFields){
    print(groupedMean(eval(var)))
 }