选择列匹配字符串名称dplyr

Question

我正在尝试创建一个在其中使用dplyr的函数。但是，我似乎无法弄清楚如何从data.frame中选择一列。我正在尝试做这样的例子：

test_df <- data.frame(A=1:30)
my_function <- function(x, var){
    x %>%
        summarize(my_mean = mean(var))
}
my_function(test_df, "A")

产生此错误：

警告讯息： 在mean.default（“A”）中：参数不是数字或逻辑：返回NA。

任何想法如何解决这个问题？

Answer 1

解决此问题的最简单方法可能是.

的子集

my_function <- function(x, var){
    x %>%
        summarize(my_mean = mean(.[[var]]))
}