普通的分解如

> birthstimeseries <- ts(my, frequency=12, start=c(1946,1))

> ts.plot(birthstimeseries)

> birthsTSDecompose<-decompose(birthstimeseries)  

stl是怎么用的？

stl(x, s.window, s.degree = 0,t.window = NULL, t.degree = 1,l.window = nextodd(period),l.degree = t.degree,s.jump = ceiling(s.window/10),t.jump = ceiling(t.window/10),l.jump = ceiling(l.window/10),robust = FALSE,inner = if(robust)  1 else 2,outer = if(robust) 15 else 0,na.action = na.fail)