使用slide_tsibble

Question

我正在尝试使用slide_tsibble()函数进行滚动窗口预测。我可以获取预测，但是将其通过管道传递到accuracy()函数时，出现了错误消息。

我使用的数据集是带有1478个观测值的eth股票回报。我正在尝试获取978个观测值的固定窗口的1步预测，并获得其准确性。

ethslide <- eth_ts %>% as_tsibble(index = trading_day) %>% 
slide_tsibble(.size = 978, .step = 1) 

fc <- ethslide %>% model(
  arima = ARIMA(diff_lg_eth ~ pdq(1,0,0))
) %>% forecast(h=1)

fc %>% accuracy(eth_ts)

我得到的错误是

  

stats :: acf（.resid，plot = FALSE，lag.max = 2，na.action = na.action，：下标超出范围

中的错误