*
* Example 4.5 from page 131
*
open data hprice2.raw
data(format=free,org=columns) 1 506 price crime nox rooms dist radial proptax $
 stratio lowstat lprice lnox lproptax
*
set ldist = log(dist)
linreg lprice
# constant lnox ldist rooms stratio
*
* This does a formal test of coefficient 2 (that on lnox) being equal to -1
*
test
# 2
# -1.0