use "KEIR71FL.dta", clear
gen wt=v005/1000000

//Unmet need spacing
gen fp_unmet_space = v626a==1
label var fp_unmet_space "Unmet need for spacing"

//Unmet need limiting
gen fp_unmet_limit = v626a==2
label var fp_unmet_limit "Unmet need for limiting"

//Unmet need total
gen fp_unmet_tot = (v626a==1|v626a==2)
label var fp_unmet_tot "Unmet need total"

//Met need spacing
gen fp_met_space = v626a==3
label var fp_met_space "Met need for spacing"

//Met need limiting
gen fp_met_limit = v626a==4
label var fp_unmet_limit "Met need for limiting"

//Met need total
gen fp_met_tot = (v626a==3|v626a==4)
label var fp_met_tot "Met need total"

//Total demand for spacing
gen fp_demand_space = (v626a==1|v626a==3)
label var fp_demand_space "Total demand for spacing"

//Total demand for limiting
gen fp_demand_limit = (v626a==2|v626a==4)
label var fp_demand_limit "Total demand for limiting"

//Total demand -total
gen fp_demand_tot = inlist(v626a,1,3,2,4)
label var fp_demand_tot "Total demand - total"

foreach v of varlist fp_unmet_space fp_unmet_limit fp_unmet_tot fp_met_space fp_met_limit fp_met_tot fp_demand_space fp_demand_limit fp_demand_tot {
	replace `v' = 100 if `v' == 1
}

tabstat fp_unmet_space fp_unmet_limit fp_unmet_tot fp_met_space fp_met_limit fp_met_tot fp_demand_space fp_demand_limit fp_demand_tot [fweight=v005] if v501 == 1 | v501 == 2, statistics(mean) format(%6.1f)