你如何追加到R列表

Question

我正在尝试为黄土模型选择最佳跨度参数。 我需要将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))
}