Fit and forecast for benchmarking purposes

library(ahead)

## Loading required package: foreach

## Loading required package: snow

library(forecast)

## Registered S3 method overwritten by 'quantmod':
##   method            from
##   as.zoo.data.frame zoo

obj1 <- ahead::fitforecast(AirPassengers)
obj2 <- ahead::fitforecast(AirPassengers, 
                           conformalize = TRUE)

par(mfrow=c(1, 2))
plot(AirPassengers)
plot(obj1)

par(mfrow=c(1, 2))
obj2$plot()
obj2$plot("simulations")