*
* Example from pp 219-221
* ?? Need PRJ to return more stuff
* ?? Add some type of wizard for this
*
open data pcv.dat
data(format=prn,org=columns) 1 19 gdpw_eur pdpeall
*
linreg pdpeall
# constant gdpw_eur
*
prj(xvector=||1.0,7.5||)