# NOT RUN {
library(forecast)
# non-seasonal model
data("WWWusage")
mod <- Arima(WWWusage, order = c(3, 1, 1))
mod_pmml <- pmml(mod)
# seasonal model
data("JohnsonJohnson")
mod_02 <- Arima(JohnsonJohnson,
order = c(1, 1, 1),
seasonal = c(1, 1, 1)
)
mod_02_pmml <- pmml(mod_02)
# }
Run the code above in your browser using DataLab