? P&R Exercise 9.2

options crt limwarn=0 ;
freq m;
smpl 60:1 95:7;
read(file='\tsp\prhb\tsp\ex92tsp.xls', format=excel) ivmd mds mdu pwmd;
sho series ;
ind=ivmd;
shd=mds;
unhod=mdu;
whd=pwmd;
dind=ind-ind(-1);
d2whd=(whd-whd(-2))/2;
d6unhod=(unhod(-1)-unhod(-7))/6;
smpl 83:1 87:5;
olsq dind c  shd(4,25,none) ind(-1) d2whd d6unhod; 
smpl 65:1 95:7;
olsq dind c  shd(4,25,both) ind(-1) d2whd d6unhod;
stop; end;