R/jd3_stl.R
loess.Rd
Fit a Loess regression.
loess(y, window, degree = 1, jump = 0)
input time series.
q<-rjd3stl::stlplus(rjd3toolkit::ABS$X0.2.09.10.M, 12) decomp<-q$decomposition t<-decomp[,'t'] matplot(cbind(t,loess(t, 121)), type='l')