をNum_St使用して内部サーバーから1時間ごとのストリームフローデータをダウンロードfunction (i.e., myfunction)し、tssを使用して保存しようとしていますfor loop。動作する場合i = 1はfunction動作しますがi = Num_St (i.e., data for multiple points)、for loop動作しない場合は動作しません。functionそれ自体はここに投稿するには大きすぎると私は作るのに苦労しているようだreproducible example、この特定の問題のために。複数のポイントデータをに保存する方法について考えていただければ幸いtssです。
Num_st <- nrow(Stations)
for (i in 1:Num_st) {
tss<- myfunction(id[i],Data[i],Stage[i])
}
以下を試しましたが、エラーが発生しました。
tss[,i+1]<- myfunction(id[i],Data[i],Stage[i])
出力をリストに保存することをお勧めします
tss <- vector('list', Num_st)
for (i in 1:Num_st) {
tss[[i]]<- myfunction(id[i],Data[i],Stage[i])
}
この記事はインターネットから収集されたものであり、転載の際にはソースを示してください。
侵害の場合は、連絡してください[email protected]
コメントを追加