? P&R Exercise 18.1

options crt limwarn=0;
freq m;
smpl 50:1 96:3;
read(file='\tsp\prhb\datadisk\ex161.xls', format=excel) fygn3;
r=fygn3;
dr=r-r(-1);
smpl 60:1 96:2;

title 'ARIMA(2,1,2)' ;
bjest(const,nar=2,nma=2,nlag=36,nocumplo,noplot,maxit=50) dr;

title 'ARIMA(4,1,4)' ;
bjest(const,nostart,nar=4,nma=4,nlag=36,nocumplo,noplot,maxit=50) dr;

title 'ARIMA(8,1,2)' ;
bjest(const,nar=8,nma=2,nlag=36,nocumplo,noplot,maxit=50) dr;

title 'ARIMA(8,1,4)' ;
bjest(const,nostart,nar=8,nma=4,nlag=36,nocumplo,noplot,maxit=50) dr;

title 'ARIMA(8,1,6)' ;
bjest(const,nostart,nar=8,nma=6,nlag=36,nocumplo,noplot,maxit=50) dr;