r - 将列引用写入 group_by 的函数

我对 R 非常陌生。尝试定义一个函数来对数据集 (group_by) 进行分组，然后根据分组(dplyr、summarise_each)创建汇总统计信息。

在不定义函数的情况下，以下工作有效:

sum_stat <- data %>%
  group_by(column) %>%
  summarise_each(funs(mean), var1:var20)

以下函数形式不起作用:

sum_stat <- function(data, column){
  data %>%
    group_by(column) %>%
    summarise_each(funs(mean), var1:var20)
}

sum_stat(data, column)

返回的错误信息是:

错误:未知列“列”

最佳答案

这是您执行此操作的常用方法:

foo <- function(data,column){
  data %>%
    group_by_(.dots = column) %>%
    summarise_each(funs(mean))
}

foo(mtcars,"cyl")
foo(mtcars,"gear")

关于r - 将列引用写入 group_by 的函数，我们在Stack Overflow上找到一个类似的问题： https://stackoverflow.com/questions/32615655/