/; /; Uses Align to insure 447 obs /; b34sexec options ginclude('Feenstra_ch4.mac') member(table4_4A); b34srun; /; b34sexec data set dropmiss; b34srun; b34sexec matrix; /; call loaddata; call get(chanwsh dlky dly dsimat1a dofsh dofsh1 htsh_exp htsh_exa ci dhtsh ); big= 'chanwsh dlky dly dsimat1a dofsh dofsh1 htsh_exp htsh_exa ci dhtsh'; call align(argument(big)); mod4_42=' chanwsh dlky dly dsimat1a dofsh htsh_exp'; mod4_42=' chanwsh dlky dly dsimat1a dofsh htsh_exp'; mod4_43=' chanwsh dlky dly dsimat1a dofsh1 htsh_exa'; mod4_44=' chanwsh dlky dly dsimat1a ci dhtsh'; n=namelist(argument(big)); do i=1,10; call describe(argument(n(i)) :print); enddo; /; call tabulate(argument(mod4_42)); /; call tabulate(argument(mod4_43)); /; call tabulate(argument(mod4_44)); call olsq( argument(mod4_42) :print :white); call gamfit( argument(mod4_42) :print ); call marspline(argument(mod4_42) :print); call ppreg(argument(mod4_42) :print); call olsq( argument(mod4_43) :print :white); call gamfit( argument(mod4_43) :print ); call marspline(argument(mod4_43) :print); call ppreg(argument(mod4_43) :print); call olsq( argument(mod4_44) :print :white); call gamfit( argument(mod4_44) :print ); call marspline(argument(mod4_44) :print); call ppreg(argument(mod4_44) :print); b34srun;