VAR.irf(b, p, sigu, h=10,graphs=FALSE)
#replicating Table 3.4 and Figure 3.11 Lutkepohl (2005) data(dat) M=VAR.est(dat,p=2,type="const") b=M$coef; sigu=M$sigu VAR.irf(b,p=2,sigu,graphs=TRUE)
Run the code above in your browser using DataLab