set more off
use e:\DHS\DHS_data\HR_files\IDHR63FL.dta, clear 
keep hv001 hv002 hv252 hv101* hv106*
rename hv101_0* hv101_*
rename hv106_0* hv106_*

* Identify the household head and the education of the household head
* Note: It appears that in this survey the household head is always on line 1
*   but in many surveys there are some exceptions to this
gen hvidx_hhhead=.
gen ed_hhhead=.

local li=1
while `li'<=31 {
replace hvidx_hhhead=`li'    if hv101_`li'==1
replace ed_hhhead=hv106_`li' if hv101_`li'==1
local li=`li'+1
}

keep hv001 hv002 hv252 *head
rename hv001 v001
rename hv002 v002
sort v001 v002
save e:\DHS\DHS_data\scratch\temp.dta, replace

use e:\DHS\DHS_data\IR_files\IDIR63FL.dta, clear
keep v001 v002 v003 v106 v190 v191
sort v001 v002 v003

merge v001 v002 using e:\DHS\DHS_data\scratch\temp.dta

tab hvidx _merge

* drop cases in the merge for households with no woman in the IR file
drop if _merge~=3
drop _merge

* It may be helpful to know when the woman is in fact the household head
gen woman_is_hhhead=0
replace woman_is_hhhead=1 if hvidx_hhhead==v003