R/holdout.Mean.Arima.R

`holdout.Mean.Arima` <-
function(object, test.Vector, ...){
  tmp <- predict(object, n.ahead = length(test.Vector), se.fit = FALSE) - test.Vector
  mean(abs(tmp))
}

Try the CombMSC package in your browser

Any scripts or data that you put into this service are public.

CombMSC documentation built on May 2, 2019, 2:32 p.m.