1
行列を作成しようとしていますが、各行は別の行列の3行ごとの合計で構成されています。実際にリストにはこれらの行列の束があり、そのリスト内の各要素に対して同じ操作を実行しています。このpostに基づいて、以下のコードを生成することができました。それは動作しますが、私のより複雑なデータセットは永遠に必要です。リスト内の行列のn行ごとの合計
test<-lapply(1:1000, function(x) matrix(1:300, nrow=60))
testCons<-lapply(test, function(x) apply(x, 2, function(y) tapply(y, ceiling(seq_along(y)/3), sum)))
誰かがそれをスピードアップする方法やそれを簡素化する方法を知っていますか?
はい、これは高速です。ありがとうございました! – user3390169