m <- seas(AirPassengers)
qs(m)
spc(m)
fivebestmdl(m)
arimamodel(m)
# if no automdl spec is present, the model is re-evaluated
m2 <- seas(AirPassengers, arima.model = "(0 1 1)(0 1 1)")
spc(m2) # arima overwrites the automdl spec
fivebestmdl(m2) # re-evaluation with automdl
# more diagnostical statistics with R functions
shapiro.test(resid(m)) # no rejection of normality
Box.test(resid(m), lag = 24, type = "Ljung-Box") # no auto-correlation
# accessing the full output (see ?out)
out(m)
out(m, search = "Ljung-Box")
Run the code above in your browser using DataLab