# \donttest{
m <- seas(AirPassengers)
getCall(m) # default call
static(m) # static call
static(m, test = FALSE) # much faster
static(m, evaluate = TRUE) # returns an object of class "seas"
m <- seas(AirPassengers, x11 = "")
static(m, x11.filter = TRUE) # also fixes the X-11 filter (with a warning)
static(m, coef = TRUE) # also fixes the coefficients
# }
Run the code above in your browser using DataLab