使用Forecast和loop提取模型名称

Question

我正在尝试提取用于预测多个变量的模型的名称。但是，我得到一个错误。知道出了什么问题吗？

#ns is the number of columns
for(i in 1:ns){
      fcast[,i] <- forecast(mydata[,i],h=h,robust = TRUE, lambda = "auto", biasadj = TRUE)$mean
      model_name[,i] %>% forecast(mydata[,i],h=h,robust = TRUE, lambda = "auto", biasadj = TRUE) %>% method}

Error in stl(ts(deseas, frequency = msts[i]), s.window = s.window[i],  : 
  NA/NaN/Inf in foreign function call (arg 1)
> View(model_name)
Error in View : object 'model_name' not found