*
* Example 20.1 from page 622
*
open data tablef20-1[1].txt
calendar(m) 1990
data(format=prn,org=columns) 1990:1 1994:12 date y
graph(footer="Figure 20.1 Monthly Data on Bond Yields")
# y
@bjident(method=yule,number=14) y
boxjenk(ar=2,constant) y
@RegCorrs(method=yule,number=14,dfc=2,report)