svyset caseid [pw= weight]
bysort year: sum outofstate donor climate2 district_count minority female dpres  xxxx_polscore2 rescaled_familyincome ideo5 guncontrol2 abortion_both2 new_affirmact cuts2 teapty_scale_positive donation_party0 mismatch99  year2010 year2012 

*Ideology Model with no Primary Explantory Variables
svy, subpop(if donor==1):logit outofstate c.ideo5##c.ideo5 c.district_count i.minority i.female c.dpres  c.xxxx_polscore2 c.rescaled_familyincome i.year2012 
margins, subpop(if donor==1) predict() at(ideo5=(1 2 3 4 5))  post

*Policy Models 
svy, subpop(if donor==1):logit outofstate  i.climate2 c.district_count i.minority i.female c.dpres  c.xxxx_polscore2 c.rescaled_familyincome c.ideo5##c.ideo5 i.year2012 
margins, subpop(if donor==1) predict() at(climate2 = (1 2 3))  post
margins, subpop(if donor==1) predict() at(ideo5=(1 2 3 4 5) climate2 = (1 2 3))  post
marginsplot  

svy, subpop(if donor==1):logit outofstate  i.guncontrol2  c.district_count  i.minority i.female  c.dpres c.xxxx_polscore2 c.rescaled_familyincome c.ideo5##c.ideo5 i.year2012 
margins, subpop(if donor==1) predict() at(guncontrol2=(1 2 3)) post 
margins, subpop(if donor==1) predict() at(guncontrol2=(2)) post gen(j2)

margins, subpop(if donor==1) predict() at(ideo5=(1 2 3 4 5) guncontrol2 = ( 3))  post
marginsplot 

svy, subpop(if donor==1):logit outofstate  i.abortion_both2 c.district_count  i.minority i.female   c.dpres c.xxxx_polscore2 c.rescaled_familyincome  c.ideo5##c.ideo5  i.year2010 i.year2012
margins,subpop(if donor==1) predict() at(ideo5= (1 2 3 4 5) abortion_both3 = (1 2 3)) post 
marginsplot 

svy, subpop(if donor==1):logit outofstate  c.new_affirmact##c.new_affirmact c.district_count i.minority i.female c.dpres c.xxxx_polscore2 c.rescaled_familyincome c.ideo5##c.ideo5 i.year2012 i.year2010
margins,subpop(if donor==1)  predict() at(new_affirmact =(1 2 3 4)) post
marginsplot

*Fiscal Models 
svy, subpop(if donor==1):logit outofstate  i.cuts2 c.district_count   i.minority i.female  c.dpres c.xxxx_polscore2 c.rescaled_familyincome c.ideo5##c.ideo5 i.year2012 i.year2010
margins, subpop(if donor==1)  predict() at(cuts2 = (1 2 3) ideo5= (1 2 3 4 5)) post 
margins, subpop(if donor==1)  predict() at(cuts2 = (1 2 3)) post 
marginsplot 

svy, subpop(if donor==1):logit outofstate  c.teapty_scale_positive c.district_count  i.minority i.female c.dpres c.xxxx_polscore2 c.rescaled_familyincome  c.ideo5##c.ideo5  i.year2012 i.year2010
margins, subpop(if donor==1)  predict()at (teapty_scale_positive = (1 2 3 4 5)) post 
margins,subpop(if donor==1)  dydx (teapty_scale_positive) post 
margins, subpop(if donor==1)  predict()at (ideo5= (4 5) teapty_scale_positive = (1 2 3 4 5)) post 
marginsplot

*Partisan Models 
svy, subpop(if donor==1): logit outofstate i.donation_party0 c.district_count  i.minority i.female    c.dpres c.xxxx_polscore2 c.rescaled_familyincome  c.ideo5##c.ideo5  i.year2012 i.year2010 
margins, subpop(if donor==1)  dydx (donation_party0) post  
margins, subpop(if donor==1)  predict() at(ideo5 = (1 2 3 4 5)donation_party0 = (0 1)) post 
marginsplot 

svy, subpop(if donor==1): logit outofstate i.mismatch99 c.district_count i.minority i.female c.dpres c.xxxx_polscore2 c.rescaled_familyincome c.ideo5##c.ideo5  i.year2012 i.year2010
margins,subpop(if donor==1)  predict() at (ideo5 =(1 2 3 4 5) mismatch99 = (1)) post  
marginsplot
margins, subpop(if donor==1)  dydx (mismatch99) post  
margins,subpop(if donor==1)  predict() at (mismatch99 = (0 1)) post  

svy, subpop(if donor==1):logit outofstate i.donation_party0##donor_D c.district_count i.minority i.female c.dpres c.xxxx_polscore2 c.rescaled_familyincome  c.ideo5##c.ideo5  i.year2012 i.year2010
margins, subpop(if donor==1) predict() at(donation_party0 = (1) donor_D =(0 1))  post


*In-district Contibuting Only Models
svy, subpop(if donor==1):logit indistrictonly  i.climate2 i.minority i.female c.dpres c.district_count  c.xxxx_polscore2 c.rescaled_familyincome c.ideo5##c.ideo5 i.year2012 
svy, subpop(if donor==1):logit indistrictonly  i.guncontrol2 c.district_count i.minority i.female c.dpres c.xxxx_polscore2 c.rescaled_familyincome c.ideo5##c.ideo5 i.year2012 
svy, subpop(if donor==1):logit indistrictonly  i.abortion_both2 c.district_count i.minority i.female c.dpres c.xxxx_polscore2 c.rescaled_familyincome  c.ideo5##c.ideo5  i.year2012 i.year2010
svy, subpop(if donor==1):logit indistrictonly  i.cuts2 c.district_count i.minority i.female c.dpres c.xxxx_polscore2 c.rescaled_familyincome c.ideo5##c.ideo5 i.year2012 i.year2010
svy, subpop(if donor==1):logit indistrictonly  c.new_affirmact##c.new_affirmact c.district_count i.minority i.female c.dpres c.xxxx_polscore2 c.rescaled_familyincome c.ideo5##c.ideo5 i.year2012 i.year2010

*Senate related fiscal policy models (see footnote 9 in paper) 
svy, subpop(if donor==1):logit donation_sen_other0   i.cuts2  i.minority i.female c.dpres c.xxxx_polscore2 c.rescaled_familyincome  c.ideo5##c.ideo5  i.year2012 i.year2010
svy, subpop(if donor==1):logit donation_sen_mine0   i.cuts2  i.minority i.female c.dpres c.xxxx_polscore2 c.rescaled_familyincome  c.ideo5##c.ideo5  i.year2012 i.year2010