如何将列名向量传递给R中的multidplyr分区函数

Question

我面临的问题是multidplyr的分区函数。我的目标是按列名组查找汇总统计数据。例：

rcols <- c("cyl","am","vs")

现在，我想使用上面的rcols对象来查找汇总统计信息。我可以在dplyr中使用下面的行来完成它。

df <- mtcars %>% group_by(.dots=rcols) %>% summarise(Mean=mean(mpg))

现在，我想通过使用multidplyr包来做同样的事情。

df <- mtcars %>% partition(rcols) %>% summarise(Mean=mean(mpg)) %>% collect()

但是上面的线路并没有像预期的那样工作。

有人能在这个问题上帮我吗？

提前谢谢。

Answer 1

我们必须创建一个包含所需查询的文本。

library(dplyr)
library(multidplyr)

rcols <- c("cyl","am","vs")
k1<-paste("d1<-mtcars%>%partition(",paste(rcols,collapse=","),")%>%summarise(Mean=mean(mpg))%>%collect()",sep="")
k2<-eval(parse(text=k1))