R 中的精度函数

Question

我想计算包含 12 个预测值的数值向量的准确性，但我得到的结果带有警告。

`> accuracy(f,Test)
                    ME      RMSE       MAE       MPE      MAPE ACF1 Theil's U
Training set       NaN       NaN       NaN       NaN       NaN   NA        NA
Test set     0.9064933 0.9064933 0.9064933 0.4060658 0.4060658   NA        NA
Warning message:
In trainingaccuracy(f, test, d, D) : test elements must be within sample`

测试：

`Jan       Feb       Mar       Apr       May       Jun       Jul
2012 223.23801 203.51890 195.21139 169.68900 157.63439 135.79616  96.84895
           Aug       Sep       Oct       Nov       Dec
2012 100.42089  62.51129  49.18672  22.10280   5.00000`

我通过这段代码得到 f :

`f  <- list()
for (i in 1:12) { 
  demfit <- ets(Dem2) 
  f[[i]] <- forecast(demfit, 1)  #start filling the f list with values
  Dem2[length(Dem2)+1] <- f[[1]]$mean[1]
} 
f <- unlist(f)`

此代码旨在获得 12 次领先预测（每次，我都会根据预测值更新我的系列）

感谢您的帮助

Answer 1

最后，我通过执行以下代码解决了我的问题：

fl<-structure(list(mean=K,x=Dem2,fitted=f1$fitted),class="forecast")

它从 class "forecast" 创建一个对象，其中包含计算度量 MASE 的必要元素。

谢谢

R 中的精度函数

Accuracy function in R

r

time-series

forecasting