***** FIGURES AND REGRESSION OUTPUT REPLICATION FILE FOR HTUN AND WELDON (2018) ***** WRITTEN BY CHRISTOPHER PATRICK ERWIN ***** LAST MODIFIED 09/10/2018 ***** SETUP STATA SESSION (USER INPUT REQUIRED) { clear all //clear memory capture log close //close any log currently open set more off //alows results window to scroll freely cd /* place your directory here (should contain data set) */ } ***** CHAPTER 2: FEMINIST MOBILZATION AND STATUS POLITICS: COMBATTING VIOLENCE AGAINST WOMEN { use HtunWeldon2018_0910.dta, clear //import data set ***** FIGURE 2.5 (p. 50) preserve collapse (mean) vaw_index percentparlfemale, by(year) twoway (scatter vaw_index year, c(1) yaxis(1) ylabel(1(1)10, /// axis(1)) xlabel(1975(10)2005) xtitle("") lcolor(black) /// mfcolor(white) mcolor(black) msymbol(O) /// graphregion(color(white)) plotregion(color(white)) /// ytitle("Violence Against Women Index", margin(medium) /// axis(1))) (scatter percentparlfemale year, c(1) yaxis(2) /// ylabel(0(10)100, axis(2)) lcolor(black) mfcolor(white) /// mcolor(black) msymbol(T) ytitle("Women in Parliament (%)", /// margin(medsmall) axis(2)) saving(figure2_5, replace)), /// legend(stack) legend(order(1 2) /// label(1 "Violence Again Women Index") /// label(2 "Women in Parliament (%)")) restore ***** TABLE 2.9 (pp. 72-73) xtset ccode year, delta(10) *MODEL 1 xtpcse vaw_index strengthbyautonomy regionagr polmachhigh /// democracy_level loggdp withdrawres, pairwise outreg2 using table2_9.doc if e(sample)==1, replace lab ctitle(1) /// keep(strengthbyautonomy regionagr polmachhigh democracy_level /// loggdp withdrawres percentparlfemale regionavg2 vaw_indexlag /// cedawrat interactcratsba staterelig leftpartydum) dec(3) estimates store m1 *MODEL 2 xtpcse vaw_index strengthbyautonomy regionagr polmachhigh /// democracy_level loggdp withdrawres percentparlfemale, pairwise outreg2 using table2_9.doc if e(sample)==1, append lab ctitle(2) /// keep(strengthbyautonomy regionagr polmachhigh democracy_level /// loggdp withdrawres percentparlfemale regionavg2 vaw_indexlag /// cedawrat interactcratsba staterelig leftpartydum) dec(3) estimates store m2 *MODEL 3 xtpcse vaw_index strengthbyautonomy regionavg2 regionagr /// polmachhigh democracy_level loggdp withdrawres, pairwise outreg2 using table2_9.doc if e(sample)==1, append lab ctitle(3) /// keep(strengthbyautonomy regionagr polmachhigh democracy_level /// loggdp withdrawres percentparlfemale regionavg2 vaw_indexlag /// cedawrat interactcratsba staterelig leftpartydum) dec(3) estimates store m3 *MODEL 4 xtpcse vaw_index strengthbyautonomy regionagr polmachhigh /// democracy_level loggdp withdrawres vaw_indexlag, pairwise outreg2 using table2_9.doc if e(sample)==1, append lab ctitle(4) /// keep(strengthbyautonomy regionagr polmachhigh democracy_level /// loggdp withdrawres percentparlfemale regionavg2 vaw_indexlag /// cedawrat interactcratsba staterelig leftpartydum) dec(3) estimates store m4 *MODEL 5 xtpcse vaw_index strengthbyautonomy regionagr regionavg2 polmachhigh /// democracy_level loggdp withdrawres percentparlfemale /// vaw_indexlag, pairwise outreg2 using table2_9.doc if e(sample)==1, append lab ctitle(5) /// keep(strengthbyautonomy regionagr polmachhigh democracy_level /// loggdp withdrawres percentparlfemale regionavg2 vaw_indexlag /// cedawrat interactcratsba staterelig leftpartydum) dec(3) estimates store m5 *MODEL 6 xtpcse vaw_index strengthbyautonomy regionavg2 regionagr /// polmachhigh democracy_level loggdp withdrawres vaw_indexlag, /// pairwise outreg2 using table2_9.doc if e(sample)==1, append lab ctitle(6) /// keep(strengthbyautonomy regionagr polmachhigh democracy_level /// loggdp withdrawres percentparlfemale regionavg2 vaw_indexlag /// cedawrat interactcratsba staterelig leftpartydum) dec(3) estimates store m6 *MODEL 7 xtpcse vaw_index strengthbyautonomy regionavg2 regionagr /// polmachhigh democracy_level loggdp cedawrat vaw_indexlag, pairwise outreg2 using table2_9.doc if e(sample)==1, append lab ctitle(7) /// keep(strengthbyautonomy regionagr polmachhigh democracy_level /// loggdp withdrawres percentparlfemale regionavg2 vaw_indexlag /// cedawrat interactcratsba staterelig leftpartydum) dec(3) estimates store m7 *MODEL 8 xtpcse vaw_index cedawrat strengthbyautonomy regionagr /// regionavg2 polmachhigh interactcratsba democracy_level /// loggdp, pairwise outreg2 using table2_9.doc if e(sample)==1, append lab ctitle(8) /// keep(strengthbyautonomy regionagr polmachhigh democracy_level /// loggdp withdrawres percentparlfemale regionavg2 vaw_indexlag /// cedawrat interactcratsba staterelig leftpartydum) dec(3) estimates store m8 *MODEL 9 xtpcse vaw_index strengthbyautonomy percentparlfemale /// staterelig regionavg2 regionagr polmachhigh democracy_level /// loggdp withdrawres vaw_indexlag, pairwise outreg2 using table2_9.doc if e(sample)==1, append lab ctitle(9) /// keep(strengthbyautonomy regionagr polmachhigh democracy_level /// loggdp withdrawres percentparlfemale regionavg2 vaw_indexlag /// cedawrat interactcratsba staterelig leftpartydum) dec(3) estimates store m9 *MODEL 10 xtpcse vaw_index strengthbyautonomy leftpartydum regionavg2 /// regionagr polmachhigh democracy_level loggdp withdrawres /// vaw_indexlag, pairwise outreg2 using table2_9.doc if e(sample)==1, append lab ctitle(10) /// keep(strengthbyautonomy regionagr polmachhigh democracy_level /// loggdp withdrawres percentparlfemale regionavg2 vaw_indexlag /// cedawrat interactcratsba staterelig leftpartydum) dec(3) estimates store m10 ***** FIGURE 2.6 (pp. 76) coefplot (m2, msymbol(O)) (m8, msymbol(T)), /// drop(_cons) xline(0, lcolor(black)) legend(off) mfcolor(white) /// ciopts(lwidth(*2) lcolor(gs0)) mlcolor(gs0) grid(between /// glcolor(black) glpattern(dash)) /// coeflabels("Feminist Movement (Lagged)=1" = /// "Strong Feminist Movement (Lagged)", wrap(30) notick /// labcolor(black) labsize(small) labgap(3)) /// plotregion(color(white)) graphregion(color(white)) /// saving(figure2_6, replace) } ***** CHAPTER 3: GOVERNING WOMEN'S LEGAL STATUS AT WORK { ***** TABLE 3.4 (pp. 111-112) *MODEL 1 xtreg totplussd strengthbyautonomy cedawrat regagremp hw_btchst /// ppfwith0 formercolony loggdp communist flabor , re outreg2 using table3_4.doc if e(sample)==1, replace lab ctitle(1) /// keep(strengthbyautonomy cedawrat regagremp polmachhigh /// cupleftparty6 hw_btchst godd muslim cath ppfwith0 formercolony /// loggdp communist flabor cedawratlag lagflabor) dec(3) /// sortvar(strengthbyautonomy cedawrat regagremp polmachhigh /// cupleftparty6 hw_btchst godd muslim cath ppfwith0 formercolony /// loggdp communist flabor cedawratlag lagflabor) /// addstat(R-squared, `e(r2_o)') estimates store m11 *MODEL 2 xtreg totplussd strengthbyautonomy loggdp ppfwith0 hw_btchst /// formercolony regagremp communist polmachhigh, re outreg2 using table3_4.doc if e(sample)==1, append lab ctitle(2) /// keep(strengthbyautonomy loggdp ppfwith0 hw_btchst formercolony /// regagremp communist flabor cedawrat polmachhigh cedawratlag /// lagflabor godd muslim cath cupleftparty6) dec(3) /// sortvar(strengthbyautonomy cedawrat regagremp polmachhigh /// cupleftparty6 hw_btchst godd muslim cath ppfwith0 formercolony /// loggdp communist flabor cedawratlag lagflabor) /// addstat(R-squared, `e(r2_o)') estimates store m12 *MODEL 3 xtreg totplussd strengthbyautonomy loggdp ppfwith0 hw_btchst /// formercolony regagremp communist polmachhigh cedawratlag /// lagflabor, re outreg2 using table3_4.doc if e(sample)==1, append lab ctitle(3) /// keep(strengthbyautonomy loggdp ppfwith0 hw_btchst formercolony /// regagremp communist flabor cedawrat polmachhigh cedawratlag /// lagflabor godd muslim cath cupleftparty6) dec(3) /// sortvar(strengthbyautonomy cedawrat regagremp polmachhigh /// cupleftparty6 hw_btchst godd muslim cath ppfwith0 formercolony /// loggdp communist flabor cedawratlag lagflabor) /// addstat(R-squared, `e(r2_o)') estimates store m13 *MODEL 4 xtreg totplussd strengthbyautonomy loggdp ppfwith0 hw_btchst /// formercolony regagremp communist polmachhigh flabor cedawrat, re outreg2 using table3_4.doc if e(sample)==1, append lab ctitle(4) /// keep(strengthbyautonomy loggdp ppfwith0 hw_btchst formercolony /// regagremp communist flabor cedawrat polmachhigh cedawratlag /// lagflabor godd muslim cath cupleftparty6) dec(3) /// sortvar(strengthbyautonomy cedawrat regagremp polmachhigh /// cupleftparty6 hw_btchst godd muslim cath ppfwith0 formercolony /// loggdp communist flabor cedawratlag lagflabor) /// addstat(R-squared, `e(r2_o)') estimates store m14 *MODEL 5 xtreg totplussd strengthbyautonomy loggdp ppfwith0 hw_btchst /// formercolony regagremp communist polmachhigh cedawratlag /// lagflabor godd muslim cath, re outreg2 using table3_4.doc if e(sample)==1, append lab ctitle(5) /// keep(strengthbyautonomy loggdp ppfwith0 hw_btchst formercolony /// regagremp communist flabor cedawrat polmachhigh cedawratlag /// lagflabor godd muslim cath cupleftparty6) dec(3) /// sortvar(strengthbyautonomy cedawrat regagremp polmachhigh /// cupleftparty6 hw_btchst godd muslim cath ppfwith0 formercolony /// loggdp communist flabor cedawratlag lagflabor) /// addstat(R-squared, `e(r2_o)') estimates store m15 *MODEL 6 xtreg totplussd strengthbyautonomy loggdp ppfwith0 hw_btchst /// formercolony regagremp communist cedawratlag cupleftparty6, re outreg2 using table3_4.doc if e(sample)==1, append lab ctitle(6) /// keep(strengthbyautonomy loggdp ppfwith0 hw_btchst formercolony /// regagremp communist flabor cedawrat polmachhigh cedawratlag /// lagflabor godd muslim cath cupleftparty6) dec(3) /// sortvar(strengthbyautonomy cedawrat regagremp polmachhigh /// cupleftparty6 hw_btchst godd muslim cath ppfwith0 formercolony /// loggdp communist flabor cedawratlag lagflabor) /// addstat(R-squared, `e(r2_o)') estimates store m16 *MODEL 7 xtreg totplussd strengthbyautonomy loggdp ppfwith0 hw_btchst /// formercolony regagremp communist flabor cedawratlag, re outreg2 using table3_4.doc if e(sample)==1, append lab ctitle(7) /// keep(strengthbyautonomy loggdp ppfwith0 hw_btchst formercolony /// regagremp communist flabor cedawrat polmachhigh cedawratlag /// lagflabor godd muslim cath cupleftparty6) dec(3) /// sortvar(strengthbyautonomy cedawrat regagremp polmachhigh /// cupleftparty6 hw_btchst godd muslim cath ppfwith0 formercolony /// loggdp communist flabor cedawratlag lagflabor) /// addstat(R-squared, `e(r2_o)') estimates store m17 ***** FIGURE 3.5 (p. 113) coefplot (m17, msymbol(O)), drop(_cons) xline(0, /// lcolor(black)) mfcolor(white) ciopts(lwidth(*2) lcolor(gs0)) /// mlcolor(gs0) legend(off) grid(between glcolor(black) /// glpattern(dash)) coeflabels("Feminist Movement (Lagged)=1" = /// "Strong Feminist Movement (Lagged)", wrap(30) notick /// labcolor(black) labsize(small) labgap(3)) /// plotregion(color(white)) graphregion(color(white)) /// saving(figure3_5, replace) } ***** CHAPTER 4: DOCTRINAL POLITICS: RELIGIOUS POWER, THE STATE, AND FAMILY LAW { ***** TABLE 4.2 (pp. 145-147) *MODEL 1 xtreg famlawindex communist formercolony hw_btchst godd strongfem /// strongestfem cedawrat democracy_level ppfwith0, re outreg2 using table4_2.doc if e(sample)==1, replace lab ctitle(1) /// keep(communist hw_btchst godd strongfem strongestfem cedawrat /// democracy_level ppfwith0 strongestfemlag strongfemlag /// uphwrellawindex cedawratlag lgdp formercolony wvs_rs asia /// mideast latam africa muslim cath c.uphwrellawindex##c.wvs_rs) /// dec(3) sortvar(hw_btchst uphwrellawindex wvs_rs godd /// formercolony communist strongestfem strongfem strongestfemlag /// strongfemlag cedawrat cedawratlag ppfwith0 democracy_level /// muslim cath africa asia latam mideast /// c.uphwrellawindex##c.wvs_rs) addstat(R-squared, `e(r2_o)') estimates store m18 *MODEL 2 xtreg famlawindex communist formercolony hw_btchst godd /// strongestfemlag strongfemlag cedawratlag democracy_level /// ppfwith0, re outreg2 using table4_2.doc if e(sample)==1, append lab ctitle(2) /// keep(communist hw_btchst godd strongfem strongestfem cedawrat /// democracy_level ppfwith0 strongestfemlag strongfemlag /// uphwrellawindex cedawratlag lgdp formercolony wvs_rs asia /// mideast latam africa muslim cath c.uphwrellawindex##c.wvs_rs) /// dec(3) sortvar(hw_btchst uphwrellawindex wvs_rs godd /// formercolony communist strongestfem strongfem strongestfemlag /// strongfemlag cedawrat cedawratlag ppfwith0 democracy_level /// muslim cath africa asia latam mideast /// c.uphwrellawindex##c.wvs_rs) addstat(R-squared, `e(r2_o)') estimates store m19 *MODEL 3 xtreg famlawindex communist formercolony uphwrellawindex wvs_rs /// strongestfemlag strongfemlag cedawratlag democracy_level /// ppfwith0, re outreg2 using table4_2.doc if e(sample)==1, append lab ctitle(3) /// keep(communist hw_btchst godd strongfem strongestfem cedawrat /// democracy_level ppfwith0 strongestfemlag strongfemlag /// uphwrellawindex cedawratlag lgdp formercolony wvs_rs asia /// mideast latam africa muslim cath c.uphwrellawindex##c.wvs_rs) /// dec(3) sortvar(hw_btchst uphwrellawindex wvs_rs godd /// formercolony communist strongestfem strongfem strongestfemlag /// strongfemlag cedawrat cedawratlag ppfwith0 democracy_level /// muslim cath africa asia latam mideast /// c.uphwrellawindex##c.wvs_rs) addstat(R-squared, `e(r2_o)') estimates store m20 *MODEL 4 xtreg famlawindex communist formercolony uphwrellawindex wvs_rs /// strongestfemlag strongfemlag cedawratlag democracy_level /// ppfwith0 lgdp mideast latam africa asia, re outreg2 using table4_2.doc if e(sample)==1, append lab ctitle(4) /// keep(communist hw_btchst godd strongfem strongestfem cedawrat /// democracy_level ppfwith0 strongestfemlag strongfemlag /// uphwrellawindex cedawratlag lgdp formercolony wvs_rs asia /// mideast latam africa muslim cath c.uphwrellawindex##c.wvs_rs) /// dec(3) sortvar(hw_btchst uphwrellawindex wvs_rs godd /// formercolony communist strongestfem strongfem strongestfemlag /// strongfemlag cedawrat cedawratlag ppfwith0 democracy_level /// muslim cath africa asia latam mideast /// c.uphwrellawindex##c.wvs_rs) addstat(R-squared, `e(r2_o)') estimates store m21 *MODEL 5 xtreg famlawindex communist formercolony uphwrellawindex wvs_rs /// strongestfemlag strongfemlag cedawratlag democracy_level /// ppfwith0 hw_btchst staterelig muslim cath, re outreg2 using table4_2.doc if e(sample)==1, append lab ctitle(5) /// keep(communist hw_btchst godd strongfem strongestfem cedawrat /// democracy_level ppfwith0 strongestfemlag strongfemlag /// uphwrellawindex cedawratlag lgdp formercolony wvs_rs asia /// mideast latam africa muslim cath c.uphwrellawindex##c.wvs_rs) /// dec(3) sortvar(hw_btchst uphwrellawindex wvs_rs godd /// formercolony communist strongestfem strongfem strongestfemlag /// strongfemlag cedawrat cedawratlag ppfwith0 democracy_level /// muslim cath africa asia latam mideast /// c.uphwrellawindex##c.wvs_rs) addstat(R-squared, `e(r2_o)') estimates store m22 *MODEL 6 xtreg famlawindex communist formercolony uphwrellawindex wvs_rs /// cedawrat strongestfemlag strongfemlag democracy_level /// ppfwith0 muslim cath, re outreg2 using table4_2.doc if e(sample)==1, append lab ctitle(6) /// keep(communist hw_btchst godd strongfem strongestfem cedawrat /// democracy_level ppfwith0 strongestfemlag strongfemlag /// uphwrellawindex cedawratlag lgdp formercolony wvs_rs asia /// mideast latam africa muslim cath c.uphwrellawindex##c.wvs_rs) /// dec(3) sortvar(hw_btchst uphwrellawindex wvs_rs godd /// formercolony communist strongestfem strongfem strongestfemlag /// strongfemlag cedawrat cedawratlag ppfwith0 democracy_level /// muslim cath africa asia latam mideast /// c.uphwrellawindex##c.wvs_rs) addstat(R-squared, `e(r2_o)') estimates store m23 *MODEL 7 xtreg famlawindex communist formercolony uphwrellawindex wvs_rs /// cedawrat strongestfemlag strongfemlag democracy_level ppfwith0 /// muslim cath mideast latam africa asia, re outreg2 using table4_2.doc if e(sample)==1, append lab ctitle(7) /// keep(communist hw_btchst godd strongfem strongestfem cedawrat /// democracy_level ppfwith0 strongestfemlag strongfemlag /// uphwrellawindex cedawratlag lgdp formercolony wvs_rs asia /// mideast latam africa muslim cath c.uphwrellawindex##c.wvs_rs) /// dec(3) sortvar(hw_btchst uphwrellawindex wvs_rs godd /// formercolony communist strongestfem strongfem strongestfemlag /// strongfemlag cedawrat cedawratlag ppfwith0 democracy_level /// muslim cath africa asia latam mideast /// c.uphwrellawindex##c.wvs_rs) addstat(R-squared, `e(r2_o)') estimates store m24 *MODEL 8 xtreg famlawindex communist formercolony uphwrellawindex wvs_rs /// cedawrat strongestfemlag strongfemlag democracy_level ppfwith0 /// muslim cath mideast latam africa asia lgdp, re outreg2 using table4_2.doc if e(sample)==1, append lab ctitle(8) /// keep(communist hw_btchst godd strongfem strongestfem cedawrat /// democracy_level ppfwith0 strongestfemlag strongfemlag /// uphwrellawindex cedawratlag lgdp formercolony wvs_rs asia /// mideast latam africa muslim cath c.uphwrellawindex##c.wvs_rs) /// dec(3) sortvar(hw_btchst uphwrellawindex wvs_rs godd /// formercolony communist strongestfem strongfem strongestfemlag /// strongfemlag cedawrat cedawratlag ppfwith0 democracy_level /// muslim cath africa asia latam mideast /// c.uphwrellawindex##c.wvs_rs) addstat(R-squared, `e(r2_o)') estimates store m25 *MODEL 9 xtreg famlawindex communist formercolony c.uphwrellawindex##c.wvs_rs /// cedawratlag strongestfemlag strongfemlag democracy_level /// ppfwith0, re outreg2 using table4_2.doc if e(sample)==1, append lab ctitle(9) /// keep(communist hw_btchst godd strongfem strongestfem cedawrat /// democracy_level ppfwith0 strongestfemlag strongfemlag /// uphwrellawindex cedawratlag lgdp formercolony wvs_rs asia /// mideast latam africa muslim cath c.uphwrellawindex##c.wvs_rs) /// dec(3) sortvar(hw_btchst uphwrellawindex wvs_rs godd /// formercolony communist strongestfem strongfem strongestfemlag /// strongfemlag cedawrat cedawratlag ppfwith0 democracy_level /// muslim cath africa asia latam mideast /// c.uphwrellawindex##c.wvs_rs) addstat(R-squared, `e(r2_o)') estimates store m26 *MODEL 10 xtreg famlawindex communist formercolony c.uphwrellawindex##c.wvs_rs /// cedawratlag strongestfemlag strongfemlag democracy_level /// ppfwith0 muslim cath, re outreg2 using table4_2.doc if e(sample)==1, append lab ctitle(10) /// keep(communist hw_btchst godd strongfem strongestfem cedawrat /// democracy_level ppfwith0 strongestfemlag strongfemlag /// uphwrellawindex cedawratlag lgdp formercolony wvs_rs asia /// mideast latam africa muslim cath c.uphwrellawindex##c.wvs_rs) /// dec(3) sortvar(hw_btchst uphwrellawindex wvs_rs godd /// formercolony communist strongestfem strongfem strongestfemlag /// strongfemlag cedawrat cedawratlag ppfwith0 democracy_level /// muslim cath africa asia latam mideast /// c.uphwrellawindex##c.wvs_rs) addstat(R-squared, `e(r2_o)') estimates store m27 ***** FIGURE 4.5 (p. 148) twoway (scatter famlawindex muslim if year==2005, msymbol(Oh) /// jitter(20) mcolor(black) saving(figure4_5, replace) /// xtitle("Predominantly Muslim, 2005") ytitle("Family Law Index") /// xlabel(0(1)1 0 "No" 1 "Yes") xscale(range(-.5 1.5)) /// graphregion(color(white)) plotregion(color(white))) // ***** FIGURE 4.6 (p. 150) twoway (scatter famlawindex hwrellawindex, legend(off) msymbol(Oh) /// msize(medlarge) mcolor(gs0) jitter(10) /// xtitle("Religious Legislation Index") ytitle("Family Law Index") /// graphregion(color(white)) plotregion(color(white))) /// (lfit famlawindex hwrellawindex, lcolor(gs0) lpattern(solid) /// lwidth(medthick)), saving(figure4_6, replace) text(6.5 19 "Fitted Regression Line") ***** FIGURE 4.7 (p. 150) coefplot (m18, msymbol(O)) (m19, msymbol(T)) (m20, msymbol(S)), /// drop(_cons) xline(0, lcolor(black)) legend(off) mfcolor(white) /// ciopts(lwidth(*2) lcolor(gs0)) mlcolor(gs0) grid(between /// glcolor(black) glpattern(dash)) /// coeflabels("Feminist Movement (Lagged)=1" /// = "Strong Feminist Movement (Lagged)", wrap(36) notick /// labcolor(black) labsize(small) labgap(3)) /// plotregion(color(white)) graphregion(color(white)) /// saving(figure4_7, replace) order(hw_btchst hwrellawindex /// wvs_rs godd formercolony communist strongestfem strongfem /// strongestfemlag strongfemlag cedawrat cedawratlag ppfwith0 /// democracy_level) ***** FIGURE 4.8 (p. 151) twoway (scatter famlawindex wvs_rs, legend(off) msymbol(Oh) /// msize(medlarge) mcolor(gs0) jitter(11) /// xtitle("Religiosity Scale") ytitle("Family Law Index") /// graphregion(color(white)) plotregion(color(white))) /// (lfit famlawindex wvs_rs, lcolor(gs0) lpattern(solid) /// lwidth(medthick)), saving(figure4_8, replace) /// text(15 30 "Fitted Regression Line") ***** FIGURE 4.9 (p. 153) xtreg famlawindex communist formercolony c.uphwrellawindex##c.wvs_rs /// cedawratlag strongestfemlag strongfemlag democracy_level /// ppfwith0, re margins, at(wvs_rs= (3.45 33.45 63.45 93.45) uphwrellawindex =(0(1)22)) vsquish margins, at(wvs_rs= (10 40 70 100) uphwrellawindex =(0(1)22)) vsquish margins, at(wvs_rs = (39 59 79) uphwrellawindex =(0(1)22)) vsquish marginsplot, noci x(uphwrellawindex) recast(line) xlabel(0 (2) 22) /// saving(figure4_9, replace) } ***** CHAPTER 5: CLASS POLITICS: FAMILY LEAVE AND CHILDCARE POLICY { ***** FIGURE 5.1 (p. 180) preserve collapse (mean) matleavegenoutof10 parleavegenoutof10 /// totleavegenincldaddyleave, by(ht_region year) label define reg 1 "Eastern Europe" 2 "Latin America" 3 /// "Middle East" 4 "Africa" 5 "Europe/North America" 6 "East Asia" /// 7 "South East Asia" 8 "South Asia" xtset ht_region year xtline totleavegenincldaddyleave, overlay graphregion(color(white) /// margin(2 45 2 2)) plotregion(color(white)) /// ytitle("Total Leave Generosity (Out of 10)") ylabel(0(1)6) /// ymtick(0(1)6) xtitle("Year") xlabel(1975(10)2005) /// xmtick(1975(10)2005) legend(rowgap(*.5) off) xsize(5) /// saving(figure5_1, replace) /// text(4.55 2007 "Eastern Europe", placement(east)) /// text(3.39 2007 "Europe/North America", placement(east)) /// text(1.35 2007 "Latin America", placement(east)) /// text(1.10 2007 "South East Asia", placement(east)) /// text(.87 2007 "Africa", placement(east)) /// text(2.16 2007 "East Asia", placement(east)) /// text(1.57 2007 "Middle East", placement(east)) /// text(.66 2007 "South Asia", placement(east)) /// plot1opts(lcolor(black)) plot2opts(lcolor(black)) /// plot3opts(lcolor(black)) plot4opts(lcolor(black)) /// plot5opts(lcolor(black)) plot6opts(lcolor(black)) /// plot7opts(lcolor(black)) plot8opts(lcolor(black)) restore ***** TABLE 5.1 (pp. 183-184) *MODEL 1 xtreg totleavegenincldaddyleave strengthbyautonomy polmachhigh /// democracy_level loggdp communist hw_btchst godd cupleftparty6 /// ppfwith0, re outreg2 using table5_1.doc if e(sample)==1, replace lab ctitle(1) /// keep(strengthbyautonomy polmachhigh democracy_level loggdp /// communist hw_btchst godd cupleftparty6 ppfwith0 fertility /// cedawrat eumember flabor) dec(3) sortvar(cupleftparty6 loggdp /// communist strengthbyautonomy ppfwith0 cedawrat eumember /// polmachhigh democracy_level fertility flabor hw_btchst godd) /// addstat(R-squared, `e(r2_o)') estimates store m28 *MODEL 2 xtreg totleavegenincldaddyleave strengthbyautonomy loggdp /// communist cupleftparty6 ppfwith0, re outreg2 using table5_1.doc if e(sample)==1, append lab ctitle(2) /// keep(strengthbyautonomy polmachhigh democracy_level loggdp /// communist hw_btchst godd cupleftparty6 ppfwith0 fertility /// cedawrat eumember flabor) dec(3) sortvar(cupleftparty6 loggdp /// communist strengthbyautonomy ppfwith0 cedawrat eumember /// polmachhigh democracy_level fertility flabor hw_btchst godd) /// addstat(R-squared, `e(r2_o)') estimates store m29 *MODEL 3 xtreg totleavegenincldaddyleave strengthbyautonomy loggdp /// communist cupleftparty6 ppfwith0 fertility, re outreg2 using table5_1.doc if e(sample)==1, append lab ctitle(3) /// keep(strengthbyautonomy polmachhigh democracy_level loggdp /// communist hw_btchst godd cupleftparty6 ppfwith0 fertility /// cedawrat eumember flabor) dec(3) sortvar(cupleftparty6 loggdp /// communist strengthbyautonomy ppfwith0 cedawrat eumember /// polmachhigh democracy_level fertility flabor hw_btchst godd) /// addstat(R-squared, `e(r2_o)') estimates store m30 *MODEL 4 xtreg totleavegenincldaddyleave strengthbyautonomy loggdp /// communist cupleftparty6 ppfwith0 fertility cedawrat, re outreg2 using table5_1.doc if e(sample)==1, append lab ctitle(4) /// keep(strengthbyautonomy polmachhigh democracy_level loggdp /// communist hw_btchst godd cupleftparty6 ppfwith0 fertility /// cedawrat eumember flabor) dec(3) sortvar(cupleftparty6 loggdp /// communist strengthbyautonomy ppfwith0 cedawrat eumember /// polmachhigh democracy_level fertility flabor hw_btchst godd) /// addstat(R-squared, `e(r2_o)') estimates store m31 *MODEL 5 xtreg totleavegenincldaddyleave strengthbyautonomy loggdp /// cupleftparty6 ppfwith0 fertility communist, re outreg2 using table5_1.doc if e(sample)==1, append lab ctitle(5) /// keep(strengthbyautonomy polmachhigh democracy_level loggdp /// communist hw_btchst godd cupleftparty6 ppfwith0 fertility /// cedawrat eumember flabor) dec(3) sortvar(cupleftparty6 loggdp /// communist strengthbyautonomy ppfwith0 cedawrat eumember /// polmachhigh democracy_level fertility flabor hw_btchst godd) /// addstat(R-squared, `e(r2_o)') estimates store m32 *MODEL 6 xtreg totleavegenincldaddyleave strengthbyautonomy loggdp /// cupleftparty6 ppfwith0 fertility communist eumember, re outreg2 using table5_1.doc if e(sample)==1, append lab ctitle(6) /// keep(strengthbyautonomy polmachhigh democracy_level loggdp /// communist hw_btchst godd cupleftparty6 ppfwith0 fertility /// cedawrat eumember flabor) dec(3) sortvar(cupleftparty6 loggdp /// communist strengthbyautonomy ppfwith0 cedawrat eumember /// polmachhigh democracy_level fertility flabor hw_btchst godd) /// addstat(R-squared, `e(r2_o)') estimates store m33 *MODEL 7 xtreg totleavegenincldaddyleave strengthbyautonomy loggdp /// cupleftparty6 ppfwith0 fertility communist eumember flabor, re outreg2 using table5_1.doc if e(sample)==1, append lab ctitle(7) /// keep(strengthbyautonomy polmachhigh democracy_level loggdp /// communist hw_btchst godd cupleftparty6 ppfwith0 fertility /// cedawrat eumember flabor) dec(3) sortvar(cupleftparty6 loggdp /// communist strengthbyautonomy ppfwith0 cedawrat eumember /// polmachhigh democracy_level fertility flabor hw_btchst godd) /// addstat(R-squared, `e(r2_o)') estimates store m34 ***** TABLE 5.3 (pp. 192-193) *MODEL 1 xtlogit netdaycare1 strengthbyautonomy ppfwith0 cupleftparty6 /// democracy_level cedawrat formercolony hw_btchst staterelig cath /// muslim polmachhigh communist flabor loggdp pr eumember,re estat ic outreg2 using table5_3.doc if e(sample)==1, replace lab ctitle(1) /// keep(strengthbyautonomy ppfwith0 cupleftparty6 democracy_level /// cedawrat formercolony hw_btchst staterelig cath muslim /// polmachhigh communist flabor loggdp pr eumember fertility /// withdrawres) dec(3) sortvar(strengthbyautonomy cupleftparty6 /// ppfwith0 polmachhigh loggdp eumember cedawrat withdrawres flabor /// fertility democracy_level formercolony hw_btchst staterelig /// communist muslim cath pr) estimates store m35 *MODEL 2 xtlogit netdaycare1 strengthbyautonomy ppfwith0 cupleftparty6 /// democracy_level cedawrat formercolony staterelig cath muslim /// polmachhigh communist flabor loggdp pr,re estat ic outreg2 using table5_3.doc if e(sample)==1, append lab ctitle(2) /// keep(strengthbyautonomy ppfwith0 cupleftparty6 democracy_level /// cedawrat formercolony hw_btchst staterelig cath muslim /// polmachhigh communist flabor loggdp pr eumember fertility /// withdrawres) dec(3) sortvar(strengthbyautonomy cupleftparty6 /// ppfwith0 polmachhigh loggdp eumember cedawrat withdrawres flabor /// fertility democracy_level formercolony hw_btchst staterelig /// communist muslim cath pr) estimates store m36 *MODEL 3 xtlogit netdaycare1 strengthbyautonomy ppfwith0 cupleftparty6 /// democracy_level cath muslim polmachhigh communist flabor /// fertility loggdp,re estat ic outreg2 using table5_3.doc if e(sample)==1, append lab ctitle(3) /// keep(strengthbyautonomy ppfwith0 cupleftparty6 democracy_level /// cedawrat formercolony hw_btchst staterelig cath muslim /// polmachhigh communist flabor loggdp pr eumember fertility /// withdrawres) dec(3) sortvar(strengthbyautonomy cupleftparty6 /// ppfwith0 polmachhigh loggdp eumember cedawrat withdrawres flabor /// fertility democracy_level formercolony hw_btchst staterelig /// communist muslim cath pr) estimates store m37 *MODEL 4 xtlogit netdaycare1 strengthbyautonomy ppfwith0 cupleftparty6,re estat ic outreg2 using table5_3.doc if e(sample)==1, append lab ctitle(4) /// keep(strengthbyautonomy ppfwith0 cupleftparty6 democracy_level /// cedawrat formercolony hw_btchst staterelig cath muslim /// polmachhigh communist flabor loggdp pr eumember fertility /// withdrawres) dec(3) sortvar(strengthbyautonomy cupleftparty6 /// ppfwith0 polmachhigh loggdp eumember cedawrat withdrawres flabor /// fertility democracy_level formercolony hw_btchst staterelig /// communist muslim cath pr) estimates store m38 *MODEL 5 xtlogit netdaycare1 strengthbyautonomy ppfwith0 cupleftparty6 /// eumember withdrawres,re estat ic outreg2 using table5_3.doc if e(sample)==1, append lab ctitle(5) /// keep(strengthbyautonomy ppfwith0 cupleftparty6 democracy_level /// cedawrat formercolony hw_btchst staterelig cath muslim /// polmachhigh communist flabor loggdp pr eumember fertility /// withdrawres) dec(3) sortvar(strengthbyautonomy cupleftparty6 /// ppfwith0 polmachhigh loggdp eumember cedawrat withdrawres flabor /// fertility democracy_level formercolony hw_btchst staterelig /// communist muslim cath pr) estimates store m39 } ***** CHAPTER 5 APPENDIX: FERTILITY AND CHILDCARE POLICY { ***** TABLE 5.A.2 (p. 200) *MODEL 1 xtlogit netdaycare1 strengthbyautonomy ppfwith0 cupleftparty6 if /// lagfertility < 2, re estat ic outreg2 using table5_a_2.doc if e(sample)==1, replace lab ctitle(1) /// keep(strengthbyautonomy ppfwith0 cupleftparty6 cedawratlag /// lagtotleave1 loggdp formercolony) dec(3) /// sortvar(strengthbyautonomy ppfwith0 cupleftparty6 cedawratlag /// lagtotleave1 loggdp formercolony) estimates store m40 *MODEL 2 xtlogit netdaycare1 strengthbyautonomy ppfwith0 cupleftparty6 /// lagtotleave1 loggdp if lagfertility < 2, re estat ic outreg2 using table5_a_2.doc if e(sample)==1, append lab ctitle(2) /// keep(strengthbyautonomy ppfwith0 cupleftparty6 cedawratlag /// lagtotleave1 loggdp formercolony) dec(3) /// sortvar(strengthbyautonomy ppfwith0 cupleftparty6 cedawratlag /// lagtotleave1 loggdp formercolony) estimates store m41 *MODEL 3 xtlogit netdaycare1 strengthbyautonomy ppfwith0 cupleftparty6 if /// lagfertility > 2, re estat ic outreg2 using table5_a_2.doc if e(sample)==1, append lab ctitle(3) /// keep(strengthbyautonomy ppfwith0 cupleftparty6 cedawratlag /// lagtotleave1 loggdp formercolony) dec(3) /// sortvar(strengthbyautonomy ppfwith0 cupleftparty6 cedawratlag /// lagtotleave1 loggdp formercolony) estimates store m42 *MODEL 4 xtlogit netdaycare1 strengthbyautonomy ppfwith0 cupleftparty6 /// lagtotleave1 if lagfertility > 2, re estat ic outreg2 using table5_a_2.doc if e(sample)==1, append lab ctitle(4) /// keep(strengthbyautonomy ppfwith0 cupleftparty6 cedawratlag /// lagtotleave1 loggdp formercolony) dec(3) /// sortvar(strengthbyautonomy ppfwith0 cupleftparty6 cedawratlag /// lagtotleave1 loggdp formercolony) estimates store m43 *MODEL 5 xtlogit netdaycare1 strengthbyautonomy ppfwith0 cupleftparty6 /// formercolony loggdp if lagfertility > 2, re estat ic outreg2 using table5_a_2.doc if e(sample)==1, append lab ctitle(5) /// keep(strengthbyautonomy ppfwith0 cupleftparty6 cedawratlag /// lagtotleave1 loggdp formercolony) dec(3) /// sortvar(strengthbyautonomy ppfwith0 cupleftparty6 cedawratlag /// lagtotleave1 loggdp formercolony) estimates store m44 *MODEL 6 xtlogit netdaycare1 strengthbyautonomy ppfwith0 cupleftparty6 /// formercolony loggdp cedawratlag if lagfertility > 2, re estat ic outreg2 using table5_a_2.doc if e(sample)==1, append lab ctitle(6) /// keep(strengthbyautonomy ppfwith0 cupleftparty6 cedawratlag /// lagtotleave1 loggdp formercolony) dec(3) /// sortvar(strengthbyautonomy ppfwith0 cupleftparty6 cedawratlag /// lagtotleave1 loggdp formercolony) estimates store m45 } ***** CHAPTER 6: REPRODUCTIVE RIGHTS: CLASS, STATUS, AND DOCTRINAL POLITICS { /* NOTE #1: "strongfem" and "strongestfem" were defined slightly different // here compared to previous chapters (see below). Chapter 6 materials /// defines these variables as: */ generate strongfem1 = 0 if !missing(strengthbyautonomy) replace strongfem1 = 1 if strengthbyautonomy == 1 gen strongestfem1 = 0 if !missing(strengthbyautonomy) replace strongestfem1 = 1 if strengthbyautonomy == 2 gen strong_ppf1 = strongfem1 * ppfwith0 gen strongest_ppf1 = strongestfem1 * ppfwith0 /* NOTE #2: the "outreg2" command in Stata does not properly export odds ratios, but instead outputs raw coefficients. Please refer to results within Stata rather than Microsoft Word document for models 3 and 4. */ ***** FIGURE 6.1 (p. 214) preserve collapse (mean) abortion_index, by(ht_region year) xtset ht_region year xtline abortion_index, overlay graphregion(color(white) /// margin(2 45 2 2)) plotregion(color(white)) /// ytitle("Abortion Legality Index (Out of 10)") ylabel(0(1)10) /// ymtick(0(1)10) xtitle("Year") xlabel(1975(10)2005) /// xmtick(1975(10)2005) legend(rowgap(*.5) off) xsize(5) /// saving(figure6_1, replace) text(8.23 2007 "Eastern Europe", /// placement(east)) text(7.05 2007 "Europe/North America", /// placement(east)) text(2.6 2007 "Latin America", placement(east)) /// text(3.75 2007 "South East Asia", placement(east)) /// text(4.2 2007 "Africa", placement(east)) /// text(5.25 2007 "East Asia", placement(east)) /// text(3 2007 "Middle East", placement(east)) /// text(2.2 2007 "South Asia", placement(east)) /// plot1opts(lcolor(black)) plot2opts(lcolor(black)) /// plot3opts(lcolor(black)) plot4opts(lcolor(black)) /// plot5opts(lcolor(black)) plot6opts(lcolor(black)) /// plot7opts(lcolor(black)) plot8opts(lcolor(black)) restore ***** TABLE 6.5 (p. 223) *Model 1 (ABORTION LEGALITY) xtreg abortion_index cath mus hw_btchst godd strongfem1 /// strongestfem1 cupleftparty6 ppfwith0 cedawrat communist /// formercolony polity lgdp outreg2 using table6_5.doc if e(sample)==1, replace lab /// ctitle(1) keep(cath mus hw_btchst godd strongfem1 /// strongestfem1 cupleftparty6 ppfwith0 cedawrat communist /// formercolony polity lgdp strong_ppf1 strongest_ppf1) dec(3) /// sortvar(cath muslim hw_btchst godd communist formercolony /// cupleftparty6 strengthbyautonomy ppfwith0 strong_ppf1 /// strongest_ppf1 cedawrat democracy_level loggdp eumember /// polmachhigh fertility flabor) addstat(R-squared, `e(r2_o)') estimates store m46 *Model 2 (ABORTION LEGALITY) xtreg abortion_index strong_ppf1 strongest_ppf1 cath mus hw_btchst /// godd strongfem1 strongestfem1 cupleftparty6 ppfwith0 cedawrat /// communist formercolony polity lgdp outreg2 using table6_5.doc if e(sample)==1, append lab ctitle(2) /// keep(cath mus hw_btchst godd strongfem1 strongestfem1 /// cupleftparty6 ppfwith0 cedawrat communist formercolony /// polity lgdp strong_ppf1 strongest_ppf1) dec(3) sortvar(cath /// muslim hw_btchst godd communist formercolony cupleftparty6 /// strengthbyautonomy ppfwith0 strong_ppf1 strongest_ppf1 /// cedawrat democracy_level loggdp eumember polmachhigh /// fertility flabor) addstat(R-squared, `e(r2_o)') estimates store m47 *Model 3 (REPRODUCTIVE RIGHTS FUNDING) xtologit rr_funding cath mus hw_btchst godd /// strongfem1 strongestfem1 cupleftparty6 ppfwith0 cedawrat /// communist formercolony polity lgdp, or eform estat ic outreg2 using table6_5.doc if e(sample)==1, append lab ctitle(3) /// keep(cath mus hw_btchst godd strongfem1 strongestfem1 /// cupleftparty6 ppfwith0 cedawrat communist formercolony /// polity lgdp strong_ppf1 strongest_ppf1) dec(3) sortvar(cath /// muslim hw_btchst godd communist formercolony cupleftparty6 /// strengthbyautonomy ppfwith0 strong_ppf1 strongest_ppf1 /// cedawrat democracy_level loggdp eumember polmachhigh /// fertility flabor) estimates store m48 *Model 4 (REPRODUCTIVE RIGHTS FUNDING) xtologit rr_funding strong_ppf1 strongest_ppf1 cath mus /// hw_btchst godd strongfem1 strongestfem1 cupleftparty6 ppfwith0 /// cedawrat communist formercolony polity lgdp, or eform estat ic outreg2 using table6_5.doc if e(sample)==1, append lab ctitle(4) /// keep(cath mus hw_btchst godd strongfem1 strongestfem1 /// cupleftparty6 ppfwith0 cedawrat communist formercolony /// polity lgdp strong_ppf1 strongest_ppf1) dec(3) sortvar(cath /// muslim hw_btchst godd communist formercolony cupleftparty6 /// strengthbyautonomy ppfwith0 strong_ppf1 strongest_ppf1 /// cedawrat democracy_level loggdp eumember polmachhigh /// fertility flabor) estimates store m49 } ***** CHAPTER 7: THE MULTIPLE LOGICS OF GENDER JUSTICE { ***** TABLE 7.3 (233-234) *Model 1 xtpcse vaw_index lag1 polmachhigh democracy_level loggdp cedawratlag /// communist formercolony hw_btchst godd cath muslim staterelig /// cupleftparty6 ppfwith0 outreg2 using table7_3.doc if e(sample)==1, replace lab ctitle(1) /// keep(lag1 polmachhigh democracy_level loggdp cedawratlag /// communist formercolony hw_btchst godd cath muslim staterelig /// cupleftparty6 ppfwith0) dec(3) cttop(VAW) estimates store m50 *Model 2 xtpcse totplussdoutof10 lag1 polmachhigh democracy_level loggdp /// cedawratlag communist formercolony hw_btchst godd cath muslim /// staterelig cupleftparty6 ppfwith0 outreg2 using table7_3.doc if e(sample)==1, append lab ctitle(2) /// keep(lag1 polmachhigh democracy_level loggdp cedawratlag /// communist formercolony hw_btchst godd cath muslim staterelig /// cupleftparty6 ppfwith0) dec(3) cttop(Equality at Work) estimates store m51 *Model 3 xtpcse famlawoutof10 lag1 polmachhigh democracy_level loggdp /// cedawratlag communist formercolony hw_btchst godd cath muslim /// staterelig cupleftparty6 ppfwith0 outreg2 using table7_3.doc if e(sample)==1, append lab ctitle(3) /// keep(lag1 polmachhigh democracy_level loggdp cedawratlag /// communist formercolony hw_btchst godd cath muslim staterelig /// cupleftparty6 ppfwith0) dec(3) cttop(Family Law) estimates store m52 *Model 4 xtpcse abortion_index lag1 polmachhigh democracy_level loggdp /// cedawratlag communist formercolony hw_btchst godd cath muslim /// staterelig cupleftparty6 ppfwith0 outreg2 using table7_3.doc if e(sample)==1, append lab ctitle(4) /// keep(lag1 polmachhigh democracy_level loggdp cedawratlag /// communist formercolony hw_btchst godd cath muslim staterelig /// cupleftparty6 ppfwith0) dec(3) cttop(Abortion Legality) estimates store m53 *Model 5 quietly sum totleavegenincldaddyleave scalar leavemax = r(max) gen totleaveof10 = totleavegenincldaddyleave*(10/leavemax) xtpcse totleaveof10 lag1 polmachhigh democracy_level /// loggdp cedawratlag communist formercolony hw_btchst godd cath /// muslim staterelig cupleftparty6 ppfwith0 outreg2 using table7_3.doc if e(sample)==1, append lab ctitle(5) /// keep(lag1 polmachhigh democracy_level loggdp cedawratlag /// communist formercolony hw_btchst godd cath muslim staterelig /// cupleftparty6 ppfwith0) dec(3) cttop(Leave Generosity) estimates store m54 *Model 6 xtpcse rr_funding lag1 polmachhigh democracy_level loggdp /// cedawratlag communist formercolony hw_btchst godd cath muslim /// staterelig cupleftparty6 ppfwith0 outreg2 using table7_3.doc if e(sample)==1, append lab ctitle(6) /// keep(lag1 polmachhigh democracy_level loggdp cedawratlag /// communist formercolony hw_btchst godd cath muslim staterelig /// cupleftparty6 ppfwith0) dec(3) cttop(RR Funding) estimates store m55 }