如何修改dplyr函数以避免出现错误：列'Column'未知？

嗨，我一直在从

dplyr

获取错误

错误：列未知。我无法修改函数以消除错误。之所以要使用此函数，是因为我必须对其他变量重复此过程。

数据可在此处找到：

一列计数%
分组依据（列）%>%
计数（）%>%
解组（）%>%
添加行（column=“Total”，n=sum（.$n））->dataset
返回（数据集）
}
生存单位计数%
#计数（）%>%
#解组（）%>%
#添加_行（Survived=“Total”，
#n=总和（.$n））
#我得到了输出
##一个tibble:3x2
#幸存的
#      
#1号1490
#2是711
#3总计2201

我已经查看了几个带有此错误的堆栈溢出，但它们有不同的问题，与我的问题无关。请注意，我的R词汇量不是很好，所以可能有答案，但由于缺乏适当的词汇，我可能忽略了它。
有什么帮助、提示或指示来消除错误吗？非常感谢。
使用
{{}
将列名作为无引号传递

library(dplyr)

one_col_count <- function(data, column){

  data %>%
    group_by({{column}})%>%
    count() %>%
    ungroup() %>%
    add_row({{column}} := "Total",  n= sum(.$n))

   return(dataset)
}

one_col_count(dat, Survived)

库（dplyr）
一列计数%
分组依据（{column}}）%>%
计数（）%>%
解组（）%>%
添加_行（{column}:=“总计”，n=总和（.$n））
返回（数据集）
}
一列计数（dat，存活）
Hi Ronak，这仍然给了我一个错误
error:Column as.name（“surved”）是不受支持的类型symbol
我尝试了几种传递参数的方法，相同error@AgentSmith我更新了答案，你现在能查一下吗？@Ronaksha嗨Ronak。我看过很多你的答案，我觉得它们很棒。作为dplyr的新手，你能推荐一些关于如何培养dplyr技能的书籍、在线指南等吗？谢谢@cmirian，我自己没有用过，但我看到很多人推荐哈德利的书，这些书可以在网站上找到。也许这会对你有所帮助。谢谢你的链接！