Применить среднюю функцию для всех переменных

Question

У меня есть два набора данных A и B. Я хочу выполнить группу и применить означает для varibles ВФА, С.Д. в наборе данных A и все переменные в наборе данных B

набор данных А есть переменные, как, df, er, wf, sd, gh, rt, we, sd, xc, as, df, fg, gh, rhj

набор данных B имеет переменные we, sd, xc, as, df, fg, gh, rhj ,

z<-names(b) 
dfdre<-new %>% 
group_by(as,df,er) %>% 
summarize(numbobs =n(), wf= mean(wf), sd= mean(sd), z= mean(z) z= mean(z)) 

Я знаю, что в коде что-то не так. Я пытаюсь применить среднее значение для varaibles wf, sd и всех переменных в наборе данных B. Не могли бы вы исправить меня?

Answer 1

Мы можем использовать summarise_each

z1 <- setdiff(z, c('as', 'df', 'er') 
dfdre<- a %>% 
      group_by(as,df,er) %>% 
      summarise_each_(funs(mean), one_of("wf", "sd", z1))