ルーピングまたはlapplyのデータフレームのリストのR

Question

私はlapplyを使用して、たとえば、リスト内のいくつかのデータフレームの変数の名前を変更する方法についていくつかの把握しています。しかし、私はやや複雑な操作を若干（わずかながら）行うようにしています。

具体的には、いくつかのエンティティの平均成長率を計算することを検討しています。成長率は、既に算出されているので、私はちょうど、元データフレーム内のすべての数百の成長率の平均値を（含まれ、すべてのデータフレーム

for (i in 1:13) { 
    growth.type[,i] <- tapply(growth[,8+i] , growth$type, mean, na.rm = TRUE) 
} 

これは、新しいデータフレーム（growth.type）を作成の上、以下の操作をperforする必要がありますgrowth）によって、typeである。

これをいくつかのデータフレーム（growthなど）に適用して、新しいデータフレーム（growth.typeなど）に入れたいと思います。

これは意味があると思います。

Answer 1

リスト

xy <- list(growth1, growth2, growth3, ...) 

で処理し、その後、このxyオブジェクトにカスタム関数を適用したいすべてのdata.framesを置きます。

customFunction <- function(.data) { 
    for (i in 1:13) { 
    growth.type[,i] <- tapply(.data[,8+i] , .data$type, mean, na.rm = TRUE) 
    } 
    growth.type # this is the object which will be returned when function finishes 
} 

は、単に、例えば、あなたがlapplyの結果を結合する場合は、do.callを使用することができます

out <- lapply(xy, FUN = customFunction) 

を行いますdo.call("rbind", out)。