powered by
uni.vola(a,u)
uni.vola.sim
a <- c(0.01, 0.04, 0.95) # a <- c(a constant, ARCH parameter, GARCH parameter) u <- rnorm(1000) h <- uni.vola(a, u)
Run the code above in your browser using DataLab