

 cd C:\Users\mjaremski\Desktop\Replication\Data\

 use Bank-LevelDataFull.dta, clear

 drop if farms==.

 gen deflator=1

  gen fedmember=0
 replace fedmember=1 if beginyrfedmemb~=. & beginyrfedmemb<=yr
 replace fedmember=1 if type=="national" & yr>1913

 replace riceac1910=0
 replace rice1910=0

gen cropindex1910=cornpriceperbushel*corn1910+barleypriceperbushel*barley1910+flaxseedpriceperbushel*flax1910+oatspriceperbushel*oats1910+wheatpriceperbushel*wheat1910+ryepriceperbushel*rye1910+buckwheatpriceperbushel*buckwh1910+tobaccopriceperpound*tobacco1910+ricepriceperbushel*rice1910+irishpotatoepricebushel*potatoes1910+sweetpotatoepricebushel*swpotato1910+cottonpriceperbale*cotton1910

gen cropindexavgmin=cornpriceperbushelavg*corn1910+barleypriceperbushelavg*barley1910+flaxseedpriceperbushelavg*flax1910+oatspriceperbushelavg*oats1910+wheatpriceperbushelavg*wheat1910+ryepriceperbushelavg*rye1910+buckwheatpriceperbushelavg*buckwh1910+tobaccopriceperpoundavg*tobacco1910+ricepriceperbushelavg*rice1910+irishpotatoepricebushelavg*potatoes1910+sweetpotatoepricebushelavg*swpotato1910+cottonpriceperbaleavg*cotton1910

 gen cropindexavgc=cropindex1910/cropindexavgmin

 gen distart=9999
 replace distart=1908 if state=="OK"
 replace distart=1909 if state=="KS"
 replace distart=1914 if state=="MS"
 replace distart=1916 if state=="SD"
 replace distart=1911 if state=="NE"
 replace distart=1917 if state=="WA"
 replace distart=1909 if state=="TX"
 replace distart=1918 if state=="ND"

 gen DIstateever=0
 replace DIstateever=1 if distart~=9999

 gen DIstate=0
 replace DIstate=1 if distart~=. & yr>=distart

 gen sb=sbanks if statebank==0
 replace sb=sbanks-1 if statebank==1

 gen nb=nbanks if statebank==1
 replace nb=nbanks-1 if statebank==0

 gen pop=ln(totpop+1)
 gen Black=1-whtot/totpop
 gen urban=urb/totpop
 gen Illit=tillit10/t10tot
 gen mout=ln(mfgout/(totpop*deflator)+1)
 gen pyoung=young/totpop
 gen fout=ln(cropval/(farmland*deflator)+1)
 gen fout2=fout^2

 gen loas=(loans/assets)
 gen reserves2=(specieduefrombanks)/assets
 gen capas=(capital+profits)/assets
 gen bondsas=bondsandstocks/assets

 replace assets=ln(assets/(deflator)+1)
 replace loans=ln(loans/(deflator)+1)

 egen gp=group(state bank location)
 egen cgp=group(state countycode)

 egen minyear=min(yr), by(gp)

 gen youngbank=0
 replace youngbank=1 if minyear>=1914

 xtset gp yr, delta(2)

 drop maxyr
 egen maxyr=max(yr), by(gp)

 egen mincap=max(capital), by(gp)
 drop if mincap<=0
 egen maxcapas=max(capas), by(gp)
 drop if maxcapas>0.95
 egen maxreserves=max(reserves2), by(gp)
 drop if maxreserves>.95
 egen minloas=min(loas), by(gp)
 drop if minloas<0.10

 egen mindeposits=min(deposits), by(gp)
 drop if mindeposits<500
 drop if mindeposits==.
 
 egen minfarms=min(farms1910), by(cgp)
 egen minimpac=min(impac1910), by(cgp)
 gen dimp=(impac1920-impac1910)/impac1910

 egen maxurb25=max(urb25), by(gp)
 drop if maxurb25>0

 egen maxurb=max(urb), by(gp)
 drop if maxurb>25000
 drop if minfarms<250
 drop if minimpac<15000

 gen DIstatebank=0
 replace DIstatebank=1 if DIstate==1 & statebank==1
 replace DIstatebank=0 if state=="KS" & dimember==0

 gen DIstatebankint=0
 replace DIstatebankint=cropindexavgc if DIstatebank==1 

 gen lnage=ln((yr-minyear)/2+1)

 gen fedcrop=0
 replace fedcrop=cropindexavgc if fedmember==1
 
 gen dldum=0
 replace dldum=DL1910
 replace dldum=1 if state=="MS" & yr>=1914
 replace dldum=1 if state=="OH" & yr>=1911

 gen dlint=0
 replace dlint=cropindexavgc if DL1910==1
 replace dlint=cropindexavgc if state=="MS" & yr>=1914
 replace dlint=cropindexavgc if state=="OH" & yr>=1911

 gen mincapdum=0
 replace mincapdum=1 if mincap1910>10
 replace mincapdum=1 if state=="SD" & yr>1914
 replace mincapdum=0 if state=="IL" & yr>1918

 gen mincapint=0
 replace mincapint=cropindexavgc if mincap1910>10
 replace mincapint=cropindexavgc if state=="SD" & yr>1914
 replace mincapint=0 if state=="IL" & yr>1918

 gen DIcrop=0
 replace DIcrop=cropindexavgc if DIstate==1

 gen sDIcrop=0
 replace sDIcrop=cropindexavgc if statebank==1 & DIstatebank==1

 gen dum1918=0
 replace dum1918=cropindexavgc if yr==1918

 gen ycropindexavgc=0
 replace ycropindexavgc=cropindexavgc if youngbank==1


**********Generates Table 2 
 preserve
 drop if statebank==0

  xi: xtreg assets cropindexavgc dum1918 pop mout Black urban pyoung Illit sb nb lnage dldum mincapdum DIstate fedmember i.yr, fe cluster(cgp)
  estimates store w1

  xi: xtreg assets cropindexavgc ycropindexavgc dum1918 pop mout Black urban pyoung Illit sb nb lnage dldum mincapdum DIstate fedmember i.yr, fe cluster(cgp)
 estimates store w2

  xi: xtreg assets cropindexavgc ycropindexavgc dum1918 pop mout Black urban pyoung Illit sb nb lnage fedmember fedcrop dlint mincapint sDIcrop dldum mincapdum DIstate fedmember i.yr, fe cluster(cgp)
  estimates store w3

  xi: xtreg loans cropindexavgc dum1918 pop mout Black urban pyoung Illit sb nb lnage dldum mincapdum DIstate fedmember i.yr, fe cluster(cgp)
 estimates store w4

  xi: xtreg loans cropindexavgc ycropindexavgc dum1918 pop mout Black urban pyoung Illit sb nb lnage dldum mincapdum DIstate fedmember i.yr, fe cluster(cgp)
 estimates store w5

  xi: xtreg loans cropindexavgc ycropindexavgc dum1918 pop mout Black urban pyoung Illit sb nb lnage fedmember fedcrop dlint mincapint sDIcrop dldum mincapdum DIstate fedmember i.yr, fe cluster(cgp)
 estimates store w6

  xi: xtreg loas cropindexavgc dum1918 pop mout Black urban pyoung Illit sb nb lnage dldum mincapdum DIstate fedmember i.yr, fe cluster(cgp)
 estimates store w7

  xi: xtreg loas cropindexavgc ycropindexavgc dum1918 pop mout Black urban pyoung Illit sb nb lnage dldum mincapdum DIstate fedmember i.yr, fe cluster(cgp)
 estimates store w8

  xi: xtreg loas cropindexavgc ycropindexavgc dum1918 pop mout Black urban pyoung Illit sb nb lnage fedmember fedcrop dlint mincapint sDIcrop dldum mincapdum DIstate fedmember i.yr, fe cluster(cgp)
 estimates store w9

  xi: xtreg capas cropindexavgc dum1918 pop mout Black urban pyoung Illit sb nb lnage dldum mincapdum DIstate fedmember i.yr, fe cluster(cgp)
 estimates store w10

  xi: xtreg capas cropindexavgc ycropindexavgc dum1918 pop mout Black urban pyoung Illit sb nb lnage dldum mincapdum DIstate fedmember i.yr, fe cluster(cgp)
 estimates store w11

  xi: xtreg capas cropindexavgc ycropindexavgc dum1918 pop mout Black urban pyoung Illit sb nb lnage fedmember fedcrop dlint mincapint sDIcrop dldum mincapdum DIstate fedmember i.yr, fe cluster(cgp)
 estimates store w12

  xi: xtreg reserves2 cropindexavgc dum1918 pop mout Black urban pyoung Illit sb nb lnage dldum mincapdum DIstate fedmember i.yr, fe cluster(cgp)
 estimates store w13

  xi: xtreg reserves2 cropindexavgc ycropindexavgc dum1918 pop mout Black urban pyoung Illit sb nb lnage dldum mincapdum DIstate fedmember i.yr, fe cluster(cgp)
 estimates store w14

  xi: xtreg reserves2 cropindexavgc ycropindexavgc dum1918 pop mout Black urban pyoung Illit sb nb lnage fedmember fedcrop dlint mincapint sDIcrop dldum mincapdum DIstate fedmember i.yr, fe cluster(cgp)
 estimates store w15

  xi: xtreg bondsas cropindexavgc dum1918 pop mout Black urban pyoung Illit sb nb lnage dldum mincapdum DIstate fedmember i.yr, fe cluster(cgp)
 estimates store w16

  xi: xtreg bondsas cropindexavgc ycropindexavgc dum1918 pop mout Black urban pyoung Illit sb nb lnage dldum mincapdum DIstate fedmember i.yr, fe cluster(cgp)
 estimates store w17

  xi: xtreg bondsas cropindexavgc ycropindexavgc dum1918 pop mout Black urban pyoung Illit sb nb lnage fedmember fedcrop dlint mincapint sDIcrop dldum mincapdum DIstate i.yr, fe cluster(cgp)
 estimates store w18

 esttab w1 w2 w3 w4 w5 w6 w7 w8 w9 w10 w11 w12 w13 w14 w15 w16 w17 w18 using "Table2.csv", b(3) se(3) replace  margin r2 starlevels(* 0.10 ** 0.05 *** 0.01) brackets label title("Table ?: ") wrap order(cropindexavgc ycropindexavgc fedcrop dlint mincapint sDIcrop dum1918 pop urban Black mout sb nb)


**********Generates Table 3 
 restore
 preserve

  drop if statebank==1

  xi: xtreg assets cropindexavgc dum1918 pop mout Black urban pyoung Illit sb nb lnage dldum mincapdum DIstate i.yr, fe cluster(cgp)
  estimates store t1

  xi: xtreg assets cropindexavgc ycropindexavgc dum1918 pop mout Black urban pyoung Illit sb nb lnage dldum mincapdum DIstate i.yr, fe cluster(cgp)
 estimates store t2

  xi: xtreg assets cropindexavgc ycropindexavgc dum1918 pop mout Black urban pyoung Illit sb nb lnage fedcrop dlint mincapint dldum mincapdum DIcrop DIstate i.yr, fe cluster(cgp)
 estimates store t3

  xi: xtreg loans cropindexavgc dum1918 pop mout Black urban pyoung Illit sb nb lnage dldum mincapdum DIstate i.yr, fe cluster(cgp)
 estimates store t4

  xi: xtreg loans cropindexavgc ycropindexavgc dum1918 pop mout Black urban pyoung Illit sb nb lnage dldum mincapdum DIstate i.yr, fe cluster(cgp)
 estimates store t5

  xi: xtreg loans cropindexavgc ycropindexavgc dum1918 pop mout Black urban pyoung Illit sb nb lnage fedcrop dlint mincapint dldum mincapdum DIcrop DIstate i.yr, fe cluster(cgp)
 estimates store t6

  xi: xtreg loas cropindexavgc dum1918 pop mout Black urban pyoung Illit sb nb lnage dldum mincapdum DIstate i.yr, fe cluster(cgp)
 estimates store t7

  xi: xtreg loas cropindexavgc ycropindexavgc dum1918 pop mout Black urban pyoung Illit sb nb lnage dldum mincapdum DIstate i.yr, fe cluster(cgp)
 estimates store t8

  xi: xtreg loas cropindexavgc ycropindexavgc dum1918 pop mout Black urban pyoung Illit sb nb lnage fedcrop dlint mincapint dldum mincapdum DIcrop DIstate i.yr, fe cluster(cgp)
 estimates store t9

  xi: xtreg capas cropindexavgc dum1918 pop mout Black urban pyoung Illit sb nb lnage dldum mincapdum DIstate i.yr, fe cluster(cgp)
 estimates store t10

  xi: xtreg capas cropindexavgc ycropindexavgc dum1918 pop mout Black urban pyoung Illit sb nb lnage dldum mincapdum DIstate i.yr, fe cluster(cgp)
 estimates store t11

  xi: xtreg capas cropindexavgc ycropindexavgc dum1918 pop mout Black urban pyoung Illit sb nb lnage fedcrop dlint mincapint dldum mincapdum DIcrop DIstate i.yr, fe cluster(cgp)
 estimates store t12

  xi: xtreg reserves2 cropindexavgc dum1918 pop mout Black urban pyoung Illit sb nb lnage dldum mincapdum DIstate i.yr, fe cluster(cgp)
 estimates store t13

  xi: xtreg reserves2 cropindexavgc ycropindexavgc dum1918 pop mout Black urban pyoung Illit sb nb lnage dldum mincapdum DIstate i.yr, fe cluster(cgp)
 estimates store t14

  xi: xtreg reserves2 cropindexavgc ycropindexavgc dum1918 pop mout Black urban pyoung Illit sb nb lnage fedcrop dlint mincapint dldum mincapdum DIcrop DIstate i.yr, fe cluster(cgp)
 estimates store t15

  xi: xtreg bondsas cropindexavgc dum1918 pop mout Black urban pyoung Illit sb nb lnage dldum mincapdum DIstate i.yr, fe cluster(cgp)
 estimates store t16

  xi: xtreg bondsas cropindexavgc ycropindexavgc dum1918 pop mout Black urban pyoung Illit sb nb lnage dldum mincapdum DIstate i.yr, fe cluster(cgp)
 estimates store t17

  xi: xtreg bondsas cropindexavgc ycropindexavgc dum1918 pop mout Black urban pyoung Illit sb nb lnage dlint mincapint fedcrop dldum mincapdum DIcrop DIstate i.yr, fe cluster(cgp)
 estimates store t18

 esttab t1 t2 t3 t4 t5 t6 t7 t8 t9 t10 t11 t12 t13 t14 t15 t16 t17 t18 using "Table3.csv", b(3) se(3) replace  margin r2 starlevels(* 0.10 ** 0.05 *** 0.01) brackets label title("Table ?: ") wrap order(cropindexavgc ycropindexavgc fedcrop dlint mincapint DIcrop dum1918 pop urban Black mout sb nb)



***********Generates Table A.7
 restore
 preserve

 keep if yr==1914 | yr==1920
 bysort gp: gen obs=_N
 keep if obs==2
 xtset gp yr, delta(6)
 drop if minyr>1913
 drop if statebank==0

 gen dcropindexavgc=cropindex1914_19 

  xi: reg D.assets dcropindexavgc pop mout Black urban pyoung Illit sb nb lnage i.state i.district, cluster(cgp)
 estimates store w1

  xi: reg D.loans dcropindexavgc pop mout Black urban pyoung Illit sb nb lnage i.state i.district, cluster(cgp)
 estimates store w2

  xi: reg D.loas dcropindexavgc pop mout Black urban pyoung Illit sb nb lnage i.state i.district, cluster(cgp)
 estimates store w3

  xi: reg D.capas dcropindexavgc pop mout Black urban pyoung Illit sb nb lnage i.state i.district, cluster(cgp)
 estimates store w4

  xi: reg D.reserves2 dcropindexavgc pop mout Black urban pyoung Illit sb nb lnage i.state i.district, cluster(cgp)
 estimates store w5

  xi: reg D.bondsas dcropindexavgc pop mout Black urban pyoung Illit sb nb lnage i.state i.district, cluster(cgp)
 estimates store w6

 restore
 preserve

 keep if yr==1914 | yr==1920
 bysort gp: gen obs=_N
 keep if obs==2
 xtset gp yr, delta(6)
 drop if minyr>1913
 drop if statebank==1

 gen dcropindexavgc=cropindex1914_19 

  xi: reg D.assets dcropindexavgc pop mout Black urban pyoung Illit sb nb lnage i.state i.district, cluster(cgp)
 estimates store c1

  xi: reg D.loans dcropindexavgc pop mout Black urban pyoung Illit sb nb lnage i.state i.district, cluster(cgp)
 estimates store c2

  xi: reg D.loas dcropindexavgc pop mout Black urban pyoung Illit sb nb lnage i.state i.district, cluster(cgp)
 estimates store c3

  xi: reg D.capas dcropindexavgc pop mout Black urban pyoung Illit sb nb lnage i.state i.district, cluster(cgp)
 estimates store c4

  xi: reg D.reserves2 dcropindexavgc pop mout Black urban pyoung Illit sb nb lnage i.state i.district, cluster(cgp)
 estimates store c5

  xi: reg D.bondsas dcropindexavgc pop mout Black urban pyoung Illit sb nb lnage i.state i.district, cluster(cgp)
 estimates store c6

 esttab w1 c1 w2 c2 w3 c3 w4 c4 w5 c5 w6 c6 using "TableA7.csv", b(3) se(3) replace  margin r2 starlevels(* 0.10 ** 0.05 *** 0.01) brackets label title("Table ?: ") wrap order(dcropindexavgc pop urban Black mout sb nb)

 
***********Generates Table A.8
 restore
 preserve
 drop if statebank==0

  xi: xtregar assets cropindexavgc dum1918 pop mout Black urban pyoung Illit sb nb lnage dldum mincapdum DIstate fedmember i.yr, fe 
  estimates store w1

  xi: xtregar assets cropindexavgc ycropindexavgc dum1918 pop mout Black urban pyoung Illit sb nb lnage dldum mincapdum DIstate fedmember i.yr, fe 
 estimates store w2

  xi: xtregar assets cropindexavgc ycropindexavgc dum1918 pop mout Black urban pyoung Illit sb nb lnage fedmember fedcrop dlint mincapint sDIcrop dldum mincapdum DIstate fedmember i.yr, fe 
  estimates store w3

  xi: xtregar loans cropindexavgc dum1918 pop mout Black urban pyoung Illit sb nb lnage dldum mincapdum DIstate fedmember i.yr, fe 
 estimates store w4

  xi: xtregar loans cropindexavgc ycropindexavgc dum1918 pop mout Black urban pyoung Illit sb nb lnage dldum mincapdum DIstate fedmember i.yr, fe 
 estimates store w5

  xi: xtregar loans cropindexavgc ycropindexavgc dum1918 pop mout Black urban pyoung Illit sb nb lnage fedmember fedcrop dlint mincapint sDIcrop dldum mincapdum DIstate fedmember i.yr, fe 
 estimates store w6

  xi: xtregar loas cropindexavgc dum1918 pop mout Black urban pyoung Illit sb nb lnage dldum mincapdum DIstate fedmember i.yr, fe 
 estimates store w7

  xi: xtregar loas cropindexavgc ycropindexavgc dum1918 pop mout Black urban pyoung Illit sb nb lnage dldum mincapdum DIstate fedmember i.yr, fe 
 estimates store w8

  xi: xtregar loas cropindexavgc ycropindexavgc dum1918 pop mout Black urban pyoung Illit sb nb lnage fedmember fedcrop dlint mincapint sDIcrop dldum mincapdum DIstate fedmember i.yr, fe 
 estimates store w9

  xi: xtregar capas cropindexavgc dum1918 pop mout Black urban pyoung Illit sb nb lnage dldum mincapdum DIstate fedmember i.yr, fe 
 estimates store w10

  xi: xtregar capas cropindexavgc ycropindexavgc dum1918 pop mout Black urban pyoung Illit sb nb lnage dldum mincapdum DIstate fedmember i.yr, fe 
 estimates store w11

  xi: xtregar capas cropindexavgc ycropindexavgc dum1918 pop mout Black urban pyoung Illit sb nb lnage fedmember fedcrop dlint mincapint sDIcrop dldum mincapdum DIstate fedmember i.yr, fe 
 estimates store w12

  xi: xtregar reserves2 cropindexavgc dum1918 pop mout Black urban pyoung Illit sb nb lnage dldum mincapdum DIstate fedmember i.yr, fe 
 estimates store w13

  xi: xtregar reserves2 cropindexavgc ycropindexavgc dum1918 pop mout Black urban pyoung Illit sb nb lnage dldum mincapdum DIstate fedmember i.yr, fe 
 estimates store w14

  xi: xtregar reserves2 cropindexavgc ycropindexavgc dum1918 pop mout Black urban pyoung Illit sb nb lnage fedmember fedcrop dlint mincapint sDIcrop dldum mincapdum DIstate fedmember i.yr, fe 
 estimates store w15

  xi: xtregar bondsas cropindexavgc dum1918 pop mout Black urban pyoung Illit sb nb lnage dldum mincapdum DIstate fedmember i.yr, fe 
 estimates store w16

  xi: xtregar bondsas cropindexavgc ycropindexavgc dum1918 pop mout Black urban pyoung Illit sb nb lnage dldum mincapdum DIstate fedmember i.yr, fe 
 estimates store w17

  xi: xtregar bondsas cropindexavgc ycropindexavgc dum1918 pop mout Black urban pyoung Illit sb nb lnage fedmember fedcrop dlint mincapint sDIcrop dldum mincapdum DIstate i.yr, fe 
 estimates store w18 

 esttab w1 w2 w3 w4 w5 w6 w7 w8 w9 w10 w11 w12 w13 w14 w15 w16 w17 w18 using "TableA8.csv", b(3) se(3) replace  margin r2 starlevels(* 0.10 ** 0.05 *** 0.01) brackets label title("Table ?: ") wrap order(cropindexavgc ycropindexavgc fedcrop dlint mincapint sDIcrop dum1918 pop urban Black mout sb nb)


************Generates Table A.9
 restore
 preserve

 drop if statebank==1

  xi: xtregar assets cropindexavgc dum1918 pop mout Black urban pyoung Illit sb nb lnage dldum mincapdum DIstate i.yr, fe 
  estimates store t1

  xi: xtregar assets cropindexavgc ycropindexavgc dum1918 pop mout Black urban pyoung Illit sb nb lnage dldum mincapdum DIstate i.yr, fe 
 estimates store t2

  xi: xtregar assets cropindexavgc ycropindexavgc dum1918 pop mout Black urban pyoung Illit sb nb lnage fedcrop dlint mincapint dldum mincapdum DIcrop DIstate i.yr, fe 
 estimates store t3

  xi: xtregar loans cropindexavgc dum1918 pop mout Black urban pyoung Illit sb nb lnage dldum mincapdum DIstate i.yr, fe 
 estimates store t4

  xi: xtregar loans cropindexavgc ycropindexavgc dum1918 pop mout Black urban pyoung Illit sb nb lnage dldum mincapdum DIstate i.yr, fe 
 estimates store t5

  xi: xtregar loans cropindexavgc ycropindexavgc dum1918 pop mout Black urban pyoung Illit sb nb lnage fedcrop dlint mincapint dldum mincapdum DIcrop DIstate i.yr, fe 
 estimates store t6

  xi: xtregar loas cropindexavgc dum1918 pop mout Black urban pyoung Illit sb nb lnage dldum mincapdum DIstate i.yr, fe 
 estimates store t7

  xi: xtregar loas cropindexavgc ycropindexavgc dum1918 pop mout Black urban pyoung Illit sb nb lnage dldum mincapdum DIstate i.yr, fe 
 estimates store t8

  xi: xtregar loas cropindexavgc ycropindexavgc dum1918 pop mout Black urban pyoung Illit sb nb lnage fedcrop dlint mincapint dldum mincapdum DIcrop DIstate i.yr, fe 
 estimates store t9

  xi: xtregar capas cropindexavgc dum1918 pop mout Black urban pyoung Illit sb nb lnage dldum mincapdum DIstate i.yr, fe 
 estimates store t10

  xi: xtregar capas cropindexavgc ycropindexavgc dum1918 pop mout Black urban pyoung Illit sb nb lnage dldum mincapdum DIstate i.yr, fe 
 estimates store t11

  xi: xtregar capas cropindexavgc ycropindexavgc dum1918 pop mout Black urban pyoung Illit sb nb lnage fedcrop dlint mincapint dldum mincapdum DIcrop DIstate i.yr, fe 
 estimates store t12

  xi: xtregar reserves2 cropindexavgc dum1918 pop mout Black urban pyoung Illit sb nb lnage dldum mincapdum DIstate i.yr, fe 
 estimates store t13

  xi: xtregar reserves2 cropindexavgc ycropindexavgc dum1918 pop mout Black urban pyoung Illit sb nb lnage dldum mincapdum DIstate i.yr, fe 
 estimates store t14

  xi: xtregar reserves2 cropindexavgc ycropindexavgc dum1918 pop mout Black urban pyoung Illit sb nb lnage fedcrop dlint mincapint dldum mincapdum DIcrop DIstate i.yr, fe 
 estimates store t15

  xi: xtregar bondsas cropindexavgc dum1918 pop mout Black urban pyoung Illit sb nb lnage dldum mincapdum DIstate i.yr, fe 
 estimates store t16

  xi: xtregar bondsas cropindexavgc ycropindexavgc dum1918 pop mout Black urban pyoung Illit sb nb lnage dldum mincapdum DIstate i.yr, fe 
 estimates store t17

  xi: xtregar bondsas cropindexavgc ycropindexavgc dum1918 pop mout Black urban pyoung Illit sb nb lnage dlint mincapint fedcrop dldum mincapdum DIcrop DIstate i.yr, fe 
 estimates store t18

 esttab t1 t2 t3 t4 t5 t6 t7 t8 t9 t10 t11 t12 t13 t14 t15 t16 t17 t18 using "TableA9.csv", b(3) se(3) replace  margin r2 starlevels(* 0.10 ** 0.05 *** 0.01) brackets label title("Table ?: ") wrap order(cropindexavgc ycropindexavgc fedcrop dlint mincapint DIcrop dum1918 pop urban Black mout sb nb)


***********Generates Table A.10
 restore
 preserve
 drop if statebank==0

  xi: xtreg loas cropindexavgc ycropindexavgc dum1918 pop L.assets mout Black urban pyoung Illit sb nb lnage dldum mincapdum DIstate fedmember i.yr, fe cluster(cgp)
 estimates store w1

  xi: xtreg loas cropindexavgc ycropindexavgc dum1918 pop L.assets mout Black urban pyoung Illit sb nb lnage fedmember fedcrop dlint mincapint sDIcrop dldum mincapdum DIstate fedmember i.yr, fe cluster(cgp)
 estimates store w2

  xi: xtreg capas cropindexavgc ycropindexavgc dum1918 pop L.assets mout Black urban pyoung Illit sb nb lnage dldum mincapdum DIstate fedmember i.yr, fe cluster(cgp)
 estimates store w3

  xi: xtreg capas cropindexavgc ycropindexavgc dum1918 pop L.assets mout Black urban pyoung Illit sb nb lnage fedmember fedcrop dlint mincapint sDIcrop dldum mincapdum DIstate fedmember i.yr, fe cluster(cgp)
 estimates store w4

  xi: xtreg reserves2 cropindexavgc ycropindexavgc dum1918 pop L.assets mout Black urban pyoung Illit sb nb lnage dldum mincapdum DIstate fedmember i.yr, fe cluster(cgp)
 estimates store w5

  xi: xtreg reserves2 cropindexavgc ycropindexavgc dum1918 pop L.assets mout Black urban pyoung Illit sb nb lnage fedmember fedcrop dlint mincapint sDIcrop dldum mincapdum DIstate fedmember i.yr, fe cluster(cgp)
 estimates store w6

  xi: xtreg bondsas cropindexavgc ycropindexavgc dum1918 pop L.assets mout Black urban pyoung Illit sb nb lnage dldum mincapdum DIstate fedmember i.yr, fe cluster(cgp)
 estimates store w7

  xi: xtreg bondsas cropindexavgc ycropindexavgc dum1918 pop L.assets mout Black urban pyoung Illit sb nb lnage fedmember fedcrop dlint mincapint sDIcrop dldum mincapdum DIstate i.yr, fe cluster(cgp)
 estimates store w8

 restore
 preserve
 drop if statebank==1

  xi: xtreg loas cropindexavgc ycropindexavgc dum1918 pop L.assets mout Black urban pyoung Illit sb nb lnage dldum mincapdum DIstate i.yr, fe cluster(cgp)
 estimates store w9

  xi: xtreg loas cropindexavgc ycropindexavgc dum1918 pop L.assets mout Black urban pyoung Illit sb nb lnage fedcrop dlint mincapint dldum mincapdum DIcrop DIstate i.yr, fe cluster(cgp)
 estimates store w10

  xi: xtreg capas cropindexavgc ycropindexavgc dum1918 pop L.assets mout Black urban pyoung Illit sb nb lnage dldum mincapdum DIstate i.yr, fe cluster(cgp)
 estimates store w11

  xi: xtreg capas cropindexavgc ycropindexavgc dum1918 pop L.assets mout Black urban pyoung Illit sb nb lnage fedcrop dlint mincapint dldum mincapdum DIcrop DIstate i.yr, fe cluster(cgp)
 estimates store w12

  xi: xtreg reserves2 cropindexavgc ycropindexavgc dum1918 pop L.assets mout Black urban pyoung Illit sb nb lnage dldum mincapdum DIstate i.yr, fe cluster(cgp)
 estimates store w13

  xi: xtreg reserves2 cropindexavgc ycropindexavgc dum1918 pop L.assets mout Black urban pyoung Illit sb nb lnage fedcrop dlint mincapint dldum mincapdum DIcrop DIstate i.yr, fe cluster(cgp)
 estimates store w14

  xi: xtreg bondsas cropindexavgc ycropindexavgc dum1918 pop L.assets mout Black urban pyoung Illit sb nb lnage dldum mincapdum DIstate i.yr, fe cluster(cgp)
 estimates store w15

  xi: xtreg bondsas cropindexavgc ycropindexavgc dum1918 pop L.assets mout Black urban pyoung Illit sb nb lnage dlint mincapint fedcrop dldum mincapdum DIcrop DIstate i.yr, fe cluster(cgp)
 estimates store w16

 esttab w1 w2 w3 w4 w5 w6 w7 w8 w9 w10 w11 w12 w13 w14 w15 w16 using "TableA10.csv", b(3) se(3) replace  margin r2 starlevels(* 0.10 ** 0.05 *** 0.01) brackets label title("Table ?: ") wrap order(cropindexavgc ycropindexavgc fedcrop dlint mincapint sDIcrop dum1918 pop urban Black mout sb nb)


***********Generates Table A.11
 restore
 drop sDIcrop
 drop if minyr>1913

 local list cropindexavgc fedmember fedcrop dlint mincapint dldum mincapdum DIstate DIcrop young ycropindexavgc
 foreach x of local list {
	gen s`x'=0
	replace s`x'=`x' if statebank==1
	}

  xi: xtreg assets cropindexavgc scropindexavgc dum1918 pop mout Black urban pyoung Illit sb nb lnage dldum mincapdum DIstate i.yr, fe cluster(cgp)
 estimates store w1

 test _b[scropindexavg]=0

  xi: xtreg assets cropindexavgc scropindexavgc young ycropindexavgc syoung sycropindexavgc dum1918 pop mout Black urban pyoung Illit sb nb lnage fedmember fedcrop dlint mincapint dldum mincapdum DIstate DIcrop sfedmember sfedcrop sdlint smincapint sdldum smincapdum sDIstate sDIcrop i.yr, fe cluster(cgp)
 estimates store w2

 test _b[scropindexavg]=0,  notest 
 test _b[syoung]=0,  notest accum
 test _b[sycropindexavgc]=0,  notest accum
 test _b[sfedcrop]=0,  notest accum
 test _b[sdlint]=0,  notest accum
 test _b[smincapint]=0,  notest accum
 test _b[sDIcrop]=0,  notest accum
 test _b[sfedmember]=0,  notest accum
 test _b[sdldum]=0,  notest accum
 test _b[smincapdum]=0,  notest accum
 test _b[sDIstate]=0, accum

  xi: xtreg loans cropindexavgc scropindexavgc dum1918 pop mout Black urban pyoung Illit sb nb lnage dldum mincapdum DIstate i.yr, fe cluster(cgp)
 estimates store w3

 test _b[scropindexavg]=0

  xi: xtreg loans cropindexavgc scropindexavgc young ycropindexavgc syoung sycropindexavgc dum1918 pop mout Black urban pyoung Illit sb nb lnage fedmember fedcrop dlint mincapint dldum mincapdum DIstate DIcrop sfedmember sfedcrop sdlint smincapint sdldum smincapdum sDIstate sDIcrop i.yr, fe cluster(cgp)
 estimates store w4

 test _b[scropindexavg]=0,  notest 
 test _b[syoung]=0,  notest accum
 test _b[sycropindexavgc]=0,  notest accum
 test _b[sfedcrop]=0,  notest accum
 test _b[sdlint]=0,  notest accum
 test _b[smincapint]=0,  notest accum
 test _b[sDIcrop]=0,  notest accum
 test _b[sfedmember]=0,  notest accum
 test _b[sdldum]=0,  notest accum
 test _b[smincapdum]=0,  notest accum
 test _b[sDIstate]=0, accum

  xi: xtreg loas cropindexavgc scropindexavgc dum1918 pop mout Black urban pyoung Illit sb nb lnage dldum mincapdum DIstate i.yr, fe cluster(cgp)
 estimates store w5

 test _b[scropindexavg]=0

  xi: xtreg loas cropindexavgc scropindexavgc young ycropindexavgc syoung sycropindexavgc dum1918 pop mout Black urban pyoung Illit sb nb lnage fedmember fedcrop dlint mincapint dldum mincapdum DIstate DIcrop sfedmember sfedcrop sdlint smincapint sdldum smincapdum sDIstate sDIcrop i.yr, fe cluster(cgp)
 estimates store w6

 test _b[scropindexavg]=0,  notest 
 test _b[syoung]=0,  notest accum
 test _b[sycropindexavgc]=0,  notest accum
 test _b[sfedcrop]=0,  notest accum
 test _b[sdlint]=0,  notest accum
 test _b[smincapint]=0,  notest accum
 test _b[sDIcrop]=0,  notest accum
 test _b[sfedmember]=0,  notest accum
 test _b[sdldum]=0,  notest accum
 test _b[smincapdum]=0,  notest accum
 test _b[sDIstate]=0, accum

  xi: xtreg capas cropindexavgc scropindexavgc dum1918 pop mout Black urban pyoung Illit sb nb lnage dldum mincapdum DIstate i.yr, fe cluster(cgp)
 estimates store w7

 test _b[scropindexavg]=0

  xi: xtreg capas cropindexavgc scropindexavgc young ycropindexavgc syoung sycropindexavgc dum1918 pop mout Black urban pyoung Illit sb nb lnage fedmember fedcrop dlint mincapint dldum mincapdum DIstate DIcrop sfedmember sfedcrop sdlint smincapint sdldum smincapdum sDIstate sDIcrop i.yr, fe cluster(cgp)
 estimates store w8

 test _b[scropindexavg]=0,  notest 
 test _b[syoung]=0,  notest accum
 test _b[sycropindexavgc]=0,  notest accum
 test _b[sfedcrop]=0,  notest accum
 test _b[sdlint]=0,  notest accum
 test _b[smincapint]=0,  notest accum
 test _b[sDIcrop]=0,  notest accum
 test _b[sfedmember]=0,  notest accum
 test _b[sdldum]=0,  notest accum
 test _b[smincapdum]=0,  notest accum
 test _b[sDIstate]=0, accum

  xi: xtreg reserves2 cropindexavgc scropindexavgc dum1918 pop mout Black urban pyoung Illit sb nb lnage dldum mincapdum DIstate i.yr, fe cluster(cgp)
 estimates store w9

 test _b[scropindexavg]=0

 xi: xtreg reserves2 cropindexavgc scropindexavgc young ycropindexavgc syoung sycropindexavgc dum1918 pop mout Black urban pyoung Illit sb nb lnage fedmember fedcrop dlint mincapint dldum mincapdum DIstate DIcrop sfedmember sfedcrop sdlint smincapint sdldum smincapdum sDIstate sDIcrop i.yr, fe cluster(cgp)
 estimates store w10

 test _b[scropindexavg]=0,  notest 
 test _b[syoung]=0,  notest accum
 test _b[sycropindexavgc]=0,  notest accum
 test _b[sfedcrop]=0,  notest accum
 test _b[sdlint]=0,  notest accum
 test _b[smincapint]=0,  notest accum
 test _b[sDIcrop]=0,  notest accum
 test _b[sfedmember]=0,  notest accum
 test _b[sdldum]=0,  notest accum
 test _b[smincapdum]=0,  notest accum
 test _b[sDIstate]=0, accum

  xi: xtreg bondsas cropindexavgc scropindexavgc dum1918 pop mout Black urban pyoung Illit sb nb lnage dldum mincapdum DIstate i.yr, fe cluster(cgp)
 estimates store w11

 test _b[scropindexavg]=0

  xi: xtreg bondsas cropindexavgc scropindexavgc young ycropindexavgc syoung sycropindexavgc dum1918 pop mout Black urban pyoung Illit sb nb lnage fedmember fedcrop dlint mincapint dldum mincapdum DIstate DIcrop sfedmember sfedcrop sdlint smincapint sdldum smincapdum sDIstate sDIcrop i.yr, fe cluster(cgp)
 estimates store w12

 test _b[scropindexavg]=0,  notest 
 test _b[syoung]=0,  notest accum
 test _b[sycropindexavgc]=0,  notest accum
 test _b[sfedcrop]=0,  notest accum
 test _b[sdlint]=0,  notest accum
 test _b[smincapint]=0,  notest accum
 test _b[sDIcrop]=0,  notest accum
 test _b[sfedmember]=0,  notest accum
 test _b[sdldum]=0,  notest accum
 test _b[smincapdum]=0,  notest accum
 test _b[sDIstate]=0, accum

 esttab w1 w2 w3 w4 w5 w6 w7 w8 w9 w10 w11 w12 using "TableA11.csv", b(3) se(3) replace  margin r2 starlevels(* 0.10 ** 0.05 *** 0.01) brackets label title("Table ?: ") wrap order(cropindexavgc scropindexavgc young syoung ycropindexavgc sycropindexavgc fedcrop sfedcrop dlint sdlint mincapint smincapint DIcrop sDIcrop dum1918 fedmember sfedmember dldum sdldum mincapdum smincapdum DIstate sDIstate)





