ddply 関数を使用して同じ関数を複数の列に記述したいのですが、それらを 1 行に書き続けようとしています。これを行うより良い方法はありますか?
以下は、データの単純なバージョンです。
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))
これを書く良い方法はありますか？ご協力ありがとうございました！！