Creates a Seasonal-Trend decomposition using Loess model.
STLModel(s, trend = TRUE, robust = FALSE)An STLModel object
if (FALSE) { # \dontrun{
# Monthly seasonality
model <- STLModel(s = 12)
# Robust STL
model <- STLModel(s = 12, robust = TRUE)
} # }