传递参数以在R中执行group_by的函数

Question

我正在尝试编写一个函数并传入2个参数。我遇到错误，该函数无法识别第二个参数。

print(url.path)

Answer 1

您必须enquo变量并使用!!运算符：

library(dplyr)
Test2 <- function(df,kk) {
   kk<-enquo(kk)
   xx1 <- group_by_at(mtcars,vars(mpg,cyl,!!kk)) %>% summarise(FreqOG = length(cyl))
   xx1 <- data.frame(xx1)}

yy1 <- Test2(mtcars,hp)

此问题可能会提供更多背景信息：Why is enquo + !! preferable to substitute + eval