# NOT RUN {
data_rec <- mdcev.data(data_rec, subset = id <= 500, id.var = "id",
alt.var = "alt", choice = "quant")
mdcev_est <- mdcev( ~ 0, data = data_rec,
model = "hybrid0", algorithm = "MLE",
std_errors = "mvn")
CreateBlankPolicies(npols = 2, mdcev_est)
# }
Run the code above in your browser using DataLab