在未找到函数对象“x”中发生变异[重复]答案

【问题标题】：mutate in a function object 'x' not found [duplicate]在未找到函数对象“x”中发生变异[重复]
【发布时间】：2019-02-28 02:34:01
【问题描述】：

我正在尝试在内部使用 mutate 构建一个函数。代码如下

pre_process_corpora <- function(data, column, new_column){
    data %>% mutate(new_column = tolower(column))
}

但是，在运行该函数时，我得到了以下错误，我仍然无法弄清楚原因。

 Error in eval(lhs, parent, parent) : object 'x' not found

我还试图用另一种方法来构建具有以下语法的函数

data$new_column <- tolower(data$column)

但是，我收到以下错误消息

$ operator is invalid for atomic vectors

非常感谢任何提示/见解！

【问题讨论】：

使用 dplyr 编程需要additional syntax。您需要显示第二个失败原因的数据。
$ operator is invalid for atomic vectors 你确定data 是data.frame 吗？你得到这个错误通常是因为它不是。
您是如何调用pre_process_corpora 函数的。在寻求帮助时，您应该包含一个简单的reproducible example，其中包含可用于测试和验证可能解决方案的示例输入和所需输出。
是的，数据是一个data.frame。

标签： r dplyr

【解决方案1】：

继续使用 dplyr 和 rlang，也许是这样的？

library(dplyr)
library(rlang)

pre_process_corpora<-function(data, column, new_column){
    column <- enquo(column)
    new_column <- quo_name(enquo(new_column))
    data %>% mutate(!!new_column := tolower(!!column))
}

d <- data.frame(x = LETTERS[1:5],stringsAsFactors = FALSE)

pre_process_corpora(d,x,foo)

【讨论】：

谢谢！它现在正在运行。虽然我不太明白 enquo 在这里扮演的角色。