我想将嵌套for循环的结果保存在数据框或列表中。 (由于最终我将获得大量数据,所以打印出来的结果实在太多了。
我想创建一个具有5列(i,j,fLat,fLon,Rainindex)的空data.frame,并保存我的for循环的所有输出。
这就是我的代码仅打印出来的样子。
for (i in 1:380){
for (j in 1:530){
fLat <- lati[i,j]
fLon <- long[i,j]
Rainindex <- sum(pr_array[i,j,1:123])
print(c(i,j,fLat,fLon, Rainindex))
}}
[1] 1.0000 1.0000 54.7000 10.4500 153.6514
[1] 1.00000 2.00000 54.71746 10.44813 150.76996
[1] 1.00000 3.00000 54.73491 10.44626 143.46000
[1] 1.00000 4.00000 54.75237 10.44438 137.22394
[1] 1.00000 5.00000 54.76984 10.44250 148.15934
etc. etc.
提前感谢!
New_Df = NULL
for (i in 1:380){
for (j in 1:530){
fLat <- lati[i,j]
fLon <- long[i,j]
Rainindex <- sum(pr_array[i,j,1:123])
vec <- c(i,j,fLat,fLon, Rainindex))
New_Df <- rbind(New_Df, vec)
}}
New_Df <- as.data.frame(New_Df)
colnames(New_Df) <- c("i","j","fLat","fLon","Rainindex")