*
* FAD.DAT example from pp 286-290
*
open data fad.dat
data(format=free,org=columns) 1 100 fad
*
graph(footer="Figure 7-6 Sales of Fad Product")
# fad
*
@bjident fad
*
diff fad / dfad
*
@bjident dfad
boxjenk(ar=0,ma=1) dfad
*
graph(footer="Figure 7-8 Residuals from ARIMA(0,1,1)")
# %resids
@regcorrs