複数の変数に対して、要因に基づいて式を実行する方法について助けてほしいので、1 週間の時間別データに基づく例を示します。
df<- data.frame(a = runif(168),
+ b = runif(168),
+ c = runif(168),
+ d = rep(1:7, each = 24))
attach(df)
fx<-function(x) { mean(x) } # it can be more complicated, just to illustrate
a、b、c は異なる変数で、d は私の因数です。
ここでは、日ごとに係数を作成し、それを 3 つの変数すべてに適用し、各結果を個別のベクター/データフレームに書き込みます。だから、私が今していることは次のとおりです。
a.mean <-tapply(a, d, fx)
b.mean <-tapply(b, d, fx)
c.mean <-tapply(c, d, fx)
これにより、見逃したが見つけられないように見える巧妙なトリックがいくつかあると確信できます。因子変数をドロップして、指定した期間と必要な数の変数をループできるようにしたいと考えています。