*
* Example WATER.DAT from pp 508-515
*
open data water.dat
data(format=free,org=columns) 1 110 time water flood
*
graph(footer="Figure 12-9 Demand for bottled water")
# water
@bjident water 1 74
*
boxjenk(diffs=1,const) water * 74
@regcorrs
*
boxjenk(diffs=1,const,ma=1) water * 74
*
boxjenk(diffs=1,const,ma=1,inputs=1,apply) water
# flood	||10|| 0 0
*
@regcorrs
prj fitted
graph(footer="Figure 12-11 Pre-,peri-, and postintervention fit") 2
# water
# fitted