monthplot(x, type="l", labels=<<see below>>, xlab="", ylab=deparse(substitute(x)))
Graphical parameters may also be supplied as arguments to this function (see par). In addition, the high-level graphics arguments described under par and the arguments to title may be supplied to this function.
fit <- sabl(hstart) monthplot(window(fit$seasonal, end=end(hstart)))monthplot(fit$seasonal, type="h", main="Seasonal Component of Housing Starts")