I want to generate the confidence intervals of a response impulse using the tsDyn package in R. I tried to use the following code but I think it is not right, I would apprec