powered by
labour
labour.stl <- stl(labour,10) plot(labour.stl) monthplot(labour.stl$time.series[,1],type="h")
Run the code above in your browser using DataLab