psi weights
Here is basically a useless page because i am terrible at bookdown
psi.weights.wge(phi = c(0.4, -0.6, 0.8), lag.max = 5)
## [1] 0.40000 -0.44000 0.38400 0.73760 -0.28736
psiweights(phi = c(0.4, -0.6, 0.8), l = 6)
## [1] 1.00000 0.40000 -0.44000 0.38400 0.73760 -0.28736