data("Democratization", package = "qcauchyreg")
fit <- qcreg(democratization ~ schooling + press_freedom, data = Democratization, criterion=1)
summary(fit)
fit$effects
fit$index
data("Poverty", package = "qcauchyreg")
fit2 <- qcreg(poverty ~ population + illiteracy + pc_income,
data = Poverty, npi=50, criterion="bic")
summary(fit2)
fit2$effects
fit2$index
plot(fit2$pis, type="l")
plot(fit2$quantregplot)
Run the code above in your browser using DataLab