*
* DAIRY.DAT example from pp 284-286
*
open data dairy.dat
data(format=free,org=columns) 1 100 time dairy
*
graph(footer="Figure 7-4 Daily Product Sales")
# dairy
*
@bjident dairy
*
boxjenk(const,ar=1,ma=0) dairy
*
graph(footer="Figure 7-5 Residuals from AR(1)")
# %resids
@regcorrs