Kombinieren für Schleife Ausgang

Question

Ich möchte eine Schleife schreiben, die eine Tabelle aus einem dreidimensionalen Array extrahiert und sequenziell in einen Datenrahmen als Spalte schreiben.

Der Code, den ich so weit habe

library(ncdf4) 

test <- nc_open("NorESM_TREFHT_cont_mem1-60_2006-2099.nc") 
temp <- ncvar_get(test, "TREFHT", count = c(144,96,60,1)) 
drop(temp) 
lat<- ncvar_get(test, "lat") 
lon <- ncvar_get(test,"lon") 
lonlat <- expand.grid(lon, lat) 
for (n in 1:60) { 
member <- array(temp[1:144,1:96,n]) 
ensemble <- as.vector(member) 
h <- data.frame(cbind(lonlat, ensemble[n])) 
} 

Zur Zeit der Code ohne die Schleife arbeitet (für n = 1,2 etc.) aber nur kombiniert den letzten Lauf in dem for-Schleife Ausgang für n = 1:60

Answer 1

Ihre h wird noch nicht verwendet; mit anderen Worten nutzlos. Wahrscheinlich möchten Sie in jedem Schritt n die Variable ensemble zu Ihren lonlat Daten hinzufügen. Ihr Code sollte also lonlat <- data.frame(cbind(lonlat, ensemble[n])) lauten.