{smcl}
{com}{sf}{ul off}{txt}
{com}. 
. **** REPLICATION OF FIGURE B7 ****
. 
. clear all
{res}{txt}
{com}. set mem 2g
{txt}{bf:set memory} ignored.
{p 4 4 2}
Memory no longer
needs to be set in modern Statas;
memory adjustments are performed on the fly
automatically.
{p_end}

{com}. set more off
{txt}
{com}. 
. /*      
>         OUTLINE
>         1. GRAPH
> */
. 
. ********************
. ***** 1. GRAPH *****
. ********************
. 
. // Import birth data
. 
. use $data\EEREV-D-21-00004_Data_Births.dta, clear
{txt}
{com}. 
. // Self
. 
. twoway ///
>         (line p_g0_1914_1927 birthyr if birthyr<2001, lcolor(navy) lpattern(dash)) ///
>         (line p_g0_1908_1927 birthyr if birthyr<2001, lcolor(maroon)), ///
>         title("Eligibility (Male)", ring(0)) ///, ring(0)
>         ytitle("Likelihood", margin(small)) ///
>         xtitle("Year of birth", margin(medium)) ///
>         ylabel(0(.5)1, angle(0) format(%5.1f)) yscale(r(-.1 1.1)) ///
>         xlabel(1900(25)2000) xscale(r(1900 2000)) ///
>         legend(label(1 "Moselle") label(2 "Alsace") order(1 2) pos(5) ring(0) cols(1) symx(*0.5) region(col(white))) graphregion(color(white)) /// pos(2) ring(0) 
>         xline(1908 1914 1927, lpatter(dash) lcolor(gs12))
{res}{txt}
{com}. graph export "$results\EEREV-D-21-00004_FigureB7_m0.png", replace width(4200) height(3000)
{txt}{p 0 4 2}
file {bf}
D:\Dropbox\SVLACHOS\Research\Malgre_nous\Replication_files\Results\EEREV-D-21-00004_FigureB7_m0.png{rm}
saved as
PNG
format
{p_end}

{com}. 
. // Husband
. 
. twoway ///
>         (line p_g0_s_1914_1927 birthyr if birthyr<2001, lcolor(navy) lpattern(dash)) ///
>         (line p_g0_s_1908_1927 birthyr if birthyr<2001, lcolor(maroon)), ///
>         title("Eligibility (Husband)", ring(0)) ///, ring(0)
>         ytitle("Likelihood", margin(small)) ///
>         xtitle("Year of birth", margin(medium)) ///
>         ylabel(0(.5)1, angle(0) format(%5.1f)) yscale(r(-.1 1.1)) ///
>         xlabel(1900(25)2000) xscale(r(1900 2000)) ///
>         legend(label(1 "Moselle") label(2 "Alsace") order(1 2) pos(5) ring(0) cols(1) symx(*0.5) region(col(white))) graphregion(color(white)) /// pos(2) ring(0) 
>         xline(1908 1914 1927, lpatter(dash) lcolor(gs12))
{res}{txt}
{com}. graph export "$results\EEREV-D-21-00004_FigureB7_s0.png", replace width(4200) height(3000)
{txt}{p 0 4 2}
file {bf}
D:\Dropbox\SVLACHOS\Research\Malgre_nous\Replication_files\Results\EEREV-D-21-00004_FigureB7_s0.png{rm}
saved as
PNG
format
{p_end}

{com}. 
. // Father
. 
. twoway ///
>         (line p_g1_1914_1927 birthyr if birthyr<2001, lcolor(navy) lpattern(dash)) ///
>         (line p_g1_1908_1927 birthyr if birthyr<2001, lcolor(maroon)), ///
>         title("Eligibility (Father)", ring(0)) ///, ring(0)
>         ytitle("Likelihood", margin(small)) ///
>         xtitle("Year of birth", margin(medium)) ///
>         ylabel(0(.5)1, angle(0) format(%5.1f)) yscale(r(-.1 1.1)) ///
>         xlabel(1900(25)2000) xscale(r(1900 2000)) ///
>         legend(label(1 "Moselle") label(2 "Alsace") order(1 2) pos(5) ring(0) cols(1) symx(*0.5) region(col(white))) graphregion(color(white)) /// 
>         xline(1908 1914 1927, lpatter(dash) lcolor(gs12))
{res}{txt}
{com}. graph export "$results\EEREV-D-21-00004_FigureB7_m1.png", replace width(4200) height(3000)
{txt}{p 0 4 2}
file {bf}
D:\Dropbox\SVLACHOS\Research\Malgre_nous\Replication_files\Results\EEREV-D-21-00004_FigureB7_m1.png{rm}
saved as
PNG
format
{p_end}

{com}. 
. // Grandfather
. 
. twoway ///
>         (line p_g2_1914_1927 birthyr if birthyr<2001, lcolor(navy) lpattern(dash)) ///
>         (line p_g2_1908_1927 birthyr if birthyr<2001, lcolor(maroon)), ///
>         title("Eligibility (Grandfather)", ring(0)) ///, ring(0)
>         ytitle("Likelihood", margin(small)) ///
>         xtitle("Year of birth", margin(medium)) ///
>         ylabel(0(.5)1, angle(0) format(%5.1f)) yscale(r(-.1 1.1)) ///
>         xlabel(1900(25)2000) xscale(r(1900 2000)) ///
>         legend(label(1 "Moselle") label(2 "Alsace") order(1 2) pos(5) ring(0) cols(1) symx(*0.5) region(col(white))) graphregion(color(white)) /// pos(2) ring(0) 
>         xline(1908 1914 1927, lpatter(dash) lcolor(gs12))
{res}{txt}
{com}. graph export "$results\EEREV-D-21-00004_FigureB7_m2.png", replace width(4200) height(3000)
{txt}{p 0 4 2}
file {bf}
D:\Dropbox\SVLACHOS\Research\Malgre_nous\Replication_files\Results\EEREV-D-21-00004_FigureB7_m2.png{rm}
saved as
PNG
format
{p_end}

{com}. 
. cap log close
{smcl}
{com}{sf}{ul off}