set more off
set matsize 800
#delimit; 

log using plra.log, replace;

**Produces results for Piehl and Schlanger?s Determinants of Civil Rights Filings in Federal District Court by Jail and Prison Inmates, Journal of Empirical Legal Studies, March 2004;
**Beau Kilmer & Anne Piehl;
**Final version December 8, 2003;

use plra;

/********* Table 1 *********/

collapse (sum) stfiles pris jail jailquad (mean) circuit, by (st_name year);

replace jail=. if jail==0;

reshape wide stfiles pris jail jailquad, i(st_name) j(year);

gen jailchng=((jail1999-jail1983)/jail1983)*100;
gen prischng=((pris1999-pris1983)/pris1983)*100;
gen pctjail=((jail1999)/(pris1999 + jail1999));

replace prischng=int(prischng);
replace jailchng=int(jailchng);


sort circuit st_name;
l circuit st_name stfiles1983 stfiles1995 stfiles1999 pris1983 pris1999 prischng jail1983 jail1999 jailchng pctjail;

drop _all;


/********* Table 2 *********/

use plra;

gen pctpris=pris/(pris + jailquad);
gen pp96=pctpris*dum96;
gen pppost96=pctpris*post1996;

gen lnstfiles=log(stfiles);
gen totinc=pris+jailquad;

gen lnstpop=ln((stfiles/totinc)*1000);

**Column (1);

reg stfiles jailquad pris jailquad96 pris96 jailquadpost prispost linear1 linear2 dum96 linear3 state1 state3 state5 state6 state10 state11 state13 state14 state15 state16 state18 state19 state21 state22 state23 state25 state26 state29 state30 state31 state32 state33 state34 state36 state37 state38 state39 state41 state44 state45 state47 state48 state50 state4 state17 state20 state24 state27 state28 state35 state42 state43 state49 state51, robust nocons;

test jailquad=pris;
test jailquadpost=prispost;
test jailquadpost prispost;


**Column (2);

nbreg stfiles pctpris pp96 pppost96 linear1 linear2 dum96 linear3 state1 state3 state5 state6 state10 state11 state13 state14 state15 state16 state18 state19 state21 state22 state23 state25 state26 state29 state30 state31 state32 state33 state34 state36 state37 state38 state39 state41 state44 state45 state47 state48 state50 state4 state17 state20 state24 state27 state28 state35 state42 state43 state49 state51, robust nocons exposure(totinc) irr;


**Column (3);

reg lnstpop pctpris pp96 pppost96 linear1 linear2 dum96 linear3 state1 state3 state5 state6 state10 state11 state13 state14 state15 state16 state18 state19 state21 state22 state23 state25 state26 state29 state30 state31 state32 state33 state34 state36 state37 state38 state39 state41 state44 state45 state47 state48 state50 state4 state17 state20 state24 state27 state28 state35 state42 state43 state49 state51, robust nocons;


/********* Table 3 *********/

**Column (1);

reg lnstpop pctpris pp96 pppost96 linear1 linear2 dum96 linear3 state1 state3 state5 state6 state10 state11 state13 state14 state15 state16 state18 state19 state21 state22 state23 state25 state26 state29 state30 state31 state32 state33 state34 state36 state37 state38 state39 state41 state44 state45 state47 state48 state50 state4 state17 state20 state24 state27 state28 state35 state42 state43 state49 state51, robust nocons;



reg lnstpop pctpris pp96 pppost96 linear1 linear2 dum96 linear3 state1 state3 state5 state6 state10 state11 state13 state14 state15 state16 state18 state19 state21 state22 state23 state25 state26 state29 state30 state31 state32 state33 state34 state36 state37 state38 state39 state41 state44 state45 state47 state48 state50 state4 state17 state20 state24 state27 state28 state35 state42 state43 state49 state51 [weight=inmate83], robust nocons;


reg lnstpop pctpris pp96 pppost96 linear1 linear2 dum96 linear3 state1 state3 state5 state6 state10 state11 state13 state14 state15 state16 state18 state19 state21 state22 state23 state25 state26 state29 state30 state31 state32 state33 state34 state36 state37 state38 state39 state41 state44 state45 state47 state48 state50 state4 state17 state20 state24 state27 state28 state35 state42 state43 state49 state51 [weight=inmate83] if state~=1 & state~=19 & state~=44, robust nocons;