如何在R

Question

我编写了一个功能，可以使用forecast::nnetar，forecast::tbats，forecast::Arima和forecast::ets等不同的预测方法预测时间序列对象。
我知道forecastHybrid::hybridModel函数正在这样做，我只是想创建一些更自定义的东西。所以我现在返回一个包含result$mean，result$error和result$fit的列表。我想使用像预测对象一样的准确度或绘图功能。有一个简单的方法吗？还是太复杂了？

编辑：关于这个函数，它需要一个ts对象，一个arima模型 - 我通过差异和检查ACF-PACF图表找到了 - 并且预测了一个范围。它适用nnetar，ets，tbats和我的arima模型 它结合了它们的拟合和预测，并创建了新的拟合值和预测值 它返回一个列表对象，其预测值为result$mean（在预测对象中也相同），拟合值为result$fit，错误为result$error。
现在有了这个返回的对象，我无法自动完成一些系列的工作，如准确性，制作图等。所以我想返回一个预测对象，如果可能的话。就是这样。

Answer 1

预测对象只是一个包含几个项目的列表，并且给出了一个类＆＃34;预测＆＃34;。查看任何现有功能以了解如何执行此操作。这是一个非常简单的模板：

myfun <- function(x, h, ...)
{
  # Compute some forecasts
  fc <- ....
  # Construct output list
  output <- list(mean=fc, x=x, ...)
  # Return with forecasting class
  return(structure(output, class='forecast'))
}