пакет plyr, записывающий одну и ту же функцию в несколько столбцов

Я хочу написать одну и ту же функцию в несколько столбцов, используя функцию ddply, но я попытался записать их в одну строку, хотите посмотреть, есть ли лучший способ сделать это?

Вот простая версия данных:

data<-data.frame(TYPE=as.integer(runif(20,1,3)),A_MEAN_WEIGHT=runif(20,1,100),B_MEAN_WEIGHT=runif(20,1,10))

и я хочу узнать сумму столбцов A_MEAN_WEIGHT и B_MEAN_WEIGHT, выполнив это:

ddply(data,.(TYPE),summarise,MEAN_A=sum(A_MEAN_WEIGHT),MEAN_B=sum(B_MEAN_WEIGHT))

но в моих текущих данных у меня есть больше чем 8 "* _MEAN_WEIGHT", и я устал писать их 8 раз как

ddply(data,.(TYPE),summarise,MEAN_A=sum(A_MEAN_WEIGHT),MEAN_B=sum(B_MEAN_WEIGHT),MEAN_C=sum(C_MEAN_WEIGHT),MEAN_D=sum(D_MEAN_WEIGHT),MEAN_E=sum(E_MEAN_WEIGHT),MEAN_F=sum(F_MEAN_WEIGHT),MEAN_G=sum(G_MEAN_WEIGHT),MEAN_H=sum(H_MEAN_WEIGHT))

Есть ли лучший способ написать это? Спасибо за помощь!!

Ответы на вопрос(2)

Ваш ответ на вопрос