# Simulates values for ZIPInar1 model and estimate its parameters.
set.seed(5)
model = "zinar"
innv = "Po"
y = SIM_ZINAR(n = 500,alpha = 0.3,rho = 0.5,th = 3,innovation = innv)
ZIPInar1 = EST_ZINAR(y,model=model,innovation=innv,desc = TRUE)
Run the code above in your browser using DataLab