Как передать вектор имен столбцов в функцию разбиения multidplyr в R

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))