? P&R Exercise 4.1

options crt limwarn=0;

freq q;
smpl 59:1 95:2;
read(file='ex33.xls', format=excel) gcdan;
s=gcdan;
freq m;
smpl 75:1 95:9;
read(file='ex41.xls', format=excel) gmpy fygn3 punew;
yp=gmpy;
r=fygn3;
cpi=punew;

freq q;
convert(average) yp;
convert(average) r;
convert(average) cpi;
sr=s/cpi;
ypr=yp/cpi;
rr=r/cpi;
smpl 75:1 95:2;
olsq sr c ypr rr;