set.seed(123)
# Simulate 500 observations from the DMQ model.
# Use the percentiles
vTau = seq(0.01, 0.99, 0.01)
# Median as reference quantile
iTau_star = 50
# Standard Gaussian limiting distribution
vQ_0 = qnorm(vTau)
# vector of parameters
vPn = c("phi" = 0.95, "gamma" = 0.10, "alpha" = 0.01, "beta" = 0.7)
lSim = SimulateDMQ(iT = 500, vQ_0, vTau, iTau_star, vPn)
plot.ts(lSim$vY)
plot.ts(lSim$mQ, plot.type = "single")
Run the code above in your browser using DataLab