R函数中的参考列名称

Question

我试图编写一个按变量列对数据框进行分组的函数，如下所示：

func <- function(df = df, col.name){
    df%>%
      group_by(col.name)%>%
      summarise(count = n())
}

当我输入列名作为字符串（即：func(df, 'column_A')）时，我收到以下错误：

Error: unknown variable to group by : col.name

但是当我输入它而不是字符串时，我得到了这个错误：

Error in filter_impl(.data, dots) : object 'column_A' not found

有没有一种好方法可以这样做，所以我可以在其中放入任何列名并获取该列的值计数？在此先感谢您的帮助。