*
* Example 6.1.1 from pp 181-185
*
open data ex611.dat
data(format=free,org=columns) 1 200 x
*
graph(footer="Figure 6.1")
# x
*
* BJIDENT with DIFFS=1 provides correlograms of the levels and first differenced
* data.
*
@bjident(diffs=1) x
*
* Estimate ARIMA(1,1,0) model
*
boxjenk(diffs=1,ar=1,maxl) x
*
* Estimate AR(2) model
*
boxjenk(ar=2,maxl) x