你如何追加到R

Question

我正在尝试为黄土模型选择最佳的span参数。我需要将i和标准错误存储到名为error的列表中。从0.10运行到1后，我可以比较最小的错误和相应的i用于模型。我试过这个，但似乎没有工作。任何想法？

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) {

  })
}

Answer 1

使用z和i作为循环索引很奇怪（并且可能有错误）。选择一个。您还需要初始化结果列表。

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))
}