prints some automatic() results
prtauto_univ(results,namemod,test,out)
* results = a tlist provided by function automatic
* namemod = the name of the sub-results to print in the results tlist ('initial model', 'stage 0 model', 'stage 1 union model', 'stage 2 union model', 'final model')
* test = %t if the user wants to print the specification tests results ; %f if not
* out = the file where the results are printed
* nothing, just print the results
load(GROCERDIR+'/data/bdhenderic.dat') ; bounds('1964q3','1989q2') // column HE in table 9 of Hendry and Krozlig paper //r=ols('delts(lm1-lp)','lagts(lm1-lp-ly)','delts(lp)','rnet','delts(lagts(lm1-lp-ly))','cte') // this example allows the user to recover // the results of columns Final model A and Final model B // in table 9 of Hendry and Krozlig paper [r1]=automatic('delts(lm1-lp)','lagts(lm1-lp-ly)',... 'delts(lp)',... 'rnet',... 'delts(lagts(lm1-lp))','delts(lagts(2,lm1-lp))','delts(lagts(3,lm1-lp))','delts(lagts(4,lm1-lp))',... 'delts(ly)','delts(lagts(1,ly))','delts(lagts(2,ly))','delts(lagts(3,ly))','delts(lagts(4,ly))',... 'delts(delts(lp))','delts(delts(lagts(1,lp)))','delts(delts(lagts(2,lp)))','delts(delts(lagts(3,lp)))','delts(delts(lagts(4,lp)))',... 'delts(rnet)','delts(lagts(1,rnet))','delts(lagts(2,rnet))','delts(lagts(3,rnet))','delts(lagts(4,rnet))',... 'const','prt=nothing') prtauto_univ(r1,'stage 1 union model',%t) // displays on screen (no fourth argument) the stage 1 union model results including specification tests. prtauto_univ(r1,'final model',%f) // displays on screen (no fourth argument) the final model results without specification tests. | ![]() | ![]() |