log using "${LOGS}03_sumstats", replace text set more off use "${DATA}03_krs_panel.dta", clear foreach type in regul gering all pot2 dep self mini midi maxi { gen S12log_`type'=S12.log_`type' } /******************************************************************************/ /***TABLE 1: Summary Stats for Dec 2013 ***/ /******************************************************************************/ #d; sutex anteil_unter_1400 treatment2 treatment3 [aw=svb_122013] if weiblich==9 & time==647, file(${TABLES}Table1_Sumstats_122013.tex) replace minmax digits(3) labels; sutex level_regul level_gering level_all level_pot2 level_dep level_self level_mini level_midi level_maxi avginc2013 avginc2014 avginc2015 svb_122013 [aw=svb_122013] if weiblich==9 & time==647, file(${TABLES}Table1_Sumstats_122013.tex) append minmax digits(0) labels; sutex svb_122013 if weiblich==9 & time==647, file(${TABLES}Table1_Sumstats_122013.tex) append minmax digits(0) labels; sutex anteil_unter_1400 treatment2 treatment3 S12log_regul S12log_gering S12log_all S12log_pot2 S12log_dep S12log_self S12log_mini S12log_midi S12log_maxi if weiblich==9 & time==647, file(${TABLES}Table1_Sumstats_122013.tex) append minmax digits(3) labels; #d cr /******************************************************************************/ /***TABLE A1: Alternative Summary Stats ***/ /******************************************************************************/ #d; /* Panel A: Summary Stats for the entire sample, i.e. w/o & time==647 */ sutex anteil_unter_1400 treatment2 treatment3 S12log_regul S12log_gering S12log_all S12log_pot2 S12log_dep S12log_self S12log_mini S12log_midi S12log_maxi [aw=svb_122013] if weiblich==9 , file(${TABLES}TableA1_Sumstats.tex) replace minmax digits(3) labels; sutex level_regul level_gering level_all level_pot2 level_dep level_self level_mini level_midi level_maxi avginc2013 avginc2014 avginc2015 svb_122013 [aw=svb_122013] if weiblich==9, file(${TABLES}TableA1_Sumstats.tex) append minmax digits(0) labels; sutex svb_122013 if weiblich==9, file(${TABLES}TableA1_Sumstats.tex) append minmax digits(0) labels; /* Panel B: Summary Stats for Dec 2013; Men */ sutex anteil_unter_1400 treatment2 treatment3 S12log_regul S12log_gering S12log_all S12log_pot2 S12log_dep S12log_self S12log_mini S12log_midi S12log_maxi [aw=svb_122013] if weiblich==0 & time==647, file(${TABLES}TableA1_Sumstats.tex) append minmax digits(3) labels; sutex level_regul level_gering level_all level_pot2 level_dep level_self level_mini level_midi level_maxi avginc2013 avginc2014 avginc2015 svb_122013 [aw=svb_122013] if weiblich==0 & time==647, file(${TABLES}TableA1_Sumstats.tex) append minmax digits(0) labels; sutex svb_122013 if weiblich==0 & time==647, file(${TABLES}TableA1_Sumstats.tex) append minmax digits(0) labels; /* Panel C: Summary Stats for Dec 2013; Women */ sutex anteil_unter_1400 treatment2 treatment3 S12log_regul S12log_gering S12log_all S12log_pot2 S12log_dep S12log_self S12log_mini S12log_midi S12log_maxi [aw=svb_122013] if weiblich==1 & time==647, file(${TABLES}TableA1_Sumstats.tex) append minmax digits(3) labels; sutex level_regul level_gering level_all level_pot2 level_dep level_self level_mini level_midi level_maxi avginc2013 avginc2014 avginc2015 svb_122013 [aw=svb_122013] if weiblich==1 & time==647, file(${TABLES}TableA1_Sumstats.tex) append minmax digits(0) labels; sutex svb_122013 if weiblich==1 & time==647, file(${TABLES}TableA1_Sumstats.tex) append minmax digits(0) labels; #d cr /*******************************/ /***Piecharts for Dec2013 ***/ /*******************************/ keep if time==647 /*aka Dec 2013 */ keep if weiblich==9 label var level_pot2 "Non-working" label var level_all "Aufstocker" #d; /*Aufstocker vs non-work Erwerbsfähige Anspruchsberechtigte */ graph pie level_all level_pot2, pie(1, color(orange) explode) pie(2, color(purple)) plabel(_all percent, size(*1.5) color(gs2)format(%9.2f)) title("UBII - Capable of Working") legend(cols(1)) saving(aufstocker); /*Types of Aufstocker*/ graph pie level_mini level_midi level_maxi level_self, line(lcolor(orange)) pie(1, color(cyan)) pie(2, color(cranberry)) pie(3, color(ltkhaki )) pie(4, color(gold)) plabel(_all percent, size(*1.5) color(gs2)format(%9.2f)) title("Job Types of Aufstocker") saving(aufstocker_types); graph combine aufstocker.gph aufstocker_types.gph, note("Distribution in December 2013"); graph export "${GRAPHS}aufstocker_comp.eps", as(eps) replace; erase aufstocker.gph; erase aufstocker_types.gph; #d cr /*******************************/ /*** Google Trend ***/ /*******************************/ cd ${DATA} use "${DATA}03_googletrend.dta", clear label var mindestlohndeutschland "Relative Search Intensity" #del ; twoway (line mindestlohndeutschland time, lwidth(thick) lcolor(edkblue) ) , xtitle("") xlabel(1(10)156, valuelabel angle(45) labs(small)) xline(104.5, lcolor(dknavy)) xline(78.5, lcolor(cyan)) title("Google Trends Minimum Wage") note("Google Trends for Germany - {it:Mindestlohn} between January 2013 and December 2015") ; #del cr graph export "${GRAPHS}googletrend.eps", as(eps) replace /*******************************/ /*** Bite Density ***/ /*******************************/ cd ${DATA} use "${DATA}03_krs_panel.dta", clear keep if time==671 & weiblich==9 sum bite1400, det local median=r(p50) twoway (kdensity bite1400, lwidth(thick) lcolor(emerald)), xline(`median', lwidth(thick) lcolor(emerald) lpattern(dot)) graph export "${GRAPHS}bite_all.eps", as(eps) replace #del ; twoway (kdensity bite1400 if ost==0, lwidth(thick) lcolor(navy)) (kdensity bite1400 if ost==1, lwidth(thick) lpattern(dash) lcolor(orange_red)) ,legend(label(1 "West Germany") label(2 "East Germany") ) xtitle("Bite") ytitle("Kernel Density") ; #del cr graph export "${GRAPHS}bitedensity.eps", as(eps) replace sum bite1400 if ost==0, det local median_west=r(p50) sum bite1400 if ost==1, det local median_ost=r(p50) #del ; twoway (kdensity bite1400 if ost==0, lwidth(thick) lcolor(navy)) (kdensity bite1400 if ost==1, lwidth(thick) lpattern(dash) lcolor(orange_red)) , legend(label(1 "West Germany") label(2 "East Germany") ) xtitle("Bite") ytitle("Kernel Density") xline(`median_west', lwidth(thick) lcolor(navy) lpattern(dot)) xline(`median_ost', lwidth(thick) lcolor(orange_red) lpattern(dot)) ; #del cr graph export "${GRAPHS}bitedensity_wmedian.eps", as(eps) replace #del ; twoway (kdensity bite1400, lwidth(thick) lcolor(emerald)) (kdensity bite1400 if ost==0, lwidth(thick) lpattern(shortdash) lcolor(navy)) (kdensity bite1400 if ost==1, lwidth(thick) lpattern(longdash) lcolor(orange_red)) , legend(label(1 "West Germany") label(2 "East Germany") ) xtitle("Bite") ytitle("Kernel Density") xline(`median_west', lwidth(thick) lcolor(navy) lpattern(dot)) xline(`median_ost', lwidth(thick) lcolor(orange_red) lpattern(dot)) xline(`median', lwidth(thick) lcolor(emerald) lpattern(dot)) ; #del cr graph export "${GRAPHS}fullbitedensity_wmedian.eps", as(eps) replace /*******************************/ /*** Aggregates ***/ /*******************************/ cd ${DATA} use "${DATA}03_krs_panel.dta", clear tab time if time==647 /*Dez 2013*/ keep if time==647 & weiblich==9 collapse (sum) level_regul level_gering level_pot level_pot2 level_all level_dep level_self level_mini level_midi level_maxi label var level_regul "Regular Employment" label var level_gering "Marginal Employment" label var level_pot "Able to Work - UBII" label var level_all "\hspace{3 mm} \textit{Aufstocker}" label var level_pot2 "\hspace{3 mm} Non-working UBII" label var level_dep "Employees" label var level_self "Self-employed" label var level_mini "Minijobs" label var level_midi "Midijobs" label var level_maxi "Maxijobs" #del ; sutex level_regul level_gering level_pot level_all level_pot2, file(${TABLES}Aggregates_BigFour.tex) replace digits(0) labels; #del cr foreach var of varlist level_regul level_gering level_pot level_pot2 level_all { replace `var'=`var'/1000000 } #del ; sutex level_regul level_gering level_pot level_all level_pot2, file(${TABLES}TableA1b_Aggregates.tex) replace digits(2) labels; sutex level_dep level_self level_mini level_midi level_maxi, file(${TABLES}TableA1b_Aggregates.tex) append digits(0) labels; #del cr