freduse DAUTONSA,clear g qm = mofd(daten) tsset qm,monthly x11as DAUTONSA if tin(1968m1,2015m12) corr DAUTO* tsline DAUTO* if !mi(DAUTONSA_as), ylab(,angle(0) labs(small)) /// xlab(#8,labs(small)) legend(size(small)) /// ti("X-11 Seasonal Adjustment of New Vehicle Sales")