2016-07-19 9 views
0

Ich versuche, das beste Spanargument zum Lössmodell auszuwählen. Ich muss ich und auch den Standardfehler zu einer Liste speichern, die Fehler genannt wird. Nachdem ich von 0.10 zu 1 ausgeführt habe, kann ich den kleinsten Fehler und das entsprechende i für das Modell vergleichen. Ich habe das versucht, scheint aber nicht zu funktionieren. irgendwelche Ideen?Wie fügen Sie an eine Liste in R an

z<-1 
for(i in seq(from=0, to=1, by=0.10)){ 
    tryCatch({ 
     mdl <- loess(data=final.train, mCpu ~ mTrans_A,control=loess.control(surface="direct"), span=i) 
     error[[z]]<-i 
     error[[ z ]] <- mdl$s 
     z=z+1 
    }, error = function(err) { 

    }) 
} 

Antwort

2

Es ist seltsam (und Buggy potentiell) z und i sowohl als Loop-Indizes zu verwenden. Wählen Sie einfach einen aus. Außerdem müssen Sie Ihre Ergebnisliste initialisieren.

error = list() 
my_seq = seq(from=0, to=1, by=0.10) 
for(i in seq_along(my_seq)){ 
    tryCatch({ 
     mdl <- loess(data=final.train, mCpu ~ mTrans_A,control=loess.control(surface="direct"), span=my_seq[i]) 
     error[[i]] <- mdl$s 
    }, error = function(err) return(NA)) 
} 
Verwandte Themen