*
*  Example 10.5 from page 342
*
cal(m) 1978:2
open data barium.raw
data(org=columns) 1978:2 1988:12 chnimp bchlimp befile6 affile6 afdec6 befile12 affile12 afdec12 $
  chempi gas rtwex spr sum fall lchnimp lgas lrtwex lchempi trend feb mar apr may jun $
  jul aug sep oct nov dec percchn
*
* If they weren't already available in the data set, you could create the various
* log variables by
*
set lchnimp = log(chnimp)
set lchempi = log(chempi)
set lgas    = log(gas)
set lrtwex  = log(rtwex)
*
linreg lchnimp
# constant lchempi lgas lrtwex befile6 affile6 afdec6