* ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~; /* * Feb. 2, 2001. October 9, 2001. Done using STATA jpub.do This does regressions for the Japanese public law paper in APSR in 2001 by Mark Ramseyer and Eric Rasmusen. In the book, this is in Chapter 4, Political Disputes . */ * ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~; #delimit ; * This says that the semicolon denotes the end of a line of command. All lines must end with semicolons after this; set more 1; *This should stop the pauses; *To keep going regradless of errors, use DO mYFILE, nostop; clear; display "$S_TIME $S_DATE"; * ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~; log using jpub.log, replace; * ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~; *Table 4.3 in the book, Article 9 self defense force; clear; *this clears out any dataset currently in use.; use army1.dta; * ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~--; tobit PostBO Unc1 PreBO Snrity Flunk EliteU FstTok OpYr YJL Fukushim Shishido Nakayama, ll(0) ul(1); mfx compute, predict(ystar(0, 1)) at(median); tobit PostAlGd Unc1 PreAllGd Snrity Flunk EliteU FstTok OpYr YJL Fukushim Shishido Nakayama, ll(0) ul(1); mfx compute, predict(ystar(0, 1)) at(median); * ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~; *Table 4.4 in the book, malaportionment; clear; *this clears out any dataset currently in use.; use malap2.dta; /* LIST OF VARIABLES IN THE DATASET: Date JudgeID LocIlleg NatIll Pr73NI Pt74NI Pr83NI Pt84NI AnyIlleg Pt84Ill Pr83Ill Pt74Ill Pr73Ill NLegR NIllegR LocLegR LocIllR Snrty Sn13Sq YJL Flunk FtTok EliteU Mori Naito Tasaka Takagi Nara Shinoda Dozono Ikeda OpYr PreBO PreSok PreChJ PreOthA PostBO PostSok PostChJ PostOthA PreGd PostGd */ tobit PostBO Pr73NI Pt74NI PreBO Snrty Flunk EliteU FtTok OpYr YJL Mori Naito Tasaka Takagi Nara Shinoda Dozono Ikeda, ll(0) ul(1); mfx compute, predict(ystar(0, 1)) at(median); tobit PostGd Pr73NI Pt74NI PreGd Snrty Flunk EliteU FtTok OpYr YJL Mori Naito Tasaka Takagi Nara Shinoda Dozono Ikeda, ll(0) ul(1); mfx compute, predict(ystar(0, 1)) at(median); tobit PostBO Pr83NI Pt84NI PreBO Snrty Flunk EliteU FtTok OpYr YJL Mori Naito Tasaka Takagi Nara Shinoda Dozono Ikeda, ll(0) ul(1); mfx compute, predict(ystar(0, 1)) at(median); tobit PostGd Pr83NI Pt84NI PreGd Snrty Flunk EliteU FtTok OpYr YJL Mori Naito Tasaka Takagi Nara Shinoda Dozono Ikeda, ll(0) ul(1); mfx compute, predict(ystar(0, 1)) at(median); tobit PostBO NLegR NIllegR PreBO Snrty Flunk EliteU FtTok OpYr YJL Mori Naito Tasaka Takagi Nara Shinoda Dozono Ikeda, ll(0) ul(1); mfx compute, predict(ystar(0, 1)) at(median); tobit PostGd NLegR NIllegR PreGd Snrty Flunk EliteU FtTok OpYr YJL Mori Naito Tasaka Takagi Nara Shinoda Dozono Ikeda, ll(0) ul(1); mfx compute, predict(ystar(0, 1)) at(median); * ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~--; * Table 4.7 in yteh book, injunctions; clear; *this clears out any dataset currently in use.; use injunc3.dta; /* LIST OF VARIABLES IN THE DATASET: yjl fsttok eliteu flunks senior prebo pregood opyear postbo postgood noinj Inj1 PM1 YNtn NNtn YLoc NLoc YND NND YLD NLD PreBench year PreOp */ tobit postbo YNtn NNtn YLoc NLoc prebo senior flunks eliteu fsttok opyear yjl, ll(0) ul(1); mfx compute, predict(ystar(0, 1)) at(median); tobit postgood YNtn NNtn YLoc NLoc pregood senior flunks eliteu fsttok opyear yjl, ll(0) ul(1); mfx compute, predict(ystar(0, 1)) at(median); * ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~--; * Chapter 3 (?) in the book, sokatsu; *The sokatsu regressions are in the APSR article too; clear; *this clears out any dataset currently in use.; use sokatsu4.dta; /* LIST OF VARIABLES IN THE DATASET: IDNo. name yjl eliteu flunk Yr2Sok Y2S_Cor Fail FstTok sex FstBO a1959 a1960 a1961 a1962 a1963 a1964 a1965 a1966 a1967 */ regress Y2S_Cor yjl FstTok flunk eliteu a1959 a1960 a1961 a1962 a1963 a1964 a1965 a1966 a1967; * ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~--; *table 4.9 in the book, prominent opinions; *The prominent opinions are not the inpublihed version in APSR; *They are inthe working paper, though; /* This is to test for high court but not Supreem Court reversals. The base category is an Affirmed-Affirmed commercial prominent case, the most common single category of the 8 categories. A constitutional case might be Affirmed-Affirmed, which is AAconst=1 . Or, it might be Reversed-affirmed, which is RAconst=1. Or,it might be affirme and then reversed, which is ArConst=1. Or it might be reversed at both stages-- whcih is RRconst=1. A commercial cawe might be Affirmed-Affirmed--that is the base category. Or, it might be Reversed-affirmed, which is RAcom=1. Or, RRcom=1 or ARcom=1. Note that SHimo and Sakurai are perfectly colinear-- perhaps on the smae panel laways. The smae goes for Okino, Sato and Muto. So we omit all but one of each group in the next regressions. All we need are the next two regressions in the paper, which I will therefore label as 8.1 and 8.2. */ clear; *this clears out any dataset currently in use.; use jprom.dta; generate AA=0; replace AA= 1 if (RR==0 & AR==0 & RA ==0); generate AAconst=AA*Const1; generate RRconst=RR*Const1; generate ARconst=AR*Const1; generate RAconst=RA*Const1; generate comm=- (Const1-1); generate AAcomm=AA*comm; generate RRcom =RR*comm; generate ARcom =AR*comm; generate RAcom=RA*comm; summarize yjl fsttok eliteu flunks senior prebo pregood opyear Const1 AAconst RRconst ARconst RAconst comm AAcom RRcom ARcom RAcom Shimo Sakurai Okino Sato Muto; *REGRESSION 8.1; tobit postbo AAconst RAconst ARconst RRconst RAcom ARcom RRcom prebo senior flunks eliteu fsttok opyear yjl Shimo Okino, ll(0) ul(1); mfx compute, predict(ystar(0, 1)) at(median); *REGRESSION 8.2 ; tobit postgood AAconst RAconst ARconst RRconst RAcom ARcom RRcom pregood senior flunks eliteu fsttok opyear yjl Shimo Okino, ll(0) ul(1); mfx compute, predict(ystar(0, 1)) at(median); * ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~--; log close; * ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~--; clear; * ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~--;