data(admit)
summary(admit)
require(MASS)
## ordered probit model
op1 <- polr(score ~ gre.quant + gre.verbal + ap + pt + female,
Hess=TRUE,
data=admit,
method="probit")
summary(op1)
hitmiss(op1)
logLik(op1)
pR2(op1)
Run the code above in your browser using DataLab