*1. ORDERED CHOICE MODELS*

ologit demsat retnat trustgov
prvalue, x(retnat 2 trustgov 4)
prchange, rest(median)

prgen trustgov, gen(tg) ci rest(median)
graph twoway line tgp1 tgp2 tgp3 tgp4 tgx

twoway (line tgp1 tgp2 tgp3 tgp4 tgx) (line  tgp3lb tgx, color(black) lpattern(dash))(line tgp3ub tgx, lcolor(black) lpattern(dash))

*Exercise*
ologit demsat class lrself union urban southwest own trustgov retnat

prvalue, x(class 3 lrself 10 union 1 urban 1 southwest 1 own 1 trustgov 10 retnat 2)


*2. ORDERED PROBIT*

oprobit demsat retnat trustgov

xi: oprobit demsat retnat trustgov i.class

char class [omit] 5
xi: oprobit demsat retnat trustgov i.class

ologit demsat trustgov retnat
predict olprob1_1-olprob1_4, pr
predcat2 pcat_orig
epcp
rename trustgov trustgov_old
gen trustgov = trustgov_old + 1
replace trustgov = 10 if trustgov > 10 & trustgov < .
predict olprob2_1-olprob2_4, pr
predcat2 pcat_new
for num 1/4: gen diff_X = olprob2_X - olprob1_X
drop trustgov
rename trustgov_old trustgov


xi: logit incumvote income union swreg lrself urbrur1 i.class i.retnat
predict log1_1, pr
predcat2 pcat_orig
epcp
rename lrself lrself_old
gen lrself = lrself_old + 1
replace lrself = 10 if lrself > 10 & lrself < .
predict log1_2, pr
predcat2 pcat_new
gen diffprob = log1_2 - log1_1