私のforループでエラーが発生する

Question

1から10までのさまざまな時間ブロックのファイル名サマーセットのサブセットを保存したいとします.lm1は、ブロック&ブロックの最初のブロックblock.lm2のデータを読み込みます。私はループのために下に書いたが、それは働いていないWats問題？

library(openxlsx) 
Master=read.xlsx("Master File from Apr-11 to Feb-15.xlsx",sheet="Sheet1") 
summer=subset(Master, Season=="Winter") 
for (i in 1:10) { 
print(i) 
lm[i]=subset(summer,Block==i) 

} 

Answer 1

私の提案は、データをリストに保存することです。 lapplyまたはsapplyを使用すると、その行を処理できます。

out <- vector("list", 10) 

for (i in 1:10) { 
    message(sprintf("Processing iteration number %s", i)) 
    out[[i]] <- subset(summer, Block == i) 
}