Stata script to replicate "Why is democracy declining in Latin America?"
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
* The main model | |
xtscc pressfree leftism presvrl leftismXpresvrl ief gdpcapita | |
* Effect of VRLpres at in-sample min, ave, and max, values of presidential leftism | |
lincom _b[presvrl] + _b[leftismXpresvrl]*1.5 | |
lincom _b[presvrl] + _b[leftismXpresvrl]*7.194014 | |
lincom _b[presvrl] + _b[leftismXpresvrl]*18 | |
* Figure 1 data (the 'xtscc' add-on does not accept the # operator, so the 'margins' | |
* command could not be used to graph the interaction) | |
lincom _b[presvrl] + _b[leftismXpresvrl]*0 | |
lincom _b[presvrl] + _b[leftismXpresvrl]*1 | |
lincom _b[presvrl] + _b[leftismXpresvrl]*2 | |
lincom _b[presvrl] + _b[leftismXpresvrl]*3 | |
lincom _b[presvrl] + _b[leftismXpresvrl]*4 | |
lincom _b[presvrl] + _b[leftismXpresvrl]*5 | |
lincom _b[presvrl] + _b[leftismXpresvrl]*6 | |
lincom _b[presvrl] + _b[leftismXpresvrl]*7 | |
lincom _b[presvrl] + _b[leftismXpresvrl]*8 | |
lincom _b[presvrl] + _b[leftismXpresvrl]*9 | |
lincom _b[presvrl] + _b[leftismXpresvrl]*10 | |
lincom _b[presvrl] + _b[leftismXpresvrl]*11 | |
lincom _b[presvrl] + _b[leftismXpresvrl]*12 | |
lincom _b[presvrl] + _b[leftismXpresvrl]*13 | |
lincom _b[presvrl] + _b[leftismXpresvrl]*14 | |
lincom _b[presvrl] + _b[leftismXpresvrl]*15 | |
lincom _b[presvrl] + _b[leftismXpresvrl]*16 | |
lincom _b[presvrl] + _b[leftismXpresvrl]*17 | |
lincom _b[presvrl] + _b[leftismXpresvrl]*18 | |
lincom _b[presvrl] + _b[leftismXpresvrl]*19 | |
lincom _b[presvrl] + _b[leftismXpresvrl]*20 | |
* Uruguay and Bolivia examples | |
lincom _b[presvrl] + _b[leftismXpresvrl]*5.53 | |
lincom _b[presvrl] + _b[leftismXpresvrl]*14.76 | |
lincom _b[presvrl] + _b[leftismXpresvrl]*5.31 | |
lincom _b[presvrl] + _b[leftismXpresvrl]*16.12 | |
* Disaggregating press freedom (and rechecking the interaction) | |
* legal subcomponent | |
xtscc legalfree leftism presvrl leftismXpresvrl ief gdpcapita | |
lincom _b[presvrl] + _b[leftismXpresvrl]*0 | |
lincom _b[presvrl] + _b[leftismXpresvrl]*1 | |
lincom _b[presvrl] + _b[leftismXpresvrl]*2 | |
lincom _b[presvrl] + _b[leftismXpresvrl]*3 | |
lincom _b[presvrl] + _b[leftismXpresvrl]*4 | |
lincom _b[presvrl] + _b[leftismXpresvrl]*5 | |
lincom _b[presvrl] + _b[leftismXpresvrl]*6 | |
lincom _b[presvrl] + _b[leftismXpresvrl]*7 | |
lincom _b[presvrl] + _b[leftismXpresvrl]*8 | |
lincom _b[presvrl] + _b[leftismXpresvrl]*9 | |
lincom _b[presvrl] + _b[leftismXpresvrl]*10 | |
lincom _b[presvrl] + _b[leftismXpresvrl]*11 | |
lincom _b[presvrl] + _b[leftismXpresvrl]*12 | |
lincom _b[presvrl] + _b[leftismXpresvrl]*13 | |
lincom _b[presvrl] + _b[leftismXpresvrl]*14 | |
lincom _b[presvrl] + _b[leftismXpresvrl]*15 | |
lincom _b[presvrl] + _b[leftismXpresvrl]*16 | |
lincom _b[presvrl] + _b[leftismXpresvrl]*17 | |
lincom _b[presvrl] + _b[leftismXpresvrl]*18 | |
lincom _b[presvrl] + _b[leftismXpresvrl]*19 | |
lincom _b[presvrl] + _b[leftismXpresvrl]*20 | |
* political subcomponent | |
xtscc polfree leftism presvrl leftismXpresvrl ief gdpcapita | |
lincom _b[presvrl] + _b[leftismXpresvrl]*0 | |
lincom _b[presvrl] + _b[leftismXpresvrl]*1 | |
lincom _b[presvrl] + _b[leftismXpresvrl]*2 | |
lincom _b[presvrl] + _b[leftismXpresvrl]*3 | |
lincom _b[presvrl] + _b[leftismXpresvrl]*4 | |
lincom _b[presvrl] + _b[leftismXpresvrl]*5 | |
lincom _b[presvrl] + _b[leftismXpresvrl]*6 | |
lincom _b[presvrl] + _b[leftismXpresvrl]*7 | |
lincom _b[presvrl] + _b[leftismXpresvrl]*8 | |
lincom _b[presvrl] + _b[leftismXpresvrl]*9 | |
lincom _b[presvrl] + _b[leftismXpresvrl]*10 | |
lincom _b[presvrl] + _b[leftismXpresvrl]*11 | |
lincom _b[presvrl] + _b[leftismXpresvrl]*12 | |
lincom _b[presvrl] + _b[leftismXpresvrl]*13 | |
lincom _b[presvrl] + _b[leftismXpresvrl]*14 | |
lincom _b[presvrl] + _b[leftismXpresvrl]*15 | |
lincom _b[presvrl] + _b[leftismXpresvrl]*16 | |
lincom _b[presvrl] + _b[leftismXpresvrl]*17 | |
lincom _b[presvrl] + _b[leftismXpresvrl]*18 | |
lincom _b[presvrl] + _b[leftismXpresvrl]*19 | |
lincom _b[presvrl] + _b[leftismXpresvrl]*20 | |
* economic subcomponent | |
xtscc econfree leftism presvrl leftismXpresvrl ief gdpcapita | |
lincom _b[presvrl] + _b[leftismXpresvrl]*0 | |
lincom _b[presvrl] + _b[leftismXpresvrl]*1 | |
lincom _b[presvrl] + _b[leftismXpresvrl]*2 | |
lincom _b[presvrl] + _b[leftismXpresvrl]*3 | |
lincom _b[presvrl] + _b[leftismXpresvrl]*4 | |
lincom _b[presvrl] + _b[leftismXpresvrl]*5 | |
lincom _b[presvrl] + _b[leftismXpresvrl]*6 | |
lincom _b[presvrl] + _b[leftismXpresvrl]*7 | |
lincom _b[presvrl] + _b[leftismXpresvrl]*8 | |
lincom _b[presvrl] + _b[leftismXpresvrl]*9 | |
lincom _b[presvrl] + _b[leftismXpresvrl]*10 | |
lincom _b[presvrl] + _b[leftismXpresvrl]*11 | |
lincom _b[presvrl] + _b[leftismXpresvrl]*12 | |
lincom _b[presvrl] + _b[leftismXpresvrl]*13 | |
lincom _b[presvrl] + _b[leftismXpresvrl]*14 | |
lincom _b[presvrl] + _b[leftismXpresvrl]*15 | |
lincom _b[presvrl] + _b[leftismXpresvrl]*16 | |
lincom _b[presvrl] + _b[leftismXpresvrl]*17 | |
lincom _b[presvrl] + _b[leftismXpresvrl]*18 | |
lincom _b[presvrl] + _b[leftismXpresvrl]*19 | |
lincom _b[presvrl] + _b[leftismXpresvrl]*20 | |
* Disaggregating economic freedom (and rechecking the interaction) | |
xtscc pressfree leftism presvrl leftismXpresvrl business trade fiscal financial property investment gdpcapita | |
lincom _b[presvrl] + _b[leftismXpresvrl]*0 | |
lincom _b[presvrl] + _b[leftismXpresvrl]*1 | |
lincom _b[presvrl] + _b[leftismXpresvrl]*2 | |
lincom _b[presvrl] + _b[leftismXpresvrl]*3 | |
lincom _b[presvrl] + _b[leftismXpresvrl]*4 | |
lincom _b[presvrl] + _b[leftismXpresvrl]*5 | |
lincom _b[presvrl] + _b[leftismXpresvrl]*6 | |
lincom _b[presvrl] + _b[leftismXpresvrl]*7 | |
lincom _b[presvrl] + _b[leftismXpresvrl]*8 | |
lincom _b[presvrl] + _b[leftismXpresvrl]*9 | |
lincom _b[presvrl] + _b[leftismXpresvrl]*10 | |
lincom _b[presvrl] + _b[leftismXpresvrl]*11 | |
lincom _b[presvrl] + _b[leftismXpresvrl]*12 | |
lincom _b[presvrl] + _b[leftismXpresvrl]*13 | |
lincom _b[presvrl] + _b[leftismXpresvrl]*14 | |
lincom _b[presvrl] + _b[leftismXpresvrl]*15 | |
lincom _b[presvrl] + _b[leftismXpresvrl]*16 | |
lincom _b[presvrl] + _b[leftismXpresvrl]*17 | |
lincom _b[presvrl] + _b[leftismXpresvrl]*18 | |
lincom _b[presvrl] + _b[leftismXpresvrl]*19 | |
lincom _b[presvrl] + _b[leftismXpresvrl]*20 |
Sign up for free
to join this conversation on GitHub.
Already have an account?
Sign in to comment