plots impulse functions
pltirf2(res)
* res = the results typed list of function irf
* nothing (printed on a graphic window)
load(GROCERDIR+'/data/lutk1.dat') bounds('1960q4','1978q4') results=VAR(2,'endo=delts(log(rfa_inv));delts(log(rfa_inc));delts(log(rfa_cons))') // a calculation with orthogonized residuals and asymptotic confidence band [resirf]=irf(results,10,'mres=chol1','meth=asym') // now plot impulse response functions pltirf2(resirf) | ![]() | ![]() |