使用auto.arima的不良结果

Question

我试图使用auto.arima函数，但无法正常工作。 代码（已编辑）：

dummydata <- c(-1.55993917397658, -1.17458854064119, -0.172676893969176, -0.301127105080973,
....
)
# Full data at http://pastebin.com/V93K30zG
aux_data <- ts(data = dummydata, frequency = 7)
plot(x=1:413, y=aux_data, type='l', xlim=c(1,440), ylim=c(-4,3))
# ARIMA
best_arima <- auto.arima(aux_data, ic="bic", allowdrift = FALSE)
# aux_pred <- predict(best_arima, n.ahead=14)
aux_pred <- forecast(best_arima, h=14)
pred_data <- aux_pred$mean
par(new=TRUE)
plot(x=c(414:427), y=pred_data, type='l', col="red", xlim=c(1,440), ylim=c(-4,3))

结果是胡说八道：

我做错了什么？

Answer 1

这是一个示例，其中auto.arima对季节性差异做出错误的选择。 （我的任务清单上有一个问题： http : //robjhyndman.com/hyndsight/forecast7-part-2/ ）

您可以获得以下更好的结果：

best_arima <- auto.arima(aux_data, D=1)
aux_pred <- forecast(best_arima, h=14)
plot(aux_pred, plot.conf=FALSE, fcol='red')