/********Stata code used to extract WID series 1820-2025 for inequality***/
/*****series using 57 core territories: 48 countries + 9 subregions**/

#delimit;
clear all;
set more off;
set maxvar 6000;
do Codes/doglobalvariables.txt;


/****importation of pretax and posttax income inequality series***/
/****notes 14-10-2025***/
/****note 1: for posttax inequality pre-1980: we assume pre-1910 posttax series = pretax; 1910-1980 linear ajustment***/
/***this could potentially be improved but for now this is consistent with human capital paper***/
/**note 2: for now, historical wealth series in sheets Ex come from previous series from Equality21cAppendixBw.xlsx, with fewer core territories***/
wid, ind(sptinc sdiinc shweal) ag(992) pop(j) per(p90p100 p99p100 p99.9p100 p99.99p100 p99.999p100 p0p50 p0p1 p0p10 p0p25 p0p75) clear;
keep country variable year value percentile;
gen coreterritory=.;
foreach c of global coreterritories
{;
replace country="`c'" if country=="`c'-PPP";
replace coreterritory=1 if country=="`c'";
};
keep if coreterritory==1;
replace per="t10" if per=="p90p100"; 
replace per="t1" if per=="p99p100"; 
replace per="t01" if per=="p99.9p100"; 
replace per="t001" if per=="p99.99p100"; 
replace per="t0001" if per=="p99.999p100"; 
replace per="b50" if per=="p0p50"; 
replace per="b01" if per=="p0p1"; 
replace per="b10" if per=="p0p10"; 
replace per="b25" if per=="p0p25"; 
replace per="b75" if per=="p0p75"; 
gen var=variable+percentile;
drop variable percentile coreterritory;
reshape wide value, i(country year) j(var) string;
rename valuesptinc992j* *p;
rename valuesdiinc992j* *y;
rename valueshweal992j* *w;
keep if year==1820 | year==1850 | year==1880 | year==1900 | year==1910 | year==1920 | year==1930 | year==1940 | year==1950 | year==1960 | year==1970 | year>=1980; 
save Data/equality.dta, replace;
/***now extracting series on pretax thresholds***/
wid, ind(tptinc) ag(992) pop(j) per(p90p100 p99p100 p99.9p100 p99.99p100 p99.999p100 p50p100 p1p100 p10p100 p25p100 p75p100) clear;
keep country variable year value percentile;
gen coreterritory=.;
foreach c of global coreterritories
{;
replace country="`c'" if country=="`c'-PPP";
replace coreterritory=1 if country=="`c'";
};
keep if coreterritory==1;
save Data/temp/temp.dta, replace;
/***now extracting average income in order to normalize thresholds***/
wid, ind(aptinc) ag(992) pop(j) per(p0p100) clear;
keep country year value;
gen coreterritory=.;
foreach c of global coreterritories
{;
replace country="`c'" if country=="`c'-PPP";
replace coreterritory=1 if country=="`c'";
};
keep if coreterritory==1;
rename value y;
merge 1:n year country using Data/temp/temp.dta;
keep if _merge==3;
drop _merge;
replace value=value/y;
replace per="p90" if per=="p90p100"; 
replace per="p99" if per=="p99p100"; 
replace per="p999" if per=="p99.9p100"; 
replace per="p9999" if per=="p99.99p100"; 
replace per="p99999" if per=="p99.999p100"; 
replace per="p50" if per=="p50p100";
replace per="p01" if per=="p1p100";  
replace per="p10" if per=="p10p100"; 
replace per="p25" if per=="p25p100"; 
replace per="p75" if per=="p75p100"; 
gen var=variable+percentile;
drop variable percentile coreterritory;
reshape wide value, i(country year) j(var) string;
rename valuetptinc992j* *;
keep if year==1820 | year==1850 | year==1880 | year==1900 | year==1910 | year==1920 | year==1930 | year==1940 | year==1950 | year==1960 | year==1970 | year>=1980; 
merge 1:1 country year using Data/equality.dta;
drop _merge y;
order year country t* b* p*;
save Data/equality.dta, replace;
/***now extracting series on posttax thresholds***/
wid, ind(tdiinc) ag(992) pop(j) per(p90p100 p99p100 p99.9p100 p99.99p100 p99.999p100 p50p100 p1p100 p10p100 p25p100 p75p100) clear;
keep country variable year value percentile;
gen coreterritory=.;
foreach c of global coreterritories
{;
replace country="`c'" if country=="`c'-PPP";
replace coreterritory=1 if country=="`c'";
};
keep if coreterritory==1;
save Data/temp/temp.dta, replace;
/***now extracting average income in order to normalize thresholds***/
wid, ind(adiinc) ag(992) pop(j) per(p0p100) clear;
keep country year value;
gen coreterritory=.;
foreach c of global coreterritories
{;
replace country="`c'" if country=="`c'-PPP";
replace coreterritory=1 if country=="`c'";
};
keep if coreterritory==1;
rename value y;
merge 1:n year country using Data/temp/temp.dta;
keep if _merge==3;
drop _merge;
replace value=value/y;
replace per="y90" if per=="p90p100"; 
replace per="y99" if per=="p99p100"; 
replace per="y999" if per=="p99.9p100"; 
replace per="y9999" if per=="p99.99p100"; 
replace per="y99999" if per=="p99.999p100"; 
replace per="y50" if per=="p50p100";
replace per="y01" if per=="p1p100";  
replace per="y10" if per=="p10p100"; 
replace per="y25" if per=="p25p100"; 
replace per="y75" if per=="p75p100"; 
gen var=variable+percentile;
drop variable percentile coreterritory;
reshape wide value, i(country year) j(var) string;
rename valuetdiinc992j* *;
keep if year==1820 | year==1850 | year==1880 | year==1900 | year==1910 | year==1920 | year==1930 | year==1940 | year==1950 | year==1960 | year==1970 | year>=1980; 
merge 1:1 country year using Data/equality.dta;
drop _merge y;
order year country t* b* y* p*;
save Data/equality.dta, replace;
/***now extracting series on wealth thresholds***/
wid, ind(thweal) ag(992) pop(j) per(p90p100 p99p100 p99.9p100 p99.99p100 p99.999p100 p50p100 p1p100 p10p100 p25p100 p75p100) clear;
keep country variable year value percentile;
gen coreterritory=.;
foreach c of global coreterritories
{;
replace country="`c'" if country=="`c'-PPP";
replace coreterritory=1 if country=="`c'";
};
keep if coreterritory==1;
save Data/temp/temp.dta, replace;
/***now extracting average wealth in order to normalize thresholds***/
wid, ind(ahweal) ag(992) pop(j) per(p0p100) clear;
keep country year value;
gen coreterritory=.;
foreach c of global coreterritories
{;
replace country="`c'" if country=="`c'-PPP";
replace coreterritory=1 if country=="`c'";
};
keep if coreterritory==1;
rename value w;
merge 1:n year country using Data/temp/temp.dta;
keep if _merge==3;
drop _merge;
replace value=value/w;
replace per="w90" if per=="p90p100"; 
replace per="w99" if per=="p99p100"; 
replace per="w999" if per=="p99.9p100"; 
replace per="w9999" if per=="p99.99p100"; 
replace per="w99999" if per=="p99.999p100"; 
replace per="w50" if per=="p50p100";
replace per="w01" if per=="p1p100";  
replace per="w10" if per=="p10p100"; 
replace per="w25" if per=="p25p100"; 
replace per="w75" if per=="p75p100"; 
gen var=variable+percentile;
drop variable percentile coreterritory;
reshape wide value, i(country year) j(var) string;
rename valuethweal992j* *;
keep if year==1820 | year==1850 | year==1880 | year==1900 | year==1910 | year==1920 | year==1930 | year==1940 | year==1950 | year==1960 | year==1970 | year>=1980; 
merge 1:1 country year using Data/equality.dta;
drop _merge w;
order year country t* b* y* p* w*;
save Data/equality.dta, replace;
/***now extracting Gini coefficients***/
wid, ind(gdiinc) ag(992) pop(j) per(p0p100) clear;
keep country year value;
gen coreterritory=.;
foreach c of global coreterritories
{;
replace country="`c'" if country=="`c'-PPP";
replace coreterritory=1 if country=="`c'";
};
keep if coreterritory==1;
rename value giniy;
keep if year==1820 | year==1850 | year==1880 | year==1900 | year==1910 | year==1920 | year==1930 | year==1940 | year==1950 | year==1960 | year==1970 | year>=1980; 
merge 1:1 country year using Data/equality.dta;
drop _merge coreterritory;
save Data/equality.dta, replace;
wid, ind(gptinc) ag(992) pop(j) per(p0p100) clear;
keep country year value;
gen coreterritory=.;
foreach c of global coreterritories
{;
replace country="`c'" if country=="`c'-PPP";
replace coreterritory=1 if country=="`c'";
};
keep if coreterritory==1;
rename value ginip;
keep if year==1820 | year==1850 | year==1880 | year==1900 | year==1910 | year==1920 | year==1930 | year==1940 | year==1950 | year==1960 | year==1970 | year>=1980; 
merge 1:1 country year using Data/equality.dta;
drop _merge coreterritory;
save Data/equality.dta, replace;
wid, ind(ghweal) ag(992) pop(j) per(p0p100) clear;
keep country year value;
gen coreterritory=.;
foreach c of global coreterritories
{;
replace country="`c'" if country=="`c'-PPP";
replace coreterritory=1 if country=="`c'";
};
keep if coreterritory==1;
rename value giniw;
keep if year==1820 | year==1850 | year==1880 | year==1900 | year==1910 | year==1920 | year==1930 | year==1940 | year==1950 | year==1960 | year==1970 | year>=1980; 
merge 1:1 country year using Data/equality.dta;
drop _merge coreterritory;
save Data/equality.dta, replace;

/***reshape with country variables***/
use Data/equality.dta, clear;
reshape wide t10y b50y b01y b10y b25y b75y t1y t01y t001y t0001y y01 y10 y25 y50 y75 y90 y99 y999 y9999 y99999 giniy t10p b50p b01p b10p b25p b75p t1p t01p t001p t0001p p01 p10 p25 p50 p75 p90 p99 p999 p9999 p99999 ginip t10w b50w b01w b10w b25w b75w t1w t01w t001w t0001w w01 w10 w25 w50 w75 w90 w99 w999 w9999 w99999 giniw, i(year) j(country) string;
sort year;
save Data/equality.dta, replace;

/***imputing posttax inequality 1820-1970***/
/***additive rather than multiplicative linear interpolation 1910-1980 for b01 b10 b25 y01 y10 y25, otherwise this leads to inconsistencies***/
use Data/equality.dta, clear;
sort year;
foreach i in DE DK ES FR GB IT NL NO SE OC QM US CA AU NZ OH AR BR CL CO MX OD AE EG DZ IR MA SA TR OE CD CI ET KE ML NE NG RW SD ZA OJ RU OA CN JP KR TW OB BD IN ID MM PK PH TH VN OI
{;
foreach k in t10 b50 b75 t1 t01 t001 t0001 gini
{; 
replace `k'y`i'=`k'p`i' if year<=1910;
foreach j in 1920 1930 1940 1950 1960 1970
{;
replace `k'y`i'=`k'p`i'*((1980-`j')*(`k'y`i'[5]/`k'p`i'[5])+(`j'-1910)*(`k'y`i'[12]/`k'p`i'[12]))/70 if year==`j';
replace `k'y`i'=((1980-`j')*`k'y`i'[5]+(`j'-1910)*`k'y`i'[12])/70 if year==`j' & `k'y`i'==.;
};
};
foreach k in b01 b10 b25
{; 
replace `k'y`i'=`k'p`i' if year<=1910;
foreach j in 1920 1930 1940 1950 1960 1970
{;
replace `k'y`i'=`k'p`i'+max(`k'y`i'[12]-`k'p`i'[12],0)*(`j'-1910)/70 if year==`j';
replace `k'y`i'=((1980-`j')*`k'y`i'[5]+(`j'-1910)*`k'y`i'[12])/70 if year==`j' & `k'y`i'==.;
};
};
foreach k in 50 90 99 999 9999 99999 75 
{; 
replace y`k'`i'=p`k'`i' if year<=1910;
foreach j in 1920 1930 1940 1950 1960 1970
{;
replace y`k'`i'=p`k'`i'*((1980-`j')*(y`k'`i'[5]/p`k'`i'[5])+(`j'-1910)*(y`k'`i'[12]/p`k'`i'[12]))/70 if year==`j';
replace y`k'`i'=((1980-`j')*y`k'`i'[5]+(`j'-1910)*y`k'`i'[12])/70 if year==`j' & y`k'`i'==.;
};
};
foreach k in 25 01 10
{; 
replace y`k'`i'=p`k'`i' if year<=1910;
foreach j in 1920 1930 1940 1950 1960 1970
{;
replace y`k'`i'=p`k'`i'+max(y`k'`i'[12]-p`k'`i'[12],0)*(`j'-1910)/70 if year==`j';
replace y`k'`i'=((1980-`j')*y`k'`i'[5]+(`j'-1910)*y`k'`i'[12])/70 if year==`j' & y`k'`i'==.;
};
};
};
save Data/equality.dta, replace;


/***merging with population and productivity series***/
use Data/equality.dta, clear;
merge 1:1 year using Data/prod.dta;
drop _merge;
sort year;
save Data/equality.dta, replace;

/***transforming inequality estimates into annual series 1800-2025***/
use Data/equality.dta, clear;
foreach k in t10y b50y b01y b10y b25y b75y t1y t01y t001y t0001y y01 y10 y25 y50 y75 y90 y99 y999 y9999 y99999 giniy t10p b50p b01p b10p b25p b75p t1p t01p t001p t0001p p01 p10 p25 p50 p75 p90 p99 p999 p9999 p99999 ginip t10w b50w b01w b10w b25w b75w t1w t01w t001w t0001w w01 w10 w25 w50 w75 w90 w99 w999 w9999 w99999 giniw
{;
foreach i in DE DK ES FR GB IT NL NO SE OC QM US CA AU NZ OH AR BR CL CO MX OD AE EG DZ IR MA SA TR OE CD CI ET KE ML NE NG RW SD ZA OJ RU OA CN JP KR TW OB BD IN ID MM PK PH TH VN OI
{;
forvalues j=1/20
{;
replace `k'`i'=`k'`i'[21]/((`k'`i'[51]/`k'`i'[21])^((21-`j')/30)) if _n==`j';
replace `k'`i'=`k'`i'[21] if _n==`j' & `k'`i'==.;
};
forvalues j=22/50
{;
replace `k'`i'=((51-`j')*`k'`i'[21]+(`j'-21)*`k'`i'[51])/30 if _n==`j';
};
forvalues j=52/80
{;
replace `k'`i'=((81-`j')*`k'`i'[51]+(`j'-51)*`k'`i'[81])/30 if _n==`j';
};
forvalues j=82/100
{;
replace `k'`i'=((101-`j')*`k'`i'[81]+(`j'-81)*`k'`i'[101])/20 if _n==`j';
};
forvalues j=102/110
{;
replace `k'`i'=((111-`j')*`k'`i'[101]+(`j'-101)*`k'`i'[111])/10 if _n==`j';
};
forvalues j=112/120
{;
replace `k'`i'=((121-`j')*`k'`i'[111]+(`j'-111)*`k'`i'[121])/10 if _n==`j';
};
forvalues j=122/130
{;
replace `k'`i'=((131-`j')*`k'`i'[121]+(`j'-121)*`k'`i'[131])/10 if _n==`j';
};
forvalues j=132/140
{;
replace `k'`i'=((141-`j')*`k'`i'[131]+(`j'-131)*`k'`i'[141])/10 if _n==`j';
};
forvalues j=142/150
{;
replace `k'`i'=((151-`j')*`k'`i'[141]+(`j'-141)*`k'`i'[151])/10 if _n==`j';
};
forvalues j=152/160
{;
replace `k'`i'=((161-`j')*`k'`i'[151]+(`j'-151)*`k'`i'[161])/10 if _n==`j';
};
forvalues j=162/170
{;
replace `k'`i'=((171-`j')*`k'`i'[161]+(`j'-161)*`k'`i'[171])/10 if _n==`j';
};
forvalues j=172/180
{;
replace `k'`i'=((181-`j')*`k'`i'[171]+(`j'-171)*`k'`i'[181])/10 if _n==`j';
};
forvalues j=225/226
{;
replace `k'`i'=`k'`i'[224] if _n==`j';
};
};
gen `k'EURO=(popDE*`k'DE+popDK*`k'DK+popFR*`k'FR+popGB*`k'GB+popIT*`k'IT+popES*`k'ES+popNL*`k'NL+popNO*`k'NO+popSE*`k'SE+popOC*`k'OC+popQM*`k'QM)/popEURO;
gen `k'NAOC=(popUS*`k'US+popCA*`k'CA+popAU*`k'AU+popNZ*`k'NZ+popOH*`k'OH)/popNAOC;
gen `k'LATA=(popAR*`k'AR+popBR*`k'BR+popCL*`k'CL+popCO*`k'CO+popMX*`k'MX+popOD*`k'OD)/popLATA;
gen `k'MENA=(popAE*`k'AE+popTR*`k'TR+popEG*`k'EG+popDZ*`k'DZ+popIR*`k'IR+popMA*`k'MA+popSA*`k'SA+popOE*`k'OE)/popMENA;
gen `k'SSAF=(popCD*`k'CD+popCI*`k'CI+popET*`k'ET+popKE*`k'KE+popML*`k'ML+popNE*`k'NE+popNG*`k'NG+popRW*`k'RW+popSD*`k'SD+popZA*`k'ZA+popOJ*`k'OJ)/popSSAF;
gen `k'RUCA=(popRU*`k'RU+popOA*`k'OA)/popRUCA;
gen `k'EASA=(popCN*`k'CN+popJP*`k'JP+popKR*`k'KR+popTW*`k'TW+popOB*`k'OB)/popEASA;
gen `k'SSEA=(popBD*`k'BD+popIN*`k'IN+popID*`k'ID+popMM*`k'MM+popPK*`k'PK+popPH*`k'PH+popTH*`k'TH+popVN*`k'VN+popOI*`k'OI)/popSSEA;
gen `k'WO=(popEURO*`k'EURO+popNAOC*`k'NAOC+popLATA*`k'LATA+popMENA*`k'MENA+popSSAF*`k'SSAF+popRUCA*`k'RUCA+popEASA*`k'EASA+popSSEA*`k'SSEA)/popWO;
};
save Data/equality.dta, replace;


/***ordering variables***/
use Data/equality.dta, clear;
order year t10yWO t10yEURO t10yNAOC t10yLATA t10yMENA t10ySSAF t10yRUCA t10yEASA t10ySSEA t10yDE t10yDK t10yES t10yFR t10yGB t10yIT t10yNL t10yNO t10ySE t10yOC t10yQM t10yUS t10yCA t10yAU t10yNZ t10yOH t10yAR t10yBR t10yCL t10yCO t10yMX t10yOD t10yAE t10yDZ t10yEG t10yIR t10yMA t10ySA t10yTR t10yOE t10yCD t10yCI t10yET t10yKE t10yML t10yNE t10yNG t10yRW t10ySD t10yZA t10yOJ t10yRU t10yOA t10yCN t10yJP t10yKR t10yTW t10yOB t10yBD t10yIN t10yID t10yMM t10yPK t10yPH t10yTH t10yVN t10yOI 
b50yWO b50yEURO b50yNAOC b50yLATA b50yMENA b50ySSAF b50yRUCA b50yEASA b50ySSEA b50yDE b50yDK b50yES b50yFR b50yGB b50yIT b50yNL b50yNO b50ySE b50yOC b50yQM b50yUS b50yCA b50yAU b50yNZ b50yOH b50yAR b50yBR b50yCL b50yCO b50yMX b50yOD b50yAE b50yDZ b50yEG b50yIR b50yMA b50ySA b50yTR b50yOE b50yCD b50yCI b50yET b50yKE b50yML b50yNE b50yNG b50yRW b50ySD b50yZA b50yOJ b50yRU b50yOA b50yCN b50yJP b50yKR b50yTW b50yOB b50yBD b50yIN b50yID b50yMM b50yPK b50yPH b50yTH b50yVN b50yOI 
b01yWO b01yEURO b01yNAOC b01yLATA b01yMENA b01ySSAF b01yRUCA b01yEASA b01ySSEA b01yDE b01yDK b01yES b01yFR b01yGB b01yIT b01yNL b01yNO b01ySE b01yOC b01yQM b01yUS b01yCA b01yAU b01yNZ b01yOH b01yAR b01yBR b01yCL b01yCO b01yMX b01yOD b01yAE b01yDZ b01yEG b01yIR b01yMA b01ySA b01yTR b01yOE b01yCD b01yCI b01yET b01yKE b01yML b01yNE b01yNG b01yRW b01ySD b01yZA b01yOJ b01yRU b01yOA b01yCN b01yJP b01yKR b01yTW b01yOB b01yBD b01yIN b01yID b01yMM b01yPK b01yPH b01yTH b01yVN b01yOI 
b10yWO b10yEURO b10yNAOC b10yLATA b10yMENA b10ySSAF b10yRUCA b10yEASA b10ySSEA b10yDE b10yDK b10yES b10yFR b10yGB b10yIT b10yNL b10yNO b10ySE b10yOC b10yQM b10yUS b10yCA b10yAU b10yNZ b10yOH b10yAR b10yBR b10yCL b10yCO b10yMX b10yOD b10yAE b10yDZ b10yEG b10yIR b10yMA b10ySA b10yTR b10yOE b10yCD b10yCI b10yET b10yKE b10yML b10yNE b10yNG b10yRW b10ySD b10yZA b10yOJ b10yRU b10yOA b10yCN b10yJP b10yKR b10yTW b10yOB b10yBD b10yIN b10yID b10yMM b10yPK b10yPH b10yTH b10yVN b10yOI 
b25yWO b25yEURO b25yNAOC b25yLATA b25yMENA b25ySSAF b25yRUCA b25yEASA b25ySSEA b25yDE b25yDK b25yES b25yFR b25yGB b25yIT b25yNL b25yNO b25ySE b25yOC b25yQM b25yUS b25yCA b25yAU b25yNZ b25yOH b25yAR b25yBR b25yCL b25yCO b25yMX b25yOD b25yAE b25yDZ b25yEG b25yIR b25yMA b25ySA b25yTR b25yOE b25yCD b25yCI b25yET b25yKE b25yML b25yNE b25yNG b25yRW b25ySD b25yZA b25yOJ b25yRU b25yOA b25yCN b25yJP b25yKR b25yTW b25yOB b25yBD b25yIN b25yID b25yMM b25yPK b25yPH b25yTH b25yVN b25yOI 
b75yWO b75yEURO b75yNAOC b75yLATA b75yMENA b75ySSAF b75yRUCA b75yEASA b75ySSEA b75yDE b75yDK b75yES b75yFR b75yGB b75yIT b75yNL b75yNO b75ySE b75yOC b75yQM b75yUS b75yCA b75yAU b75yNZ b75yOH b75yAR b75yBR b75yCL b75yCO b75yMX b75yOD b75yAE b75yDZ b75yEG b75yIR b75yMA b75ySA b75yTR b75yOE b75yCD b75yCI b75yET b75yKE b75yML b75yNE b75yNG b75yRW b75ySD b75yZA b75yOJ b75yRU b75yOA b75yCN b75yJP b75yKR b75yTW b75yOB b75yBD b75yIN b75yID b75yMM b75yPK b75yPH b75yTH b75yVN b75yOI 
t1yWO t1yEURO t1yNAOC t1yLATA t1yMENA t1ySSAF t1yRUCA t1yEASA t1ySSEA t1yDE t1yDK t1yES t1yFR t1yGB t1yIT t1yNL t1yNO t1ySE t1yOC t1yQM t1yUS t1yCA t1yAU t1yNZ t1yOH t1yAR t1yBR t1yCL t1yCO t1yMX t1yOD t1yAE t1yDZ t1yEG t1yIR t1yMA t1ySA t1yTR t1yOE t1yCD t1yCI t1yET t1yKE t1yML t1yNE t1yNG t1yRW t1ySD t1yZA t1yOJ t1yRU t1yOA t1yCN t1yJP t1yKR t1yTW t1yOB t1yBD t1yIN t1yID t1yMM t1yPK t1yPH t1yTH t1yVN t1yOI
t01yWO t01yEURO t01yNAOC t01yLATA t01yMENA t01ySSAF t01yRUCA t01yEASA t01ySSEA t01yDE t01yDK t01yES t01yFR t01yGB t01yIT t01yNL t01yNO t01ySE t01yOC t01yQM t01yUS t01yCA t01yAU t01yNZ t01yOH t01yAR t01yBR t01yCL t01yCO t01yMX t01yOD t01yAE t01yDZ t01yEG t01yIR t01yMA t01ySA t01yTR t01yOE t01yCD t01yCI t01yET t01yKE t01yML t01yNE t01yNG t01yRW t01ySD t01yZA t01yOJ t01yRU t01yOA t01yCN t01yJP t01yKR t01yTW t01yOB t01yBD t01yIN t01yID t01yMM t01yPK t01yPH t01yTH t01yVN t01yOI
t001yWO t001yEURO t001yNAOC t001yLATA t001yMENA t001ySSAF t001yRUCA t001yEASA t001ySSEA t001yDE t001yDK t001yES t001yFR t001yGB t001yIT t001yNL t001yNO t001ySE t001yOC t001yQM t001yUS t001yCA t001yAU t001yNZ t001yOH t001yAR t001yBR t001yCL t001yCO t001yMX t001yOD t001yAE t001yDZ t001yEG t001yIR t001yMA t001ySA t001yTR t001yOE t001yCD t001yCI t001yET t001yKE t001yML t001yNE t001yNG t001yRW t001ySD t001yZA t001yOJ t001yRU t001yOA t001yCN t001yJP t001yKR t001yTW t001yOB t001yBD t001yIN t001yID t001yMM t001yPK t001yPH t001yTH t001yVN t001yOI 
t0001yWO t0001yEURO t0001yNAOC t0001yLATA t0001yMENA t0001ySSAF t0001yRUCA t0001yEASA t0001ySSEA t0001yDE t0001yDK t0001yES t0001yFR t0001yGB t0001yIT t0001yNL t0001yNO t0001ySE t0001yOC t0001yQM t0001yUS t0001yCA t0001yAU t0001yNZ t0001yOH t0001yAR t0001yBR t0001yCL t0001yCO t0001yMX t0001yOD t0001yAE t0001yDZ t0001yEG t0001yIR t0001yMA t0001ySA t0001yTR t0001yOE t0001yCD t0001yCI t0001yET t0001yKE t0001yML t0001yNE t0001yNG t0001yRW t0001ySD t0001yZA t0001yOJ t0001yRU t0001yOA t0001yCN t0001yJP t0001yKR t0001yTW t0001yOB t0001yBD t0001yIN t0001yID t0001yMM t0001yPK t0001yPH t0001yTH t0001yVN t0001yOI 
y01WO y01EURO y01NAOC y01LATA y01MENA y01SSAF y01RUCA y01EASA y01SSEA y01DE y01DK y01ES y01FR y01GB y01IT y01NL y01NO y01SE y01OC y01QM y01US y01CA y01AU y01NZ y01OH y01AR y01BR y01CL y01CO y01MX y01OD y01AE y01DZ y01EG y01IR y01MA y01SA y01TR y01OE y01CD y01CI y01ET y01KE y01ML y01NE y01NG y01RW y01SD y01ZA y01OJ y01RU y01OA y01CN y01JP y01KR y01TW y01OB y01BD y01IN y01ID y01MM y01PK y01PH y01TH y01VN y01OI 
y10WO y10EURO y10NAOC y10LATA y10MENA y10SSAF y10RUCA y10EASA y10SSEA y10DE y10DK y10ES y10FR y10GB y10IT y10NL y10NO y10SE y10OC y10QM y10US y10CA y10AU y10NZ y10OH y10AR y10BR y10CL y10CO y10MX y10OD y10AE y10DZ y10EG y10IR y10MA y10SA y10TR y10OE y10CD y10CI y10ET y10KE y10ML y10NE y10NG y10RW y10SD y10ZA y10OJ y10RU y10OA y10CN y10JP y10KR y10TW y10OB y10BD y10IN y10ID y10MM y10PK y10PH y10TH y10VN y10OI 
y25WO y25EURO y25NAOC y25LATA y25MENA y25SSAF y25RUCA y25EASA y25SSEA y25DE y25DK y25ES y25FR y25GB y25IT y25NL y25NO y25SE y25OC y25QM y25US y25CA y25AU y25NZ y25OH y25AR y25BR y25CL y25CO y25MX y25OD y25AE y25DZ y25EG y25IR y25MA y25SA y25TR y25OE y25CD y25CI y25ET y25KE y25ML y25NE y25NG y25RW y25SD y25ZA y25OJ y25RU y25OA y25CN y25JP y25KR y25TW y25OB y25BD y25IN y25ID y25MM y25PK y25PH y25TH y25VN y25OI 
y50WO y50EURO y50NAOC y50LATA y50MENA y50SSAF y50RUCA y50EASA y50SSEA y50DE y50DK y50ES y50FR y50GB y50IT y50NL y50NO y50SE y50OC y50QM y50US y50CA y50AU y50NZ y50OH y50AR y50BR y50CL y50CO y50MX y50OD y50AE y50DZ y50EG y50IR y50MA y50SA y50TR y50OE y50CD y50CI y50ET y50KE y50ML y50NE y50NG y50RW y50SD y50ZA y50OJ y50RU y50OA y50CN y50JP y50KR y50TW y50OB y50BD y50IN y50ID y50MM y50PK y50PH y50TH y50VN y50OI 
y75WO y75EURO y75NAOC y75LATA y75MENA y75SSAF y75RUCA y75EASA y75SSEA y75DE y75DK y75ES y75FR y75GB y75IT y75NL y75NO y75SE y75OC y75QM y75US y75CA y75AU y75NZ y75OH y75AR y75BR y75CL y75CO y75MX y75OD y75AE y75DZ y75EG y75IR y75MA y75SA y75TR y75OE y75CD y75CI y75ET y75KE y75ML y75NE y75NG y75RW y75SD y75ZA y75OJ y75RU y75OA y75CN y75JP y75KR y75TW y75OB y75BD y75IN y75ID y75MM y75PK y75PH y75TH y75VN y75OI 
y90WO y90EURO y90NAOC y90LATA y90MENA y90SSAF y90RUCA y90EASA y90SSEA y90DE y90DK y90ES y90FR y90GB y90IT y90NL y90NO y90SE y90OC y90QM y90US y90CA y90AU y90NZ y90OH y90AR y90BR y90CL y90CO y90MX y90OD y90AE y90DZ y90EG y90IR y90MA y90SA y90TR y90OE y90CD y90CI y90ET y90KE y90ML y90NE y90NG y90RW y90SD y90ZA y90OJ y90RU y90OA y90CN y90JP y90KR y90TW y90OB y90BD y90IN y90ID y90MM y90PK y90PH y90TH y90VN y90OI 
y99WO y99EURO y99NAOC y99LATA y99MENA y99SSAF y99RUCA y99EASA y99SSEA y99DE y99DK y99ES y99FR y99GB y99IT y99NL y99NO y99SE y99OC y99QM y99US y99CA y99AU y99NZ y99OH y99AR y99BR y99CL y99CO y99MX y99OD y99AE y99DZ y99EG y99IR y99MA y99SA y99TR y99OE y99CD y99CI y99ET y99KE y99ML y99NE y99NG y99RW y99SD y99ZA y99OJ y99RU y99OA y99CN y99JP y99KR y99TW y99OB y99BD y99IN y99ID y99MM y99PK y99PH y99TH y99VN y99OI 
y999WO y999EURO y999NAOC y999LATA y999MENA y999SSAF y999RUCA y999EASA y999SSEA y999DE y999DK y999ES y999FR y999GB y999IT y999NL y999NO y999SE y999OC y999QM y999US y999CA y999AU y999NZ y999OH y999AR y999BR y999CL y999CO y999MX y999OD y999AE y999DZ y999EG y999IR y999MA y999SA y999TR y999OE y999CD y999CI y999ET y999KE y999ML y999NE y999NG y999RW y999SD y999ZA y999OJ y999RU y999OA y999CN y999JP y999KR y999TW y999OB y999BD y999IN y999ID y999MM y999PK y999PH y999TH y999VN y999OI 
y9999WO y9999EURO y9999NAOC y9999LATA y9999MENA y9999SSAF y9999RUCA y9999EASA y9999SSEA y9999DE y9999DK y9999ES y9999FR y9999GB y9999IT y9999NL y9999NO y9999SE y9999OC y9999QM y9999US y9999CA y9999AU y9999NZ y9999OH y9999AR y9999BR y9999CL y9999CO y9999MX y9999OD y9999AE y9999DZ y9999EG y9999IR y9999MA y9999SA y9999TR y9999OE y9999CD y9999CI y9999ET y9999KE y9999ML y9999NE y9999NG y9999RW y9999SD y9999ZA y9999OJ y9999RU y9999OA y9999CN y9999JP y9999KR y9999TW y9999OB y9999BD y9999IN y9999ID y9999MM y9999PK y9999PH y9999TH y9999VN y9999OI 
y99999WO y99999EURO y99999NAOC y99999LATA y99999MENA y99999SSAF y99999RUCA y99999EASA y99999SSEA y99999DE y99999DK y99999ES y99999FR y99999GB y99999IT y99999NL y99999NO y99999SE y99999OC y99999QM y99999US y99999CA y99999AU y99999NZ y99999OH y99999AR y99999BR y99999CL y99999CO y99999MX y99999OD y99999AE y99999DZ y99999EG y99999IR y99999MA y99999SA y99999TR y99999OE y99999CD y99999CI y99999ET y99999KE y99999ML y99999NE y99999NG y99999RW y99999SD y99999ZA y99999OJ y99999RU y99999OA y99999CN y99999JP y99999KR y99999TW y99999OB y99999BD y99999IN y99999ID y99999MM y99999PK y99999PH y99999TH y99999VN y99999OI
t10pWO t10pEURO t10pNAOC t10pLATA t10pMENA t10pSSAF t10pRUCA t10pEASA t10pSSEA t10pDE t10pDK t10pES t10pFR t10pGB t10pIT t10pNL t10pNO t10pSE t10pOC t10pQM t10pUS t10pCA t10pAU t10pNZ t10pOH t10pAR t10pBR t10pCL t10pCO t10pMX t10pOD t10pAE t10pDZ t10pEG t10pIR t10pMA t10pSA t10pTR t10pOE t10pCD t10pCI t10pET t10pKE t10pML t10pNE t10pNG t10pRW t10pSD t10pZA t10pOJ t10pRU t10pOA t10pCN t10pJP t10pKR t10pTW t10pOB t10pBD t10pIN t10pID t10pMM t10pPK t10pPH t10pTH t10pVN t10pOI 
b50pWO b50pEURO b50pNAOC b50pLATA b50pMENA b50pSSAF b50pRUCA b50pEASA b50pSSEA b50pDE b50pDK b50pES b50pFR b50pGB b50pIT b50pNL b50pNO b50pSE b50pOC b50pQM b50pUS b50pCA b50pAU b50pNZ b50pOH b50pAR b50pBR b50pCL b50pCO b50pMX b50pOD b50pAE b50pDZ b50pEG b50pIR b50pMA b50pSA b50pTR b50pOE b50pCD b50pCI b50pET b50pKE b50pML b50pNE b50pNG b50pRW b50pSD b50pZA b50pOJ b50pRU b50pOA b50pCN b50pJP b50pKR b50pTW b50pOB b50pBD b50pIN b50pID b50pMM b50pPK b50pPH b50pTH b50pVN b50pOI 
b01pWO b01pEURO b01pNAOC b01pLATA b01pMENA b01pSSAF b01pRUCA b01pEASA b01pSSEA b01pDE b01pDK b01pES b01pFR b01pGB b01pIT b01pNL b01pNO b01pSE b01pOC b01pQM b01pUS b01pCA b01pAU b01pNZ b01pOH b01pAR b01pBR b01pCL b01pCO b01pMX b01pOD b01pAE b01pDZ b01pEG b01pIR b01pMA b01pSA b01pTR b01pOE b01pCD b01pCI b01pET b01pKE b01pML b01pNE b01pNG b01pRW b01pSD b01pZA b01pOJ b01pRU b01pOA b01pCN b01pJP b01pKR b01pTW b01pOB b01pBD b01pIN b01pID b01pMM b01pPK b01pPH b01pTH b01pVN b01pOI 
b10pWO b10pEURO b10pNAOC b10pLATA b10pMENA b10pSSAF b10pRUCA b10pEASA b10pSSEA b10pDE b10pDK b10pES b10pFR b10pGB b10pIT b10pNL b10pNO b10pSE b10pOC b10pQM b10pUS b10pCA b10pAU b10pNZ b10pOH b10pAR b10pBR b10pCL b10pCO b10pMX b10pOD b10pAE b10pDZ b10pEG b10pIR b10pMA b10pSA b10pTR b10pOE b10pCD b10pCI b10pET b10pKE b10pML b10pNE b10pNG b10pRW b10pSD b10pZA b10pOJ b10pRU b10pOA b10pCN b10pJP b10pKR b10pTW b10pOB b10pBD b10pIN b10pID b10pMM b10pPK b10pPH b10pTH b10pVN b10pOI 
b25pWO b25pEURO b25pNAOC b25pLATA b25pMENA b25pSSAF b25pRUCA b25pEASA b25pSSEA b25pDE b25pDK b25pES b25pFR b25pGB b25pIT b25pNL b25pNO b25pSE b25pOC b25pQM b25pUS b25pCA b25pAU b25pNZ b25pOH b25pAR b25pBR b25pCL b25pCO b25pMX b25pOD b25pAE b25pDZ b25pEG b25pIR b25pMA b25pSA b25pTR b25pOE b25pCD b25pCI b25pET b25pKE b25pML b25pNE b25pNG b25pRW b25pSD b25pZA b25pOJ b25pRU b25pOA b25pCN b25pJP b25pKR b25pTW b25pOB b25pBD b25pIN b25pID b25pMM b25pPK b25pPH b25pTH b25pVN b25pOI 
b75pWO b75pEURO b75pNAOC b75pLATA b75pMENA b75pSSAF b75pRUCA b75pEASA b75pSSEA b75pDE b75pDK b75pES b75pFR b75pGB b75pIT b75pNL b75pNO b75pSE b75pOC b75pQM b75pUS b75pCA b75pAU b75pNZ b75pOH b75pAR b75pBR b75pCL b75pCO b75pMX b75pOD b75pAE b75pDZ b75pEG b75pIR b75pMA b75pSA b75pTR b75pOE b75pCD b75pCI b75pET b75pKE b75pML b75pNE b75pNG b75pRW b75pSD b75pZA b75pOJ b75pRU b75pOA b75pCN b75pJP b75pKR b75pTW b75pOB b75pBD b75pIN b75pID b75pMM b75pPK b75pPH b75pTH b75pVN b75pOI 
t1pWO t1pEURO t1pNAOC t1pLATA t1pMENA t1pSSAF t1pRUCA t1pEASA t1pSSEA t1pDE t1pDK t1pES t1pFR t1pGB t1pIT t1pNL t1pNO t1pSE t1pOC t1pQM t1pUS t1pCA t1pAU t1pNZ t1pOH t1pAR t1pBR t1pCL t1pCO t1pMX t1pOD t1pAE t1pDZ t1pEG t1pIR t1pMA t1pSA t1pTR t1pOE t1pCD t1pCI t1pET t1pKE t1pML t1pNE t1pNG t1pRW t1pSD t1pZA t1pOJ t1pRU t1pOA t1pCN t1pJP t1pKR t1pTW t1pOB t1pBD t1pIN t1pID t1pMM t1pPK t1pPH t1pTH t1pVN t1pOI
t01pWO t01pEURO t01pNAOC t01pLATA t01pMENA t01pSSAF t01pRUCA t01pEASA t01pSSEA t01pDE t01pDK t01pES t01pFR t01pGB t01pIT t01pNL t01pNO t01pSE t01pOC t01pQM t01pUS t01pCA t01pAU t01pNZ t01pOH t01pAR t01pBR t01pCL t01pCO t01pMX t01pOD t01pAE t01pDZ t01pEG t01pIR t01pMA t01pSA t01pTR t01pOE t01pCD t01pCI t01pET t01pKE t01pML t01pNE t01pNG t01pRW t01pSD t01pZA t01pOJ t01pRU t01pOA t01pCN t01pJP t01pKR t01pTW t01pOB t01pBD t01pIN t01pID t01pMM t01pPK t01pPH t01pTH t01pVN t01pOI
t001pWO t001pEURO t001pNAOC t001pLATA t001pMENA t001pSSAF t001pRUCA t001pEASA t001pSSEA t001pDE t001pDK t001pES t001pFR t001pGB t001pIT t001pNL t001pNO t001pSE t001pOC t001pQM t001pUS t001pCA t001pAU t001pNZ t001pOH t001pAR t001pBR t001pCL t001pCO t001pMX t001pOD t001pAE t001pDZ t001pEG t001pIR t001pMA t001pSA t001pTR t001pOE t001pCD t001pCI t001pET t001pKE t001pML t001pNE t001pNG t001pRW t001pSD t001pZA t001pOJ t001pRU t001pOA t001pCN t001pJP t001pKR t001pTW t001pOB t001pBD t001pIN t001pID t001pMM t001pPK t001pPH t001pTH t001pVN t001pOI 
t0001pWO t0001pEURO t0001pNAOC t0001pLATA t0001pMENA t0001pSSAF t0001pRUCA t0001pEASA t0001pSSEA t0001pDE t0001pDK t0001pES t0001pFR t0001pGB t0001pIT t0001pNL t0001pNO t0001pSE t0001pOC t0001pQM t0001pUS t0001pCA t0001pAU t0001pNZ t0001pOH t0001pAR t0001pBR t0001pCL t0001pCO t0001pMX t0001pOD t0001pAE t0001pDZ t0001pEG t0001pIR t0001pMA t0001pSA t0001pTR t0001pOE t0001pCD t0001pCI t0001pET t0001pKE t0001pML t0001pNE t0001pNG t0001pRW t0001pSD t0001pZA t0001pOJ t0001pRU t0001pOA t0001pCN t0001pJP t0001pKR t0001pTW t0001pOB t0001pBD t0001pIN t0001pID t0001pMM t0001pPK t0001pPH t0001pTH t0001pVN t0001pOI 
p01WO p01EURO p01NAOC p01LATA p01MENA p01SSAF p01RUCA p01EASA p01SSEA p01DE p01DK p01ES p01FR p01GB p01IT p01NL p01NO p01SE p01OC p01QM p01US p01CA p01AU p01NZ p01OH p01AR p01BR p01CL p01CO p01MX p01OD p01AE p01DZ p01EG p01IR p01MA p01SA p01TR p01OE p01CD p01CI p01ET p01KE p01ML p01NE p01NG p01RW p01SD p01ZA p01OJ p01RU p01OA p01CN p01JP p01KR p01TW p01OB p01BD p01IN p01ID p01MM p01PK p01PH p01TH p01VN p01OI 
p10WO p10EURO p10NAOC p10LATA p10MENA p10SSAF p10RUCA p10EASA p10SSEA p10DE p10DK p10ES p10FR p10GB p10IT p10NL p10NO p10SE p10OC p10QM p10US p10CA p10AU p10NZ p10OH p10AR p10BR p10CL p10CO p10MX p10OD p10AE p10DZ p10EG p10IR p10MA p10SA p10TR p10OE p10CD p10CI p10ET p10KE p10ML p10NE p10NG p10RW p10SD p10ZA p10OJ p10RU p10OA p10CN p10JP p10KR p10TW p10OB p10BD p10IN p10ID p10MM p10PK p10PH p10TH p10VN p10OI 
p25WO p25EURO p25NAOC p25LATA p25MENA p25SSAF p25RUCA p25EASA p25SSEA p25DE p25DK p25ES p25FR p25GB p25IT p25NL p25NO p25SE p25OC p25QM p25US p25CA p25AU p25NZ p25OH p25AR p25BR p25CL p25CO p25MX p25OD p25AE p25DZ p25EG p25IR p25MA p25SA p25TR p25OE p25CD p25CI p25ET p25KE p25ML p25NE p25NG p25RW p25SD p25ZA p25OJ p25RU p25OA p25CN p25JP p25KR p25TW p25OB p25BD p25IN p25ID p25MM p25PK p25PH p25TH p25VN p25OI 
p50WO p50EURO p50NAOC p50LATA p50MENA p50SSAF p50RUCA p50EASA p50SSEA p50DE p50DK p50ES p50FR p50GB p50IT p50NL p50NO p50SE p50OC p50QM p50US p50CA p50AU p50NZ p50OH p50AR p50BR p50CL p50CO p50MX p50OD p50AE p50DZ p50EG p50IR p50MA p50SA p50TR p50OE p50CD p50CI p50ET p50KE p50ML p50NE p50NG p50RW p50SD p50ZA p50OJ p50RU p50OA p50CN p50JP p50KR p50TW p50OB p50BD p50IN p50ID p50MM p50PK p50PH p50TH p50VN p50OI 
p75WO p75EURO p75NAOC p75LATA p75MENA p75SSAF p75RUCA p75EASA p75SSEA p75DE p75DK p75ES p75FR p75GB p75IT p75NL p75NO p75SE p75OC p75QM p75US p75CA p75AU p75NZ p75OH p75AR p75BR p75CL p75CO p75MX p75OD p75AE p75DZ p75EG p75IR p75MA p75SA p75TR p75OE p75CD p75CI p75ET p75KE p75ML p75NE p75NG p75RW p75SD p75ZA p75OJ p75RU p75OA p75CN p75JP p75KR p75TW p75OB p75BD p75IN p75ID p75MM p75PK p75PH p75TH p75VN p75OI 
p90WO p90EURO p90NAOC p90LATA p90MENA p90SSAF p90RUCA p90EASA p90SSEA p90DE p90DK p90ES p90FR p90GB p90IT p90NL p90NO p90SE p90OC p90QM p90US p90CA p90AU p90NZ p90OH p90AR p90BR p90CL p90CO p90MX p90OD p90AE p90DZ p90EG p90IR p90MA p90SA p90TR p90OE p90CD p90CI p90ET p90KE p90ML p90NE p90NG p90RW p90SD p90ZA p90OJ p90RU p90OA p90CN p90JP p90KR p90TW p90OB p90BD p90IN p90ID p90MM p90PK p90PH p90TH p90VN p90OI 
p99WO p99EURO p99NAOC p99LATA p99MENA p99SSAF p99RUCA p99EASA p99SSEA p99DE p99DK p99ES p99FR p99GB p99IT p99NL p99NO p99SE p99OC p99QM p99US p99CA p99AU p99NZ p99OH p99AR p99BR p99CL p99CO p99MX p99OD p99AE p99DZ p99EG p99IR p99MA p99SA p99TR p99OE p99CD p99CI p99ET p99KE p99ML p99NE p99NG p99RW p99SD p99ZA p99OJ p99RU p99OA p99CN p99JP p99KR p99TW p99OB p99BD p99IN p99ID p99MM p99PK p99PH p99TH p99VN p99OI 
p999WO p999EURO p999NAOC p999LATA p999MENA p999SSAF p999RUCA p999EASA p999SSEA p999DE p999DK p999ES p999FR p999GB p999IT p999NL p999NO p999SE p999OC p999QM p999US p999CA p999AU p999NZ p999OH p999AR p999BR p999CL p999CO p999MX p999OD p999AE p999DZ p999EG p999IR p999MA p999SA p999TR p999OE p999CD p999CI p999ET p999KE p999ML p999NE p999NG p999RW p999SD p999ZA p999OJ p999RU p999OA p999CN p999JP p999KR p999TW p999OB p999BD p999IN p999ID p999MM p999PK p999PH p999TH p999VN p999OI 
p9999WO p9999EURO p9999NAOC p9999LATA p9999MENA p9999SSAF p9999RUCA p9999EASA p9999SSEA p9999DE p9999DK p9999ES p9999FR p9999GB p9999IT p9999NL p9999NO p9999SE p9999OC p9999QM p9999US p9999CA p9999AU p9999NZ p9999OH p9999AR p9999BR p9999CL p9999CO p9999MX p9999OD p9999AE p9999DZ p9999EG p9999IR p9999MA p9999SA p9999TR p9999OE p9999CD p9999CI p9999ET p9999KE p9999ML p9999NE p9999NG p9999RW p9999SD p9999ZA p9999OJ p9999RU p9999OA p9999CN p9999JP p9999KR p9999TW p9999OB p9999BD p9999IN p9999ID p9999MM p9999PK p9999PH p9999TH p9999VN p9999OI 
p99999WO p99999EURO p99999NAOC p99999LATA p99999MENA p99999SSAF p99999RUCA p99999EASA p99999SSEA p99999DE p99999DK p99999ES p99999FR p99999GB p99999IT p99999NL p99999NO p99999SE p99999OC p99999QM p99999US p99999CA p99999AU p99999NZ p99999OH p99999AR p99999BR p99999CL p99999CO p99999MX p99999OD p99999AE p99999DZ p99999EG p99999IR p99999MA p99999SA p99999TR p99999OE p99999CD p99999CI p99999ET p99999KE p99999ML p99999NE p99999NG p99999RW p99999SD p99999ZA p99999OJ p99999RU p99999OA p99999CN p99999JP p99999KR p99999TW p99999OB p99999BD p99999IN p99999ID p99999MM p99999PK p99999PH p99999TH p99999VN p99999OI 
t10wWO t10wEURO t10wNAOC t10wLATA t10wMENA t10wSSAF t10wRUCA t10wEASA t10wSSEA t10wDE t10wDK t10wES t10wFR t10wGB t10wIT t10wNL t10wNO t10wSE t10wOC t10wQM t10wUS t10wCA t10wAU t10wNZ t10wOH t10wAR t10wBR t10wCL t10wCO t10wMX t10wOD t10wAE t10wDZ t10wEG t10wIR t10wMA t10wSA t10wTR t10wOE t10wCD t10wCI t10wET t10wKE t10wML t10wNE t10wNG t10wRW t10wSD t10wZA t10wOJ t10wRU t10wOA t10wCN t10wJP t10wKR t10wTW t10wOB t10wBD t10wIN t10wID t10wMM t10wPK t10wPH t10wTH t10wVN t10wOI 
b50wWO b50wEURO b50wNAOC b50wLATA b50wMENA b50wSSAF b50wRUCA b50wEASA b50wSSEA b50wDE b50wDK b50wES b50wFR b50wGB b50wIT b50wNL b50wNO b50wSE b50wOC b50wQM b50wUS b50wCA b50wAU b50wNZ b50wOH b50wAR b50wBR b50wCL b50wCO b50wMX b50wOD b50wAE b50wDZ b50wEG b50wIR b50wMA b50wSA b50wTR b50wOE b50wCD b50wCI b50wET b50wKE b50wML b50wNE b50wNG b50wRW b50wSD b50wZA b50wOJ b50wRU b50wOA b50wCN b50wJP b50wKR b50wTW b50wOB b50wBD b50wIN b50wID b50wMM b50wPK b50wPH b50wTH b50wVN b50wOI 
b01wWO b01wEURO b01wNAOC b01wLATA b01wMENA b01wSSAF b01wRUCA b01wEASA b01wSSEA b01wDE b01wDK b01wES b01wFR b01wGB b01wIT b01wNL b01wNO b01wSE b01wOC b01wQM b01wUS b01wCA b01wAU b01wNZ b01wOH b01wAR b01wBR b01wCL b01wCO b01wMX b01wOD b01wAE b01wDZ b01wEG b01wIR b01wMA b01wSA b01wTR b01wOE b01wCD b01wCI b01wET b01wKE b01wML b01wNE b01wNG b01wRW b01wSD b01wZA b01wOJ b01wRU b01wOA b01wCN b01wJP b01wKR b01wTW b01wOB b01wBD b01wIN b01wID b01wMM b01wPK b01wPH b01wTH b01wVN b01wOI 
b10wWO b10wEURO b10wNAOC b10wLATA b10wMENA b10wSSAF b10wRUCA b10wEASA b10wSSEA b10wDE b10wDK b10wES b10wFR b10wGB b10wIT b10wNL b10wNO b10wSE b10wOC b10wQM b10wUS b10wCA b10wAU b10wNZ b10wOH b10wAR b10wBR b10wCL b10wCO b10wMX b10wOD b10wAE b10wDZ b10wEG b10wIR b10wMA b10wSA b10wTR b10wOE b10wCD b10wCI b10wET b10wKE b10wML b10wNE b10wNG b10wRW b10wSD b10wZA b10wOJ b10wRU b10wOA b10wCN b10wJP b10wKR b10wTW b10wOB b10wBD b10wIN b10wID b10wMM b10wPK b10wPH b10wTH b10wVN b10wOI 
b25wWO b25wEURO b25wNAOC b25wLATA b25wMENA b25wSSAF b25wRUCA b25wEASA b25wSSEA b25wDE b25wDK b25wES b25wFR b25wGB b25wIT b25wNL b25wNO b25wSE b25wOC b25wQM b25wUS b25wCA b25wAU b25wNZ b25wOH b25wAR b25wBR b25wCL b25wCO b25wMX b25wOD b25wAE b25wDZ b25wEG b25wIR b25wMA b25wSA b25wTR b25wOE b25wCD b25wCI b25wET b25wKE b25wML b25wNE b25wNG b25wRW b25wSD b25wZA b25wOJ b25wRU b25wOA b25wCN b25wJP b25wKR b25wTW b25wOB b25wBD b25wIN b25wID b25wMM b25wPK b25wPH b25wTH b25wVN b25wOI 
b75wWO b75wEURO b75wNAOC b75wLATA b75wMENA b75wSSAF b75wRUCA b75wEASA b75wSSEA b75wDE b75wDK b75wES b75wFR b75wGB b75wIT b75wNL b75wNO b75wSE b75wOC b75wQM b75wUS b75wCA b75wAU b75wNZ b75wOH b75wAR b75wBR b75wCL b75wCO b75wMX b75wOD b75wAE b75wDZ b75wEG b75wIR b75wMA b75wSA b75wTR b75wOE b75wCD b75wCI b75wET b75wKE b75wML b75wNE b75wNG b75wRW b75wSD b75wZA b75wOJ b75wRU b75wOA b75wCN b75wJP b75wKR b75wTW b75wOB b75wBD b75wIN b75wID b75wMM b75wPK b75wPH b75wTH b75wVN b75wOI 
t1wWO t1wEURO t1wNAOC t1wLATA t1wMENA t1wSSAF t1wRUCA t1wEASA t1wSSEA t1wDE t1wDK t1wES t1wFR t1wGB t1wIT t1wNL t1wNO t1wSE t1wOC t1wQM t1wUS t1wCA t1wAU t1wNZ t1wOH t1wAR t1wBR t1wCL t1wCO t1wMX t1wOD t1wAE t1wDZ t1wEG t1wIR t1wMA t1wSA t1wTR t1wOE t1wCD t1wCI t1wET t1wKE t1wML t1wNE t1wNG t1wRW t1wSD t1wZA t1wOJ t1wRU t1wOA t1wCN t1wJP t1wKR t1wTW t1wOB t1wBD t1wIN t1wID t1wMM t1wPK t1wPH t1wTH t1wVN t1wOI
t01wWO t01wEURO t01wNAOC t01wLATA t01wMENA t01wSSAF t01wRUCA t01wEASA t01wSSEA t01wDE t01wDK t01wES t01wFR t01wGB t01wIT t01wNL t01wNO t01wSE t01wOC t01wQM t01wUS t01wCA t01wAU t01wNZ t01wOH t01wAR t01wBR t01wCL t01wCO t01wMX t01wOD t01wAE t01wDZ t01wEG t01wIR t01wMA t01wSA t01wTR t01wOE t01wCD t01wCI t01wET t01wKE t01wML t01wNE t01wNG t01wRW t01wSD t01wZA t01wOJ t01wRU t01wOA t01wCN t01wJP t01wKR t01wTW t01wOB t01wBD t01wIN t01wID t01wMM t01wPK t01wPH t01wTH t01wVN t01wOI
t001wWO t001wEURO t001wNAOC t001wLATA t001wMENA t001wSSAF t001wRUCA t001wEASA t001wSSEA t001wDE t001wDK t001wES t001wFR t001wGB t001wIT t001wNL t001wNO t001wSE t001wOC t001wQM t001wUS t001wCA t001wAU t001wNZ t001wOH t001wAR t001wBR t001wCL t001wCO t001wMX t001wOD t001wAE t001wDZ t001wEG t001wIR t001wMA t001wSA t001wTR t001wOE t001wCD t001wCI t001wET t001wKE t001wML t001wNE t001wNG t001wRW t001wSD t001wZA t001wOJ t001wRU t001wOA t001wCN t001wJP t001wKR t001wTW t001wOB t001wBD t001wIN t001wID t001wMM t001wPK t001wPH t001wTH t001wVN t001wOI 
t0001wWO t0001wEURO t0001wNAOC t0001wLATA t0001wMENA t0001wSSAF t0001wRUCA t0001wEASA t0001wSSEA t0001wDE t0001wDK t0001wES t0001wFR t0001wGB t0001wIT t0001wNL t0001wNO t0001wSE t0001wOC t0001wQM t0001wUS t0001wCA t0001wAU t0001wNZ t0001wOH t0001wAR t0001wBR t0001wCL t0001wCO t0001wMX t0001wOD t0001wAE t0001wDZ t0001wEG t0001wIR t0001wMA t0001wSA t0001wTR t0001wOE t0001wCD t0001wCI t0001wET t0001wKE t0001wML t0001wNE t0001wNG t0001wRW t0001wSD t0001wZA t0001wOJ t0001wRU t0001wOA t0001wCN t0001wJP t0001wKR t0001wTW t0001wOB t0001wBD t0001wIN t0001wID t0001wMM t0001wPK t0001wPH t0001wTH t0001wVN t0001wOI 
w01WO w01EURO w01NAOC w01LATA w01MENA w01SSAF w01RUCA w01EASA w01SSEA w01DE w01DK w01ES w01FR w01GB w01IT w01NL w01NO w01SE w01OC w01QM w01US w01CA w01AU w01NZ w01OH w01AR w01BR w01CL w01CO w01MX w01OD w01AE w01DZ w01EG w01IR w01MA w01SA w01TR w01OE w01CD w01CI w01ET w01KE w01ML w01NE w01NG w01RW w01SD w01ZA w01OJ w01RU w01OA w01CN w01JP w01KR w01TW w01OB w01BD w01IN w01ID w01MM w01PK w01PH w01TH w01VN w01OI 
w10WO w10EURO w10NAOC w10LATA w10MENA w10SSAF w10RUCA w10EASA w10SSEA w10DE w10DK w10ES w10FR w10GB w10IT w10NL w10NO w10SE w10OC w10QM w10US w10CA w10AU w10NZ w10OH w10AR w10BR w10CL w10CO w10MX w10OD w10AE w10DZ w10EG w10IR w10MA w10SA w10TR w10OE w10CD w10CI w10ET w10KE w10ML w10NE w10NG w10RW w10SD w10ZA w10OJ w10RU w10OA w10CN w10JP w10KR w10TW w10OB w10BD w10IN w10ID w10MM w10PK w10PH w10TH w10VN w10OI 
w25WO w25EURO w25NAOC w25LATA w25MENA w25SSAF w25RUCA w25EASA w25SSEA w25DE w25DK w25ES w25FR w25GB w25IT w25NL w25NO w25SE w25OC w25QM w25US w25CA w25AU w25NZ w25OH w25AR w25BR w25CL w25CO w25MX w25OD w25AE w25DZ w25EG w25IR w25MA w25SA w25TR w25OE w25CD w25CI w25ET w25KE w25ML w25NE w25NG w25RW w25SD w25ZA w25OJ w25RU w25OA w25CN w25JP w25KR w25TW w25OB w25BD w25IN w25ID w25MM w25PK w25PH w25TH w25VN w25OI 
w50WO w50EURO w50NAOC w50LATA w50MENA w50SSAF w50RUCA w50EASA w50SSEA w50DE w50DK w50ES w50FR w50GB w50IT w50NL w50NO w50SE w50OC w50QM w50US w50CA w50AU w50NZ w50OH w50AR w50BR w50CL w50CO w50MX w50OD w50AE w50DZ w50EG w50IR w50MA w50SA w50TR w50OE w50CD w50CI w50ET w50KE w50ML w50NE w50NG w50RW w50SD w50ZA w50OJ w50RU w50OA w50CN w50JP w50KR w50TW w50OB w50BD w50IN w50ID w50MM w50PK w50PH w50TH w50VN w50OI 
w75WO w75EURO w75NAOC w75LATA w75MENA w75SSAF w75RUCA w75EASA w75SSEA w75DE w75DK w75ES w75FR w75GB w75IT w75NL w75NO w75SE w75OC w75QM w75US w75CA w75AU w75NZ w75OH w75AR w75BR w75CL w75CO w75MX w75OD w75AE w75DZ w75EG w75IR w75MA w75SA w75TR w75OE w75CD w75CI w75ET w75KE w75ML w75NE w75NG w75RW w75SD w75ZA w75OJ w75RU w75OA w75CN w75JP w75KR w75TW w75OB w75BD w75IN w75ID w75MM w75PK w75PH w75TH w75VN w75OI 
w90WO w90EURO w90NAOC w90LATA w90MENA w90SSAF w90RUCA w90EASA w90SSEA w90DE w90DK w90ES w90FR w90GB w90IT w90NL w90NO w90SE w90OC w90QM w90US w90CA w90AU w90NZ w90OH w90AR w90BR w90CL w90CO w90MX w90OD w90AE w90DZ w90EG w90IR w90MA w90SA w90TR w90OE w90CD w90CI w90ET w90KE w90ML w90NE w90NG w90RW w90SD w90ZA w90OJ w90RU w90OA w90CN w90JP w90KR w90TW w90OB w90BD w90IN w90ID w90MM w90PK w90PH w90TH w90VN w90OI 
w99WO w99EURO w99NAOC w99LATA w99MENA w99SSAF w99RUCA w99EASA w99SSEA w99DE w99DK w99ES w99FR w99GB w99IT w99NL w99NO w99SE w99OC w99QM w99US w99CA w99AU w99NZ w99OH w99AR w99BR w99CL w99CO w99MX w99OD w99AE w99DZ w99EG w99IR w99MA w99SA w99TR w99OE w99CD w99CI w99ET w99KE w99ML w99NE w99NG w99RW w99SD w99ZA w99OJ w99RU w99OA w99CN w99JP w99KR w99TW w99OB w99BD w99IN w99ID w99MM w99PK w99PH w99TH w99VN w99OI 
w999WO w999EURO w999NAOC w999LATA w999MENA w999SSAF w999RUCA w999EASA w999SSEA w999DE w999DK w999ES w999FR w999GB w999IT w999NL w999NO w999SE w999OC w999QM w999US w999CA w999AU w999NZ w999OH w999AR w999BR w999CL w999CO w999MX w999OD w999AE w999DZ w999EG w999IR w999MA w999SA w999TR w999OE w999CD w999CI w999ET w999KE w999ML w999NE w999NG w999RW w999SD w999ZA w999OJ w999RU w999OA w999CN w999JP w999KR w999TW w999OB w999BD w999IN w999ID w999MM w999PK w999PH w999TH w999VN w999OI 
w9999WO w9999EURO w9999NAOC w9999LATA w9999MENA w9999SSAF w9999RUCA w9999EASA w9999SSEA w9999DE w9999DK w9999ES w9999FR w9999GB w9999IT w9999NL w9999NO w9999SE w9999OC w9999QM w9999US w9999CA w9999AU w9999NZ w9999OH w9999AR w9999BR w9999CL w9999CO w9999MX w9999OD w9999AE w9999DZ w9999EG w9999IR w9999MA w9999SA w9999TR w9999OE w9999CD w9999CI w9999ET w9999KE w9999ML w9999NE w9999NG w9999RW w9999SD w9999ZA w9999OJ w9999RU w9999OA w9999CN w9999JP w9999KR w9999TW w9999OB w9999BD w9999IN w9999ID w9999MM w9999PK w9999PH w9999TH w9999VN w9999OI 
w99999WO w99999EURO w99999NAOC w99999LATA w99999MENA w99999SSAF w99999RUCA w99999EASA w99999SSEA w99999DE w99999DK w99999ES w99999FR w99999GB w99999IT w99999NL w99999NO w99999SE w99999OC w99999QM w99999US w99999CA w99999AU w99999NZ w99999OH w99999AR w99999BR w99999CL w99999CO w99999MX w99999OD w99999AE w99999DZ w99999EG w99999IR w99999MA w99999SA w99999TR w99999OE w99999CD w99999CI w99999ET w99999KE w99999ML w99999NE w99999NG w99999RW w99999SD w99999ZA w99999OJ w99999RU w99999OA w99999CN w99999JP w99999KR w99999TW w99999OB w99999BD w99999IN w99999ID w99999MM w99999PK w99999PH w99999TH w99999VN w99999OI
giniyWO giniyEURO giniyNAOC giniyLATA giniyMENA giniySSAF giniyRUCA giniyEASA giniySSEA giniyDE giniyDK giniyES giniyFR giniyGB giniyIT giniyNL giniyNO giniySE giniyOC giniyQM giniyUS giniyCA giniyAU giniyNZ giniyOH giniyAR giniyBR giniyCL giniyCO giniyMX giniyOD giniyAE giniyDZ giniyEG giniyIR giniyMA giniySA giniyTR giniyOE giniyCD giniyCI giniyET giniyKE giniyML giniyNE giniyNG giniyRW giniySD giniyZA giniyOJ giniyRU giniyOA giniyCN giniyJP giniyKR giniyTW giniyOB giniyBD giniyIN giniyID giniyMM giniyPK giniyPH giniyTH giniyVN giniyOI 
ginipWO ginipEURO ginipNAOC ginipLATA ginipMENA ginipSSAF ginipRUCA ginipEASA ginipSSEA ginipDE ginipDK ginipES ginipFR ginipGB ginipIT ginipNL ginipNO ginipSE ginipOC ginipQM ginipUS ginipCA ginipAU ginipNZ ginipOH ginipAR ginipBR ginipCL ginipCO ginipMX ginipOD ginipAE ginipDZ ginipEG ginipIR ginipMA ginipSA ginipTR ginipOE ginipCD ginipCI ginipET ginipKE ginipML ginipNE ginipNG ginipRW ginipSD ginipZA ginipOJ ginipRU ginipOA ginipCN ginipJP ginipKR ginipTW ginipOB ginipBD ginipIN ginipID ginipMM ginipPK ginipPH ginipTH ginipVN ginipOI
giniwWO giniwEURO giniwNAOC giniwLATA giniwMENA giniwSSAF giniwRUCA giniwEASA giniwSSEA giniwDE giniwDK giniwES giniwFR giniwGB giniwIT giniwNL giniwNO giniwSE giniwOC giniwQM giniwUS giniwCA giniwAU giniwNZ giniwOH giniwAR giniwBR giniwCL giniwCO giniwMX giniwOD giniwAE giniwDZ giniwEG giniwIR giniwMA giniwSA giniwTR giniwOE giniwCD giniwCI giniwET giniwKE giniwML giniwNE giniwNG giniwRW giniwSD giniwZA giniwOJ giniwRU giniwOA giniwCN giniwJP giniwKR giniwTW giniwOB giniwBD giniwIN giniwID giniwMM giniwPK giniwPH giniwTH giniwVN giniwOI; 
save Data/equality.dta, replace;

/****export posttax inequality series**/
use Data/equality.dta, clear;
keep t10y*;
export excel using Equality2025Appendix.xlsx, sheet("A1a", modify) cell(B5) keepcellfmt;
use Data/equality.dta, clear;
keep b50y*;
export excel using Equality2025Appendix.xlsx, sheet("A1b", modify) cell(B5) keepcellfmt;
use Data/equality.dta, clear;
keep t1y*;
export excel using Equality2025Appendix.xlsx, sheet("A1c", modify) cell(B5) keepcellfmt;
use Data/equality.dta, clear;
keep t01y*;
export excel using Equality2025Appendix.xlsx, sheet("A1d", modify) cell(B5) keepcellfmt;
use Data/equality.dta, clear;
keep b10y*;
export excel using Equality2025Appendix.xlsx, sheet("A1e", modify) cell(B5) keepcellfmt;
use Data/equality.dta, clear;
keep b01y*;
export excel using Equality2025Appendix.xlsx, sheet("A1f", modify) cell(B5) keepcellfmt;
use Data/equality.dta, clear;
keep t001y*;
export excel using Equality2025Appendix.xlsx, sheet("A1g", modify) cell(B5) keepcellfmt;
use Data/equality.dta, clear;
keep t0001y*;
export excel using Equality2025Appendix.xlsx, sheet("A1h", modify) cell(B5) keepcellfmt;
use Data/equality.dta, clear;
keep b25y*;
export excel using Equality2025Appendix.xlsx, sheet("A1i", modify) cell(B5) keepcellfmt;
use Data/equality.dta, clear;
keep b75y*;
export excel using Equality2025Appendix.xlsx, sheet("A1j", modify) cell(B5) keepcellfmt;
use Data/equality.dta, clear;
keep y50*;
export excel using Equality2025Appendix.xlsx, sheet("A3a", modify) cell(B5) keepcellfmt;
use Data/equality.dta, clear;
keep y10*;
export excel using Equality2025Appendix.xlsx, sheet("A3b", modify) cell(B5) keepcellfmt;
use Data/equality.dta, clear;
keep y90*;
export excel using Equality2025Appendix.xlsx, sheet("A3c", modify) cell(B5) keepcellfmt;
use Data/equality.dta, clear;
keep y99*;
drop y999*;
export excel using Equality2025Appendix.xlsx, sheet("A3d", modify) cell(B5) keepcellfmt;
use Data/equality.dta, clear;
keep y999*;
drop y9999*;
export excel using Equality2025Appendix.xlsx, sheet("A3e", modify) cell(B5) keepcellfmt;
use Data/equality.dta, clear;
keep y01*;
export excel using Equality2025Appendix.xlsx, sheet("A3f", modify) cell(B5) keepcellfmt;
use Data/equality.dta, clear;
keep y25*;
export excel using Equality2025Appendix.xlsx, sheet("A3g", modify) cell(B5) keepcellfmt;
use Data/equality.dta, clear;
keep y75*;
export excel using Equality2025Appendix.xlsx, sheet("A3h", modify) cell(B5) keepcellfmt;
use Data/equality.dta, clear;
keep y9999*;
drop y99999*;
export excel using Equality2025Appendix.xlsx, sheet("A3i", modify) cell(B5) keepcellfmt;
use Data/equality.dta, clear;
keep y99999*;
export excel using Equality2025Appendix.xlsx, sheet("A3j", modify) cell(B5) keepcellfmt;
use Data/equality.dta, clear;
keep giniy*;
export excel using Equality2025Appendix.xlsx, sheet("A6", modify) cell(B5) keepcellfmt;

/****export pretax inequality series**/
use Data/equality.dta, clear;
keep t10p*;
export excel using Equality2025Appendix.xlsx, sheet("D1a", modify) cell(B5) keepcellfmt;
use Data/equality.dta, clear;
keep b50p*;
export excel using Equality2025Appendix.xlsx, sheet("D1b", modify) cell(B5) keepcellfmt;
use Data/equality.dta, clear;
keep t1p*;
export excel using Equality2025Appendix.xlsx, sheet("D1c", modify) cell(B5) keepcellfmt;
use Data/equality.dta, clear;
keep t01p*;
export excel using Equality2025Appendix.xlsx, sheet("D1d", modify) cell(B5) keepcellfmt;
use Data/equality.dta, clear;
keep b10p*;
export excel using Equality2025Appendix.xlsx, sheet("D1e", modify) cell(B5) keepcellfmt;
use Data/equality.dta, clear;
keep b01p*;
export excel using Equality2025Appendix.xlsx, sheet("D1f", modify) cell(B5) keepcellfmt;
use Data/equality.dta, clear;
keep t001p*;
export excel using Equality2025Appendix.xlsx, sheet("D1g", modify) cell(B5) keepcellfmt;
use Data/equality.dta, clear;
keep t0001p*;
export excel using Equality2025Appendix.xlsx, sheet("D1h", modify) cell(B5) keepcellfmt;
use Data/equality.dta, clear;
keep b25p*;
export excel using Equality2025Appendix.xlsx, sheet("D1i", modify) cell(B5) keepcellfmt;
use Data/equality.dta, clear;
keep b75p*;
export excel using Equality2025Appendix.xlsx, sheet("D1j", modify) cell(B5) keepcellfmt;
use Data/equality.dta, clear;
keep p50*;
export excel using Equality2025Appendix.xlsx, sheet("D3a", modify) cell(B5) keepcellfmt;
use Data/equality.dta, clear;
keep p10*;
export excel using Equality2025Appendix.xlsx, sheet("D3b", modify) cell(B5) keepcellfmt;
use Data/equality.dta, clear;
keep p90*;
export excel using Equality2025Appendix.xlsx, sheet("D3c", modify) cell(B5) keepcellfmt;
use Data/equality.dta, clear;
keep p99*;
drop p999*;
export excel using Equality2025Appendix.xlsx, sheet("D3d", modify) cell(B5) keepcellfmt;
use Data/equality.dta, clear;
keep p999*;
drop p9999*;
export excel using Equality2025Appendix.xlsx, sheet("D3e", modify) cell(B5) keepcellfmt;
use Data/equality.dta, clear;
keep p01*;
export excel using Equality2025Appendix.xlsx, sheet("D3f", modify) cell(B5) keepcellfmt;
use Data/equality.dta, clear;
keep p25*;
export excel using Equality2025Appendix.xlsx, sheet("D3g", modify) cell(B5) keepcellfmt;
use Data/equality.dta, clear;
keep p75*;
export excel using Equality2025Appendix.xlsx, sheet("D3h", modify) cell(B5) keepcellfmt;
use Data/equality.dta, clear;
keep p9999*;
drop p99999*;
export excel using Equality2025Appendix.xlsx, sheet("D3i", modify) cell(B5) keepcellfmt;
use Data/equality.dta, clear;
keep p99999*;
export excel using Equality2025Appendix.xlsx, sheet("D3j", modify) cell(B5) keepcellfmt;
use Data/equality.dta, clear;
keep ginip*;
export excel using Equality2025Appendix.xlsx, sheet("D4", modify) cell(B5) keepcellfmt;

/*
/****export wealth inequality series**/
use Data/equality.dta, clear;
keep t10w*;
export excel using Equality2025Appendix.xlsx, sheet("E1a", modify) cell(B5) keepcellfmt;
use Data/equality.dta, clear;
keep b50w*;
export excel using Equality2025Appendix.xlsx, sheet("E1b", modify) cell(B5) keepcellfmt;
use Data/equality.dta, clear;
keep t1w*;
export excel using Equality2025Appendix.xlsx, sheet("E1c", modify) cell(B5) keepcellfmt;
use Data/equality.dta, clear;
keep t01w*;
export excel using Equality2025Appendix.xlsx, sheet("E1d", modify) cell(B5) keepcellfmt;
use Data/equality.dta, clear;
keep b10w*;
export excel using Equality2025Appendix.xlsx, sheet("E1e", modify) cell(B5) keepcellfmt;
use Data/equality.dta, clear;
keep b01w*;
export excel using Equality2025Appendix.xlsx, sheet("E1f", modify) cell(B5) keepcellfmt;
use Data/equality.dta, clear;
keep t001w*;
export excel using Equality2025Appendix.xlsx, sheet("E1g", modify) cell(B5) keepcellfmt;
use Data/equality.dta, clear;
keep t0001w*;
export excel using Equality2025Appendix.xlsx, sheet("E1h", modify) cell(B5) keepcellfmt;
use Data/equality.dta, clear;
keep b25w*;
export excel using Equality2025Appendix.xlsx, sheet("E1i", modify) cell(B5) keepcellfmt;
use Data/equality.dta, clear;
keep b75w*;
export excel using Equality2025Appendix.xlsx, sheet("E1j", modify) cell(B5) keepcellfmt;
use Data/equality.dta, clear;
keep w50*;
export excel using Equality2025Appendix.xlsx, sheet("E3a", modify) cell(B5) keepcellfmt;
use Data/equality.dta, clear;
keep w10*;
export excel using Equality2025Appendix.xlsx, sheet("E3b", modify) cell(B5) keepcellfmt;
use Data/equality.dta, clear;
keep w90*;
export excel using Equality2025Appendix.xlsx, sheet("E3c", modify) cell(B5) keepcellfmt;
use Data/equality.dta, clear;
keep w99*;
drop w999*;
export excel using Equality2025Appendix.xlsx, sheet("E3d", modify) cell(B5) keepcellfmt;
use Data/equality.dta, clear;
keep w999*;
drop w9999*;
export excel using Equality2025Appendix.xlsx, sheet("E3e", modify) cell(B5) keepcellfmt;
use Data/equality.dta, clear;
keep w01*;
export excel using Equality2025Appendix.xlsx, sheet("E3f", modify) cell(B5) keepcellfmt;
use Data/equality.dta, clear;
keep w25*;
export excel using Equality2025Appendix.xlsx, sheet("E3g", modify) cell(B5) keepcellfmt;
use Data/equality.dta, clear;
keep w75*;
export excel using Equality2025Appendix.xlsx, sheet("E3h", modify) cell(B5) keepcellfmt;
use Data/equality.dta, clear;
keep w9999*;
drop w99999*;
export excel using Equality2025Appendix.xlsx, sheet("E3i", modify) cell(B5) keepcellfmt;
use Data/equality.dta, clear;
keep w99999*;
export excel using Equality2025Appendix.xlsx, sheet("E3j", modify) cell(B5) keepcellfmt;
use Data/equality.dta, clear;
keep giniw*;
export excel using Equality2025Appendix.xlsx, sheet("E6", modify) cell(B5) keepcellfmt;