从 R 中的“预测”包中导出预测模型和准确度信息答案

【问题标题】：Exporting forecasting model and accuracy information from the "forecast" package in R从 R 中的“预测”包中导出预测模型和准确度信息
【发布时间】：2017-12-29 18:14:54
【问题描述】：

我翻遍了论坛，一直没能找到具体的信息可以解决下面的问题。

主要问题是如何从预测函数中导出（1）模型信息（选择的模型和参数），以及（2）从生成的预测中导出准确度信息（MAPE、MSE等）？

我可以通过调用对象 forecast(retail)$model 找到信息，但无法在文件中逐列实际输出信息。这大概与预定义的矩阵有关。

我能找到的唯一帖子是以下内容，但无法将其应用到我的示例中。 Export accuracy of multiple timeseries forecasts in r into csv-document

我正在处理帖子中的示例：https://robjhyndman.com/hyndsight/batch-forecasting/

以下代码在for循环中逐列循环，并根据forecast()函数生成统计点预测（均值对象），并逐列输出到csv文件。

library(forecast)

retail <- read.csv("https://robjhyndman.com/data/ausretail.csv",header=FALSE)
retail <- ts(retail[,-1],f=12,s=1982+3/12)

ns <- ncol(retail)
h <- 24
fcast <- matrix(NA,nrow=h,ncol=ns)
for(i in 1:ns)
  fcast[,i] <- forecast(retail[,i],h=h)$mean

write(t(fcast),file="retailfcasts.csv",sep=",",ncol=ncol(fcast))

希望有人能够帮助重构上述代码。

非常感谢您提供的所有帮助/指导。

【问题讨论】：

标签： r export-to-csv forecasting

【解决方案1】：

您可以使用以下代码成功导出csv 文件。

创建矩阵后，执行以下操作：

fcast <- as.data.frame(fcast)
write.table(fcast, file="retailfcasts.csv", quote=F, sep=";", dec=",", na="", row.names=T, col.names=T)

是您正在寻找的解决方案吗？

【讨论】：

嗨洛伦佐 - 谢谢你的回复。我会寻找导出预测（零售）$ 模型信息以及准确性（零售）信息。如何创建矩阵或将此信息合并到现有的 fcast 矩阵中？