如何将列名传递到使用dplyr的自定义函数中？

Question

我编写了这个函数，它只是用子字符串替换数据表列中的每个值：

substrColName <- function(df, colName, start) {
    df %>% mutate(colName = substr(colName, start=start, stop=nchar(colName)))
}

但每次我试着运行它时，我都会发现错误：

Error in as.character(x) : cannot coerce type 'closure' to vector of type 'character'

现在我已经做了很多关于为什么它不起作用的研究，但我不明白。我读过一些关于标准评估和懒散的东西，但我尝试的似乎都不管用。有什么帮助吗？

谢谢

Answer 1

谢谢，@ycw，这是一个很好的阅读。在完成文章后，现在就开始工作了。这是一天结束时的解决方案：

substrColName <- function(df, colName, start) {
    colNameQuo <- enquo(colName)
    df %>% mutate(!!quo_name(colNameQuo) := substr(!!colNameQuo, start=start,stop=nchar(!!colNameQuo)))
}

这是ycw的评论。