# NOT RUN {
y <- sim.ARMA(n = 1000, ar = c(0.95,-0.8), ma = -0.6)
# }
# NOT RUN {
est<-estimation(p = 2, q = 1, y = y)
# }
# NOT RUN {
omega(ar = est$ar, ma = est$ma, y = y)
# }
# NOT RUN {
estCAC<-estimation(p = 1, q = 1, y = CAC40return.sq, meanparam = TRUE)
# }
# NOT RUN {
omega(ar = estCAC$ar, ma = estCAC$ma, y = CAC40return.sq)
# }
Run the code above in your browser using DataLab