r - 无法将列传递给自定义函数，因为它们未知或找不到对象

Question

我正在尝试在 r 中构建一个函数，对信息进行分组并以百分比和频率将其传回。我构建了几行代码，它们会执行一次，但是当我尝试将它放在一个函数中时，它并没有拾取该列。错误消息说：“col_name”未知

defaults <- function(df,col_name){

d_table <- df %>% group_by(col_name) %>% count(bad_loan) %>% transmute(bad_loan, percent = n/sum(n))
d_table$freqency <- (df %>% group_by(col_name) %>% count(bad_loan))$n

return(d_table)

}

defaults( loan_data, grade) 

但是这段代码有效：

group_by(loan_data, grade) %>% count(bad_loan) %>% transmute(bad_loan, percent = n/sum(n))

今天早上我尝试更多地使用它，但现在到处都在发生这种情况，%>% 除了错误消息说找不到对象。我觉得我错过了一些大事。我已经加载了 dplyr、plyr 和 tidyr，我缺少一个包吗？

标签： rfunctiondataframedplyr