/*****************************************************************************

This do file cleans and processes endline data from SPOON GUATEMALA 

Updated on 8/25/2022

*****************************************************************************/

** 	DEMOGRAPHICS ** 

use "${el_raw}/sec_2b.dta", clear
	distinct folio
	
	rename id_persona personid
	
	sort folio personid
	rename comunidad communityid
	gen name= q02_01a
	label var q02_01a "Por favor, digame los nombres de las personas que haitualmente comen (bl=P0201B)"
	gen last_name=q02_01b
	label var q02_01b "Por favor, digame los nombres de las persona que habitualmente comen (bl=P0201C)"
		
	*Male 
	gen male=(q02_03==1)
	label var q02_03 "¿Es [NOMBRE] hombre o mujer? (bl = P0202)"
	replace male=. if q02_03==. 
	label var male "Hombre=1"
	
	*Age
	gen age=q02_04
	label var q02_04 "¿Cuántos años cumplidos tiene [NOMBRE]? (bl =P0203)"
	replace age=. if q02_04==.
	replace age=. if age==99
	label var age"Edad (años)"
	
	*Birthday
	gen bday = mdy(q02_07m, q02_07d, q02_07a)
	format bday %d 
	label var q02_07d "¿Cuál es la fecha de nacimiento de [NOMBRE]? (bl=P0205M)"
	label var q02_07m "¿Cuál es la fecha de nacimiento de [NOMBRE]? (bl=P0205D)"
	label var q02_07a "¿Cuál es la fecha de nacimiento de [NOMBRE]? (bl=P0205A)"
	lab var bday "Fecha de nacimiento"
	replace bday=. if q02_07a==9999
	
	*Mom ID
	gen momID= q02_16 // missing means mother or father does not live in household
	label var q02_16 "PREGUNTE EL NOMBRE DE LA MADRE  Y ANOTE EL C�DIGO DE ID (bl=P0214)"

	*Dad ID
	gen dadID=q02_13 
	label var q02_13 "PREGUNTE EL NOMBRE DEL PADRE Y ANOTE EL C�DIGO DE ID (bl=P0211)"
	
	*Mother of target child 
	egen max_targetmom=max(momID), by(folio)
	egen min_targetmom=min(momID), by(folio)
	gen mom=1 if personid==max_targetmom | personid==min_targetmom & max_targetmom!=.
	tab mom // 1344 
	tab mom if male==1 // none
	tab mom if age <12 // none
	label var mom "Madre Objetivo (bl=P0203A)" 	
	distinct folio if mom==1 // 1300
	
	*Relation to Household Head 
	gen relation=q02_06
	label var q02_06 "¿Cuál es la relación de parentesco de [NOMB] con la cabeza del hogar? (bl=P0204)"
	copydesc q02_06 relation
	label var relation "Relacion con la cabeza del hogar"
	
	gen hh_head=.
	replace hh_head=(relation==1)
	replace hh_head=. if relation==. 
	label var hh_head "=1 si es la cabeza del hogar"

	gen spouse_hh=.
	replace spouse_hh=(relation==2)
	replace spouse_hh=. if relation==.
	label var spouse_hh "=1 si es conyuge de la cabeza del hogar"
	
	*Married or in partnership
	gen married = (q02_08==2 | q02_08==3)
	replace married=. if q02_08==.
	label var q02_08 "¿Cuál es el estado civil actual de [NOMBRE]? (bl=P0206)"
	label var married "Casado/en concubinato=1"

	* Parents
	gen dad_house=(q02_12==1)
	replace dad_house=. if q02_12==.
	label var q02_12 "El padre de [NOMBRE] vive en este hogar? (bl=P0210)"
	label var dad_house "Padre vive en casa=1"
	
	gen mom_house=(q02_15==1)
	replace mom_house=. if q02_15==.
	label var q02_15 "La persona que tuvo a (madre BIOL�GICA) [NOMBRE] vive en este hogar? (bl=P0213)"
	label var mom_house "Madre vive en casa=1"
	
	gen spouseID=q02_09
	label var q02_09 "PREGUNTE EL NOMBRE DEL LA CONYUGE Y ANOTE EL CODIGO DE ID (bl=P0207)"
	
	*Dad indicator 
	egen max_dadID=max(dadID), by(folio)              
	egen min_dadID=min(dadID), by(folio)
	gen dad=1 if personid==max_dadID 
	replace dad=1 if personid==min_dadID
	label var dad "Biological dad of target child==1"
	
	*Spouse of target mom
	gen mom_spouseID=spouseID if mom==1 
	egen max_mom_spouseID=max(mom_spouseID), by(folio)
	egen min_mom_spouseID=min(mom_spouseID), by(folio)
	gen dad2=1 if max_mom_spouseID==personid | min_mom_spouseID==personid
	label var dad2 "Spouse of target mom==1"
		
	*For households without a child recorded (no response to dad in house question), consider dad to be spouse of the mother
	egen dad_h=max(dad_house), by(folio)
	replace dad=dad2 if dad_h==.
	count if dad==1 & male==0 // none
	
	rename personid id_persona
	
	*Indigenous
	gen indigenous=(q02_19!=0 & q02_19!=.)
	replace indigenous=. if q02_19==.
	label var indigenous "Se identifica indigena=1"
	label var q02_19 "¿Se considera ladino, mestizo, maya, xinca, garifuna? (bl=P0217)"
	
	* merge education information
	merge 1:1 folio id_persona using "${el_raw}/sec_3.dta", nogen
	// master only 1594
	// using only none
	// matched 7052
	
	*Literacy
	gen read=(q03_01==1)
	replace read=. if q03_01==.
	label var read "Sabe leer=1"

	*Write
	gen write=(q03_02==1)
	replace write=. if q03_02==.
	label var write "Sabe escribir=1"
	
	*Education
	gen no_school=(q03_03==2)
	replace no_school=. if q03_03==.
	label var no_school "Never attended school=1"
	
	gen educ=q03_04n
	label var educ "Nivel más alto de educacion"
	label var q03_04n "Cuál es el nivel y curso más alto de educación?NIVEL (bl=P0304A)"
	
	gen curso=q03_04c
	label var curso "Curso más alto de educacion"
	label var q03_04c "Cu�l es el nivel y curso m�s alto de educaci�n?CURSO (bl=P0304B)"
	
	* Primary incomplete
		gen educ_prim_i=1 if no_school==1 | educ == 0
		replace educ_prim_i=0 if educ_prim_i==. & (no_school!=. | educ<=2 & curso<6) 
		label var educ_prim_i "Estudios de primaria incompleta=1"
		
		* Primary complete
		gen educ_prim_c=1 if (educ==2 & curso==6) | educ==3 | (educ==4 & curso<3 & curso!=.)
		replace educ_prim_c=0 if educ_prim_c==. & (no_school!=. | educ<=2 & curso<6) 
		label var educ_prim_c "Estudios de primaria completa=1"

		*Secondary or more complete
		gen educ_sec_c=1 if (educ==4 & curso>=3 & curso!=.) | educ==5 | educ==6
		replace educ_sec_c=0 if educ_sec_c==. & (no_school!=. | educ<=2 & curso<6) 
		label var educ_sec_c "Estudios de secundaria completa=1"

	* merge employment and income information
	merge 1:1 folio id_persona using "${el_raw}/sec_4.dta", nogen
	// master only 3731
	// using only none
	// matched 4,915
	
	*Employment and Income
	gen work=(q04_01==1 | q04_01==2)
	replace work=. if q04_01==.
	label var work "Trabajo la semana pasada=1"
	
	gen inc_lab=q04_07*q04_09 
	
	egen inc_lab_h=total(inc_lab), by(folio) missing
	gen inc_lab_m= inc_lab_h/12 
	
	label var inc_lab_m "Ingreso laboral mensual del hogar (Quetzales)"
	
	* Create personid 
	tostring folio, gen(folio_str)
	gen id_persona_0=string(id_persona, "%02.0f")
	gen personid = folio_str + id_persona_0
	destring personid, replace 
	
	* Create mom_personid
	gen mom_personid = personid 
	replace mom_personid=. if mom !=1
	
	* Create caregiver ID (Mom ID / Dad ID, if Mom ID is missing)
	gen double id_caregiver = momID
	replace id_caregiver=dadID if id_caregiver==. // if momID is missing, use dad ID

	* Create twin indicator
	duplicates tag folio id_caregiver bday, gen(twin) 
	replace twin=. if bday==.
	
	* Identify HH members with same relationship with head of HH as "target" children
	// use caregiver ID as default; for those without caregiver ID, use age
	egen id_caregiver_max = max(id_caregiver), by(folio)
	gen target_guess=1 if id_caregiver_max==. & q02_07a>=2018 & q02_07a!=. & q02_07a!=9999 // birthday 2018 or later 
	
	gen relation_target = relation if id_caregiver!=. | target_guess==1

	egen relation_target_max=max(relation_target), by(folio)
	gen sibling =1 if relation==relation_target_max & relation!=.
	replace sibling = 0 if relation!=relation_target_max & relation!=.
	
	* update, if more than one caregiver
	egen relation_target_min=min(relation_target), by(folio)
	replace relation_target_min=. if relation_target_min==relation_target_max
	gen sibling2 =1 if relation==relation_target_min & relation!=.
	replace sibling2 = 0 if relation!=relation_target_min & relation!=.
		
	* create child order variables
	gsort folio sibling bday -age 
	bys folio sibling: gen child_rank=_n if sibling==1
	bys folio sibling: gen child_num=_N if sibling==1
	gsort folio sibling2 bday -age 
	bys folio sibling2: replace child_rank=_n if sibling2==1 & child_rank==.
	bys folio sibling2: replace child_num=_N if sibling2==1 & child_num==.
		
	* make rank the same for twins, so they have same classification as older/younger
	egen twins_hh=max(twin), by(folio)
	bys folio twin: egen child_rank_twin=min(child_rank) if twin==1
	gsort folio child_rank
	replace child_rank=child_rank_twin if twin==1
	
	* create binary child order variable
	gen child_order =1 if child_rank==1
	replace child_order=0 if child_rank>1 & child_rank!=.
		
	keep folio personid communityid name last_name *ID id_caregiver male age bday mom dad relation hh_head spouse_hh married  indigenous read write educ* dad_house mom_house work inc* comunidad momID dadID resultado mom_personid id_persona tipo_comunidad twin child_order
		
	sort folio
	
	save "${el_processed}/demographics_el.dta", replace 
	
*Household Composition
		egen size=count(personid), by(folio)
		lab var size "Numero de miembros en el hogar"
				
		*Number males 0-5
		gen males0_5=1 if age <=5 & age!=. & male==1
		replace males0_5=0 if males0_5==. & age!=.
		egen tot_males0_5=total(males0_5), by(folio)
		label var males0_5 "Male between 0-5 years=1"
		label var tot_males0_5 "Total males between 0-5 years in household"
		
		*Number males 6-18
		gen males6_18=1 if age>5 & age<=18 & age!=. & male==1
		replace males6_18=0 if males6_18==. & age!=.
		egen tot_males6_18=total(males6_18), by(folio)
		label var males6_18 "Male between 6-18 years=1"
		label var tot_males6_18 "Total males between 6-18 years in household"
		
		*Number males 19-49
		gen males19_49=1 if age>18 & age<=49 & age!=. & male==1
		replace males19_49=0 if males19_49==. & age!=.
		egen tot_males19_49=total(males19_49), by(folio)
		label var males19_49 "Male between 19-49 years=1"
		label var tot_males19_49 "Total males between 19-49 years in household"
		
		*Number males 50+
		gen males50=1 if age>50 & age!=. & male==1
		replace males50=0 if males50==. & age!=.
		egen tot_males50=total(males50), by(folio)
		label var males50 "Male 50 years or older=1"
		label var tot_males50 "Total males 50 years or older in household"
		
		*Number females 0-5 
		gen females0_5=1 if age <=5 & age!=. & male==0
		replace females0_5=0 if females0_5==. & age!=.
		egen tot_females0_5=total(females0_5), by(folio)
		label var females0_5 "Female between 0-5 years=1"
		label var tot_females0_5 "Total females between 0-5 years in household"
		
		*Number females 6-18
		gen females6_18=1 if age>5 & age<=18 & age!=. & male==0
		replace females6_18=0 if females6_18==. & age!=.
		egen tot_females6_18=total(females6_18), by(folio)
		label var females6_18 "Female between 6-18 years=1"
		label var tot_females6_18 "Total females between 6-18 years in household"
		
		*Number females 19-49 
		gen females19_49=1 if age>18 & age<=49 & age!=. & male==0
		replace females19_49=0 if females19_49==. & age!=.
		egen tot_females19_49=total(females19_49), by(folio)
		label var females19_49 "Female between 19-49=1"
		label var tot_females19_49 "Total females between 19-49 in household"
		
		*Number females 50+
		gen females50=1 if age>50 & age!=. & male==0
		replace females50=0 if females50==. & age!=.
		egen tot_females50=total(females50), by(folio)
		label var females50 "Female 50 years or older=1"
		label var tot_females50 "Total females 50 years or older in household"
		
		collapse inc_lab_m size tot* , by(folio)

		lab var size "Numero de miembros"

		*Proportion of males to HH size by age
		gen prop_males0_5=tot_males0_5/size
		lab var prop_males0_5 "Proporcion de hombres entre 0 y 5 años"
		
		gen prop_males6_18=tot_males6_18/size
		lab var prop_males6_18 "Proporcion de hombres entre 6 y 18 años"
		
		gen prop_males19_49=tot_males19_49/size
		lab var prop_males19_49 "Proporcion de hombres entre 19 y 49 años"	
		
		gen prop_males50=tot_males50/size
		lab var prop_males50 "Proporcion de hombres mayor de 50 años"
		
		*Proportion of females to HH size by age
		gen prop_females0_5=tot_females0_5/size
		lab var prop_females0_5 "Proporcion de mujeres entre 0 y 5 años"
		
		gen prop_females6_18=tot_females6_18/size
		lab var prop_females6_18 "Proporcion de mujeres entre 6 y 18 años"
		
		gen prop_females19_49=tot_females19_49/size
		lab var prop_females19_49 "Proporcion de mujeres entre 19 y 49 años"
		
		gen prop_females50=tot_females50/size
		lab var prop_females50 "Proporcion de mujeres mayor de 50 años"

save "${el_processed}/household_composition_el.dta", replace
		
** HOUSEHOLD CHARACTERISTICS **	
use "${el_raw}/sec_hogar.dta", clear 
merge 1:1 folio using "${el_processed}/endline_treatment.dta", nogen
merge 1:1 folio using "$el_processed/household_composition_el.dta", nogen
// master 354
// using none
// matched 1317

	* Municipality
	gen municipality=municipio
	gen munID=q00_01
	global vars $vars municipality munID
	label var q00_01 "Municipio"

	* Community
	gen community=q00_02
	gen communityID=comunidad
	global vars $vars community*
	label var q00_02 "Comunidad"
	
	* Sector
	label var sector "Sector"
	gen sectorID=sector
	global vars $vars sector*
	label var q00_03 "Sector"
	
	* Coordinates	
	gen y_coord=(q00_04 + (q00_04/60) + (q00_04/3600))
	gen x_coord= - (q00_05 + (q00_05/60) + (q00_05/3600))
	global vars $cars *_coord 
	
	* Elevation
	gen elevation=q00_06
	global vars $vars elevation
	
	* Interview date endline
	rename fecha_ini fecha_ini_edit
	split fecha_ini_edit , parse(/)
	
	destring fecha_ini_edit*, replace

	rename fecha_ini_edit1 fecha_ini_day
	rename fecha_ini_edit2 fecha_ini_month
	rename fecha_ini_edit3 fecha_ini_year

	replace fecha_ini_year = fecha_ini_year + 2000

	gen fecha_ini = mdy(fecha_ini_month, fecha_ini_day, fecha_ini_year)
	format fecha_ini %td 
		
	label var fecha_ini "Interview date"
	
	* Type of House
	gen house_type = q01_01
	recode house_type (2=5) (4=5)
	copydesc q01_01 house_type

	tab house_type, gen(house_type)
	global vars $vars house_type*

	* Type of Residence
	gen residence = q01_02
	recode residence (2=1) 
	copydesc q01_02 residence
	
	tab residence, gen(residence_)
	lab var residence_1 "Propia"
	global vars $vars residence*

	*Number of rooms
	gen num_rooms=q01_05
	replace num_rooms=. if q01_05==.
	label var num_rooms "Number of rooms"
	global vars $vars num_rooms
	
	*Number of bedrooms
	gen num_bedrooms=q01_06
	replace num_bedrooms=. if q01_06==.
	label var num_bedrooms "Number of bedrooms"
	global vars $vars num_bedrooms

	* Wall materials
	gen walls = q01_08
	recode walls (4=6)
	copydesc q01_08 walls
	tab walls, gen(walls_)
		
	global vars $vars walls*

	* Roof materials
	gen roof = q01_09	
	recode roof (1=7) (3=7) (5=7) (6=7)
	copydesc q01_09 roof
	tab roof, gen(roof_)	
	
	global vars $vars roof*

	* Floor materials
	gen floor = q01_10
	recode floor (3=66)
	copydesc q01_10 floor
	tab floor, gen(floor_)
	
	global vars $vars floor*
	
	* Sanitation Infrastructure						
	gen sanitation = q01_11
	copydesc q01_11 sanitation
	tab sanitation, gen(sanitation_)
	lab var sanitation_4 "No tiene"

	global vars $vars sanitation*

	* Bathroom Use
	gen bath_use=q01_12
	copydesc q01_12 bath_use

	tab bath_use, gen(bath_use_)
	global vars $vars bath_use*
	
	* Lighting
	gen lighting=q01_13
	recode lighting (2=9) (3=9) (4=9) (5=9) (8=9) (9=9)
	copydesc q01_13 lighting
	tab lighting, gen(lighting_)
	lab var lighting_4 "Otro" 
	
	global vars $vars lighting*
	
	* Kitchen fuels
	// missing from main data, merge in 
	merge 1:1 folio using "${el_raw}/q14.dta", nogen
	gen fuel=q01_14_1
	copydesc q01_14_1 fuel
	tab fuel, gen(fuel_)
	
	global vars $vars fuel*
	
	* Trash disposal
	gen trash=q01_15
	recode trash (2=9) (3=9) (4=9) (8=9)
	copydesc q01_15 trash
	tab trash, gen(trash_)
	
	global vars $vars trash*

	* Water source
	gen water=q01_16
	recode water (4=9) (6=9) (7=9)
	copydesc q01_16 water
	tab water, gen (water_)
	lab var water_6 "Otro"
	
	global vars $vars water*
	
	* Water treatment
	gen water_treat=q01_17
	recode water_treat (5=6)
	copydesc q01_17 water_treat
	tab water_treat, gen(water_treat_)
	lab var water_treat_5 "Otro"
	
	global vars $vars water_treat*

	* Update var labels to remove everything before "=="
	* ssc install findname
	findname, varlabeltext(*Equipamiento - *) 
	* ssc install labutil
	labvarch `r(varlist)', after(Equipamiento - ) 

	rename q01_18a q01_181
	rename q01_18b q01_182
	rename q01_18c q01_183
	rename q01_18d q01_184
	rename q01_18e q01_185
	rename q01_18f q01_186
	rename q01_18g q01_187
	rename q01_18h q01_188
	rename q01_18i q01_189
	rename q01_18j q01_190
	rename q01_18k q01_191
	rename q01_18l q01_192
	rename q01_18m q01_193
	rename q01_18n q01_194
	rename q01_18o q01_195
	rename q01_18p q01_196
	
	* Assets
	//lab def lab_yesno 0 "No" 1 "Si" 
	local i=1
	foreach x in tv cable radio homephone cellphone stove fridge washer ac{
		gen `x'=(q01_18`i'==1)
		replace `x'=. if q01_18`i'==.
		local lbl: variable label q01_18`i'
		lab var `x' `"`lbl'=1"' 
		lab val `x' lab_yesno
		global vars $vars `x'
		local i=`i'+1
	}
		
	local i=0
	foreach x in sewing_machine computer car boat motorcycle bicycle electricity{
		gen `x'=(q01_19`i'==1)
		replace `x'=. if q01_19`i'==.
		local lbl: variable label q01_19`i'
		lab var `x' `"`lbl'=1"'  
		lab val `x' lab_yesno
		global vars $vars `x'
		local i=`i'+1
	}
	
	* Farm assets

		*Farmland
		gen land=(q01_19==1)
		replace land=. if q01_19==.
		label var land "Tiene tierra para trabajar=1"
		global vars $vars land
		
		*Value of farmland
		gen land_val=q01_22
		label var land_val "Valor del terreno (Quetzales)"
		global vars $vars land_val

		*Business
		gen business=(q01_24==1)
		replace business=. if q01_24==.
		label var business "Tiene negocio propio=1"
		global vars $vars business	

		* Wealth Index
	pca residence_* walls_* roof_* floor_* sanitation_* lighting_* fuel_* trash_* water_* tv cable radio homephone ///
	cellphone stove fridge washer ac sewing_machine computer car boat motorcycle bicycle electricity, mineigen(1.0) means
	predict wealth, score
	sum wealth
	label var wealth "Indice de Riqueza"
	global vars $vars wealth

	*Non Labor Income (from programs/social services/etc)
	local i=1
	foreach x in food_assistance CCT fertilizer scholarship seeds forest_incentive school_meals other{
		gen `x'=q01_26_`i'*q01_27_`i'
		local i=`i'+1
	}
	label var food_assistance "Amount of food assistance received in past 12 months (GTQ)"
	label var CCT "Amount of CCT received in past 12 months (GTQ)"
	label var fertilizer "Amount of fertilizer received in past 12 months (GTQ)"
	label var scholarship "Amount of scholarship received in past 12 months (GTQ)"
	label var seeds "Amount of seeds received in past 12 months (GTQ)"
	label var forest_incentive "Amount of forest incentive received in past 12 months (GTQ)"
	label var school_meals "Amount of school assistance for meals received in past 12 months (GTQ)"
	label var other "Other financial assistance received in past 12 months (GTQ)"
	
	gen rent_inc=q01_29
	global vars $vars rent_inc
	gen money_orders=q01_31*q01_32
	global vars $vars money_orders

	egen inc_nonlab=rowtotal(food_assistance CCT fertilizer scholarship seeds forest_incentive other money_orders), missing
	gen inc_nonlab_m=inc_nonlab/12
	replace inc_nonlab_m = inc_nonlab_m + rent_inc if rent_inc!=.
	replace inc_nonlab_m=rent_inc if rent_inc!=. & inc_nonlab_m==.
	label var inc_nonlab_m "Ingreso no laboral mensual del hogar (Quetzales)"
	global vars $vars inc_nonlab_m

	*Expenses
	gen expenses=q01_33
	label var expenses "Gastos menusales del hogar (Quetzales)"
	global vars $vars expenses
	
	*Total Income
	egen inc_h=rowtotal(inc_lab_m inc_nonlab_m), missing
	lab var inc_h "Ingreso mensual del hogar (Quetzales)"
	
	keep vivi hogar folio $vars inc* size tot* prop* municipality community resultado fecha_ini bl_only el_only T1 T2 Control tratamiento_hogar bl_only el_only population attrited comunidad_elegible

	gen improved_sanitation=.
	replace improved_sanitation = 1 if bath_use_1==1 & (sanitation_1==1 | sanitation_2==1)
	replace improved_sanitation = 0 if improved_sanitation!=1 & bath_use!=.
	
	*"WHO/UNICEF defines basic sanitation facilities as improved sanitation facilities that are not shared with other households. Improved sanitation facilities include flush/pour flush to piped sewer systems, septic tanks or pit latrines; ventilated improved pit latrines, compositing toilets or pit latrines with slabs."
	
	
	gen improved_water=.
	replace improved_water = 1 if water_1==1 | water_2==1 | water_3==1 | water_5==1
	replace improved_water = 0 if improved_water!=1 & water!=.
	
	
	
	save "${el_processed}/household_el.dta", replace

** FEEDING PRACTICES ** 
	
use "${el_raw}/sec_6.dta", clear
merge 1:1 folio id_persona using "${el_raw}/sec_7A.dta", gen(sec7a_merge)
	// sec7a_merge==1 are from sec6 only (1)
	// sec7a_merge==2 are from sec7a only (3)
	// sec7a_merge==3 are matched (1,632)
merge 1:1 folio id_persona using "${el_raw}/sec_7b.dta", gen(sec7b_merge)
	// sec7b_merge==1 are from sec6/sec7a only (5)
	// sec7b_merge==2 are from sec7b only (2)
	// sec7b_merge==3 are matched (1,631)
	rename folio idunico
merge 1:1 idunico id_persona using "${el_raw}/sec_7c.dta", gen(sec7c_merge)
	// sec7c_merge==1 are from sec6/7a/7b only (8)
	// sec7c_merge==2 are from sec7c only (none)
	// sec7c_merge==3 are matched (1,630)
	rename idunico folio
merge 1:1 folio id_persona using "${el_raw}/sec_8.dta", gen(sec8_merge)
	// sec8_merge==1 are from sec6/7a/7b/7c only (9)
	// sec8_merge==2 are from sec8 only (none)
	// sec8_merge==3 are matched (1,629)
merge 1:1 folio id_persona using "${el_raw}/sec_9.dta", gen(sec9_merge)
	// sec9_merge==1 are from sec6/7a/7b/7c/8 only (10)
	// sec9_merge==2 are from sec9 only (none)
	// sec9_merge==3 are matched (1,628)
	
	* Create individual personid 
	tostring folio, gen(folio_str)
	gen id_persona_0=string(id_persona, "%02.0f")
	gen personid = folio_str + id_persona_0
	destring personid, replace
	drop folio_str
	drop id_persona_0

	duplicates report personid // none 
	
	//save original id
	gen double personid_original=personid
	gen double folio_original=folio
	gen momid=id_s06_ma
	label var momid "ID of the mother"
	gen mom_name=id_s06_ma_n
	gen childid=id_s06_ni
	label var childid "ID of the child" 
	gen child_name=id_s06_ni_n
	label var child_name "Name of child"

	// gen target_quant=ninos
	gen agemonths=q02_04m
	label var agemonths "Edad (meses)"

	* Create mom_personid 
	tostring folio, gen(folio_str)
	gen momid_str=string(id_s07a_ma, "%02.0f")
	gen mom_personid= folio_str + momid_str
	destring mom_personid, replace 
	drop momid_str folio_str
	
	* First feeding within 1 hour of birth
	gen p1=.
	replace p1=1 if (q06_03==1 | q06_03==2)
	replace p1=0 if p1==. & q06_03!=. 
	tab p1
	label var p1 "Inicio temprano de la lactancia materna"
	
	* Exclusive Breastfeeding (6 months) (note: update baseline p2a code)	
	gen p2a= 1 if q07_03 >= 6 & q07_03 < 77 
	replace p2a=0 if (q07_03<6 | q07_03 == 77) 
	tab p2a 
	label var p2a "Lactancia materna exclusiva antes de los 6 meses, 6-24 meses"
	replace p2a = 0 if q07_06 <6 
	// note: p2b omitted in endline
	
	* Alguna vez le dio pecho
	gen p3=.
	replace p3=1 if q06_01==1 | (q06_01 !=1 & q06_02==1) 
	replace p3=0 if p3==. & (q06_01!=. | q06_02!=.)
	tab p3
	label var p3 "Niños que fueron amamantados alguna vez"
	
	* Continued breastfeeding
	gen p4a=.
	replace p4a=1 if q06_06>=12 & q06_06!=.
	replace p4a=0 if p4a==. & q06_06!=.
	tab p4a 
	label var p4a "Lactancia materna continua al año de vida"

	gen p4b=.
	replace p4b=1 if q06_06>=24 & q06_06!=.
	replace p4b=0 if p4b==. & q06_06!=.
	tab p4b
	label var p4b "Lactancia materna continua a los 2 años de vida"

//edit * Introduction of solid, semi-solid, and soft foods
	gen p5=.
	replace p5=1 if q07_06==6 
	replace p5=0 if p5==. & q07_06!=.
	tab p5
	label var p5 "Introducción de alimentos sólidos, semisólidos, o suaves en el 6 mes==1"

	* Given iron pills/syrup
	gen p6=.
	replace p6=1 if q07_22==1 
	replace p6=0 if p6==. & q07_22!=.
	tab p6
	label var p6 "Dio pastillas o jarabe de hiero a niño"

	* Given Vitamin A pills
	gen p7=.
	replace p7=1 if q07_26==1 
	replace p7=0 if p7==. & q07_26!=.
	tab p7
	label var p7 "Dió perlas de vitamina A a niño durante los ultimos 12 meses"

	* Given powdered vitamins/minerals
	gen p8=.
	replace p8=1 if q07_30==1 
	replace p8=0 if p8==. & q07_30!=.
	tab p8
	label var p8 "Dió vitaminas y minerales en polvo a niño durante los ultimos 12 meses"

	* Given Vitacereal
	gen p9=.
	replace p9=1 if q07_34==1 
	replace p9=0 if p9==. & q07_34!=.
	tab p9
	label var p9 "Recibió Vitacereal durante los ultimos 12 meses"
	
	* Positive verbal stimulation
	gen p10=.
	replace p10=1 if q07_13==1 & (q07_14a==1 | q07_14a==2 | q07_14a==3 | q07_14a==4 | q07_14a==6 | q07_14a==7 | q07_14b==2 | q07_14b==3 | q07_14b==4 | q07_14b==6 | q07_14b==7 | q07_14c==3 | q07_14c==4 | q07_14c==6) & q07_14a !=5 & q07_14b !=5 & q07_14c !=5 & q07_14a != 8 & q07_14b != 8 & q07_14c !=8

	replace p10=0 if p10==. & q07_13!=.
	tab p10
	label var p10 "Estimulación verbal"

	* Other positive stimulation
	gen p11=.
	replace p11=1 if q07_15==1 & (q07_16a==1 | q07_16a==2 | q07_16a==4 | q07_16a==5 | q07_16b==2 | q07_16b==4 | q07_16b==5 | q07_16c==4 | q07_16c==5) & q07_16a != 3 & q07_16a != 6 & q07_16a != 7 & q07_16b != 3 & q07_16b !=6 & q07_16b != 7 & q07_16c !=3 & q07_16c != 6 & q07_16c != 7
	
	replace p11=0 if p11==. & q07_15!=.
	tab p11
	label var p11 "Estimulación adicional" 
	
		* Minimum dietary diversity
		** estimate food score
		gen food_score=0
		replace food_score=food_score + 1 if q07_18s==1   // grains, roots and tubers (s)
		replace food_score=food_score + 1 if q07_18q==1                  // legumes and nuts (q)
		replace food_score=food_score + 1 if q07_18e==1 // dairy products (milk, yougurt, cheese, etc.) (e)
		replace food_score=food_score + 1 if q07_18a==1 | q07_18b==1 | q07_18d==1  //(flesh products) (a) (b) (d)
		replace food_score=food_score + 1 if q07_18c==1                 // eggs (c)
		replace food_score=food_score + 1 if q07_18g==1 | q07_18h==1 | q07_18j==1 //vitamin-A rich fruits and vegetables (g) (h) (j)
		replace food_score=food_score + 1 if q07_18i==1 // other fruits and vegetables (i)

		replace food_score=. if q07_18a==. 
		
		label var q07_18a "07.18 Alimentos de origen animal: Carne res, marrano (cerdo, pollo, chivo, Chom (bl=P0718J)"
		label var q07_18b "Organos de Origen animal: Higado, rinon, corazon, menudos o viceras (bl=P0718K)"
		label var q07_18c "07.18 Huevos(bl=P0718L)"
		label var q07_18d "7.18 Pescado: sardinas, at�n, mariscos, pescado como trucha(bl=P0718M)"
		label var q07_18e "07.18 Lacteos: Leche, queso, yogurt(bl=P0718S)"
		label var q07_18g "07.18 Vegetales de hoja verde: Berro, espinaca, ejotes, lechuga (bl=P0718A)"
		label var q07_18h "07.18 Vegetales amarillos: Zanahoria, calabaza(bl=P0718B)"
		label var q07_18i "07.18. Otros vegetales y frutas: Cebolla, chile pimiento (bl=P0718D)"
		label var q07_18j "07.18 Frutas amarillas: Mango, papaya, mandarina, naranja (bl=P0718C)"
		label var q07_18s "07.18 Almidones: Arroz, Harina de trigo, Pastas (bl=P0718E)"
		label var q07_18q "07.18 Granos: Frijoles, lentejas, garbanzos, arvejas, habas, ejotes (bl=P0718H)"

	gen p12a=. //index measure of consumed or didn't, no missing
	replace p12a=1 if food_score>=4 & food_score!=.
	replace p12a=0 if p12a==. & food_score!=.
	tab p12a
	label var p12a "Diversidad alimentaria minima"

	gen p12b=.
	replace p12b=1 if food_score>=5 & food_score!=.
	replace p12b=0 if p12b==. & food_score!=.
	tab p12b
	label var p12b "Diversidad alimentaria minima (puntaje alimentario>=5)"

	gen p12c=.
	replace p12c=1 if food_score>=6 & food_score!=.
	replace p12c=0 if p12c==. & food_score!=.
	tab p12c
	label var p12c "Diversidad alimentaria minima(puntaje alimentario>=6)"

	gen p12d=.
	replace p12d=1 if food_score>=7 & food_score!=.
	replace p12d=0 if p12d==. & food_score!=.
	tab p12d
	label var p12d "Diversidad alimentaria minima (puntaje alimentario>=7)"

	* Consumption of iron-rich or iron-fortified foods
	gen p13=. 
	replace p13=1 if (q07_18q==1 | q07_18b==1 | q07_18d==1 | q07_22==1 | q07_30==1 | q07_34==1 )
	replace p13=0 if p13==. & q07_18a!=.
	tab p13
	label var p13 "Consumo de alimentos ricos en hierro o fortificados con hierro"
	
	* Not bottlefed (reverse coded) 
	gen p14=.
	replace p14=1 if q07_05 ==2
	replace p14=0 if p14==. & q07_05!=.

	*reverse code for not bottlefed
	gen temp_p14=0 if p14==1
	replace temp_p14=1 if p14==0 
	
	drop p14
	rename temp_p14 p14
	
	tab p14
	label var p14 "Alimentación sin biberón "

	* 15. Duration of breastfeeding (in months)
	gen p15=.
	replace p15= 1 if q06_06>=6 & q06_06<98.
	replace p15=0 if p15!=1
	tab p15 
	label var p15 "Duración de la lactancia materna (meses)"
	keep personid folio momid mom_personid mom_name childid child_name p1-p15 food_score agemonths comunidad id_persona
	
	*Practice index
	egen practice_index=rowmean(p1 p2a p3 p4a p4b p5 p6 p7 p8 p9 p10 p11 p12a p13 p14)
	label var practice_index "Feeding practices Index"	
	
	* Separate into components
	// breastfeeding
	egen practice_index_bf=rowmean(p1 p2a p3 p4a p4b p14)
	label var practice_index_bf "Practice index: breastfeeding"	
	
	// supplements
	egen practice_index_sup=rowmean(p5 p6 p7 p8 p9)
	label var practice_index_sup "Practice index: supplements"	
	
	//solid foods
	egen practice_index_food=rowmean(p10 p11 p12a p13)
	label var practice_index_food "Practice index: solid foods"	
	
save "${el_processed}/practice_el.dta", replace

** CONOCIMIENTO ** 

use "${el_raw}/sec_10.dta", clear 

	* Questions and responses	-- for tables in paper
	
	* ¿Sabe usted cuales son las señales de peligro en niños/as con diarrea?
	gen know_diarheasignal_dehydr =.
	replace know_diarheasignal_dehydr=1 if q10_01a==1 | q10_01b==1 | q10_01c==1 | q10_01d==1 | q10_01e==1
	replace know_diarheasignal_dehydr=0 if know_diarheasignal_dehydr!=1 & q10_01a!=.
		
	gen know_diarheasignal_irritable =.
	replace know_diarheasignal_irritable=1 if q10_01a==2 | q10_01b==2 | q10_01c==2 | q10_01d==2 | q10_01e==2
	replace know_diarheasignal_irritable=0 if know_diarheasignal_irritable!=1 & q10_01a!=.
				
	gen know_diarheasignal_blood =.
	replace know_diarheasignal_blood=1 if q10_01a==3 | q10_01b==3 | q10_01c==3 | q10_01d==3 | q10_01e==3
	replace know_diarheasignal_blood=0 if know_diarheasignal_blood!=1 & q10_01a!=.
		
	gen know_diarheasignal_deepeyes =.
	replace know_diarheasignal_deepeyes=1 if q10_01a==4 | q10_01b==4 | q10_01c==4 | q10_01d==4 | q10_01e==4
	replace know_diarheasignal_deepeyes=0 if know_diarheasignal_deepeyes!=1 & q10_01a!=.

	gen know_diarheasignal_lowurine =.
	replace know_diarheasignal_lowurine=1 if q10_01a==5 | q10_01b==5 | q10_01c==5 | q10_01d==5 | q10_01e==5
	replace know_diarheasignal_lowurine=0 if know_diarheasignal_lowurine!=1 & q10_01a!=.
		
	gen know_diarheasignal_pliegue =.
	replace know_diarheasignal_pliegue=1 if q10_01a==6 | q10_01b==6 | q10_01c==6 | q10_01d==6 | q10_01e==6
	replace know_diarheasignal_pliegue=0 if know_diarheasignal_pliegue!=1 & q10_01a!=.
		
	gen know_diarheasignal_freqdeposit =.
	replace know_diarheasignal_freqdeposit=1 if q10_01a==7 | q10_01b==7 | q10_01c==7 | q10_01d==7 | q10_01e==7
	replace know_diarheasignal_freqdeposit=0 if know_diarheasignal_freqdeposit!=1 & q10_01a!=.
		
	gen know_diarheasignal_decay =.
	replace know_diarheasignal_decay=1 if q10_01a==8 | q10_01b==8 | q10_01c==8 | q10_01d==8 | q10_01e==8
	replace know_diarheasignal_decay=0 if know_diarheasignal_decay!=1 & q10_01a!=.
		
		* Score
	egen know_diarheasignal_SUM = rowtotal(know_diarheasignal_dehydr know_diarheasignal_irritable know_diarheasignal_blood know_diarheasignal_deepeyes know_diarheasignal_lowurine know_diarheasignal_pliegue know_diarheasignal_freqdeposit),m
	gen know_diarheasignal_score=know_diarheasignal_SUM/7
	
	
	* ¿Sabe usted cuales son las señales de peligro en niños/as con tos, catarro o gripe?
	gen know_dangerflu_fastbreathe=.
	replace know_dangerflu_fastbreathe = 1 if q10_02a==1 | q10_02b==1 | q10_02c==1 | q10_02d==1 | q10_02e==1
	replace know_dangerflu_fastbreathe = 0 if know_dangerflu_fastbreathe!=1 & q10_02a!=.
	
	gen know_dangerflu_whistle=.
	replace know_dangerflu_whistle = 1 if q10_02a==2 | q10_02b==2 | q10_02c==2 | q10_02d==2 | q10_02e==2
	replace know_dangerflu_whistle = 0 if know_dangerflu_whistle!=1 & q10_02a!=.
	
	gen know_dangerflu_chestheat=.
	replace know_dangerflu_chestheat = 1 if q10_02a==3 | q10_02b==3 | q10_02c==3 | q10_02d==3 | q10_02e==3
	replace know_dangerflu_chestheat = 0 if know_dangerflu_chestheat!=1 & q10_02a!=.
	
	gen know_dangerflu_twodayfever=.
	replace know_dangerflu_twodayfever = 1 if q10_02a==4 | q10_02b==4 | q10_02c==4 | q10_02d==4 | q10_02e==4
	replace know_dangerflu_twodayfever = 0 if know_dangerflu_twodayfever!=1 & q10_02a!=.
	
	gen know_dangerflu_deeprib=.
	replace know_dangerflu_deeprib = 1 if q10_02a==5 | q10_02b==5 | q10_02c==5 | q10_02d==5 | q10_02e==5
	replace know_dangerflu_deeprib = 0 if know_dangerflu_deeprib!=1 & q10_02a!=.
	
	gen know_dangerflu_ingestdig=.
	replace know_dangerflu_ingestdig = 1 if q10_02a==6 | q10_02b==6 | q10_02c==6 | q10_02d==6 | q10_02e==6
	replace know_dangerflu_ingestdig = 0 if know_dangerflu_ingestdig!=1 & q10_02a!=.
	
		* Score
	egen know_dangerflu_SUM=rowtotal(know_dangerflu_fastbreathe know_dangerflu_whistle know_dangerflu_chestheat know_dangerflu_twodayfever know_dangerflu_deeprib know_dangerflu_ingestdig), m
	gen know_dangerflu_score=know_dangerflu_SUM/6
		
		
	* ¿Sabe usted cuales son las señales de peligro en niños/as con enfermedades de la piel?
		
	gen know_dangerskin_dry=.	
	replace know_dangerskin_dry = 1 if q10_03a==1 | q10_03b==1 | q10_03c==1 | q10_03d==1
	replace know_dangerskin_dry=0 if know_dangerskin_dry!=1 & q10_03a!=.
		
	gen know_dangerskin_itch=.	
	replace know_dangerskin_itch = 1 if q10_03a==2 | q10_03b==2 | q10_03c==2 | q10_03d==2
	replace know_dangerskin_itch=0 if know_dangerskin_itch!=1 & q10_03a!=.
	
	gen know_dangerskin_rash=.	
	replace know_dangerskin_rash = 1 if q10_03a==3 | q10_03b==3 | q10_03c==3 | q10_03d==3
	replace know_dangerskin_rash=0 if know_dangerskin_rash!=1 & q10_03a!=.
	
	gen know_dangerskin_sores=.	
	replace know_dangerskin_sores = 1 if q10_03a==4 | q10_03b==4 | q10_03c==4 | q10_03d==4
	replace know_dangerskin_sores=0 if know_dangerskin_sores!=1 & q10_03a!=.
	
		* Score
	egen know_dangerskin_SUM=rowtotal(know_dangerskin_dry know_dangerskin_itch know_dangerskin_rash know_dangerskin_sores), m
	gen know_dangerskin_score=know_dangerskin_SUM/4	
		
		
	* ¿Cómo se debe alimentar a un(a) niño/a menor de 2 años que está enfermo/a? 
	gen know_feedsick_lessfood=.
	replace know_feedsick_lessfood=1 if q10_04a==1 | q10_04b==1 | q10_04c==1 | q10_04d==1 | q10_04e==1
	replace know_feedsick_lessfood=0 if know_feedsick_lessfood!=1 & q10_04a!=.
	
	gen know_feedsick_equalfood=.
	replace know_feedsick_equalfood=1 if q10_04a==2 | q10_04b==2 | q10_04c==2 | q10_04d==2 | q10_04e==2
	replace know_feedsick_equalfood=0 if know_feedsick_equalfood!=1 & q10_04a!=.
	
	gen know_feedsick_morefood=.
	replace know_feedsick_morefood=1 if q10_04a==3 | q10_04b==3 | q10_04c==3 | q10_04d==3 | q10_04e==3
	replace know_feedsick_morefood=0 if know_feedsick_morefood!=1 & q10_04a!=.
	
	gen know_feedsick_lessliquid=.
	replace know_feedsick_lessliquid=1 if q10_04a==4 | q10_04b==4 | q10_04c==4 | q10_04d==4 | q10_04e==4
	replace know_feedsick_lessliquid=0 if know_feedsick_lessliquid!=1 & q10_04a!=.
	
	gen know_feedsick_equalliquid=.
	replace know_feedsick_equalliquid=1 if q10_04a==5 | q10_04b==5 | q10_04c==5 | q10_04d==5 | q10_04e==5
	replace know_feedsick_equalliquid=0 if know_feedsick_equalliquid!=1 & q10_04a!=.
	
	gen know_feedsick_moreliquid=.
	replace know_feedsick_moreliquid=1 if q10_04a==6 | q10_04b==6 | q10_04c==6 | q10_04d==6 | q10_04e==6
	replace know_feedsick_moreliquid=0 if know_feedsick_moreliquid!=1 & q10_04a!=.
	
	gen know_feedsick_lessmilk=.
	replace know_feedsick_lessmilk=1 if q10_04a==7 | q10_04b==7 | q10_04c==7 | q10_04d==7 | q10_04e==7
	replace know_feedsick_lessmilk=0 if know_feedsick_lessmilk!=1 & q10_04a!=.
	
	gen know_feedsick_equalmilk=.
	replace know_feedsick_equalmilk=1 if q10_04a==8 | q10_04b==8 | q10_04c==8 | q10_04d==8 | q10_04e==8
	replace know_feedsick_equalmilk=0 if know_feedsick_equalmilk!=1 & q10_04a!=.
		
	gen know_feedsick_moremilk=.
	replace know_feedsick_moremilk=1 if q10_04a==9 | q10_04b==9 | q10_04c==9 | q10_04d==9 | q10_04e==9
	replace know_feedsick_moremilk=0 if know_feedsick_equalmilk!=1 & q10_04a!=.

		* Score
	egen know_feedsick_SUM=rowtotal(know_feedsick_equalfood know_feedsick_morefood know_feedsick_equalliquid know_feedsick_moreliquid know_feedsick_equalmilk know_feedsick_moremilk), m
	gen know_feedsick_score=know_feedsick_SUM/6
	
	* FALTA 6 y 5
	
	
	* ¿Por qué les repartiría usted las preparaciones (alimentos) de esta forma, a cada uno de los miembros de su familia?
	
	gen know_distribute_econ=.
	replace know_distribute_econ=1 if q10_07a==1 | q10_07b==1 | q10_07c==1 | q10_07d==1
	replace know_distribute_econ=0 if know_distribute_econ!=1 & q10_07a!=.
		
	gen know_distribute_work=.
	replace know_distribute_work=1 if q10_07a==2 | q10_07b==2 | q10_07c==2 | q10_07d==2
	replace know_distribute_work=0 if know_distribute_work!=1 & q10_07a!=.
	
	gen know_distribute_age=.
	replace know_distribute_age=1 if q10_07a==3 | q10_07b==3 | q10_07c==3 | q10_07d==3
	replace know_distribute_age=0 if know_distribute_age!=1 & q10_07a!=.
	
	gen know_distribute_foodneed=.
	replace know_distribute_foodneed=1 if q10_07a==4 | q10_07b==4 | q10_07c==4 | q10_07d==4
	replace know_distribute_foodneed=0 if know_distribute_foodneed!=1 & q10_07a!=.
	
	gen know_distribute_preference=.
	replace know_distribute_preference=1 if q10_07a==5 | q10_07b==5 | q10_07c==5 | q10_07d==5
	replace know_distribute_preference=0 if know_distribute_preference!=1 & q10_07a!=.
		
	gen know_distribute_tradition=.
	replace know_distribute_tradition=1 if q10_07a==6 | q10_07b==6 | q10_07c==6 | q10_07d==6
	replace know_distribute_tradition=0 if know_distribute_tradition!=1 & q10_07a!=.
	
		* Score
	egen know_distribute_SUM = rowtotal(know_distribute_age know_distribute_foodneed), m
	gen know_distribute_score=know_distribute_SUM/2
	
	* ¿Sabe usted hasta que edad se le debe dar solo leche materna (pecho) a un niño/a?
	gen know_agebreastfeed_SUM=.
	gen know_agebreastfeed_months=q10_08
	replace know_agebreastfeed_SUM = 1 if q10_08==6
	replace know_agebreastfeed_SUM = 0 if know_agebreastfeed_SUM!=1 & q10_08!=.
	gen know_agebreastfeed_score=know_agebreastfeed_SUM
	
	* Después de nacer el bebé / el niño (a) ¿a cuánto tiempo se le debe dar de mamar la primera 
	gen know_firstbreastfeed_SUM=.
	gen know_firstbreastfeed_Q=q10_09
	replace know_firstbreastfeed_SUM = 1 if q10_09==1
	replace know_firstbreastfeed_SUM = 0 if know_firstbreastfeed_SUM!=1 & q10_09!=.
	gen know_firstbreastfeed_score=know_firstbreastfeed_SUM
	
	* ¿Debe recibir un bebé / [un recién nacido] el calostro o la primera leche de la madre?
	gen know_newborncalostro_SUM=.
	gen know_newborncalostro_Q=q10_10
	replace know_newborncalostro_SUM = 1 if q10_10==1
	replace know_newborncalostro_SUM = 0 if know_newborncalostro_SUM!=1 & q10_10!=.
	gen know_newborncalostro_score=know_newborncalostro_SUM
	
	* ¿Debe recibir un bebé / [un recién nacido] el calostro o la primera leche de la madre? - Por que
	gen know_whynewborncalostro_avail=.
	replace know_whynewborncalostro_avail = 1 if q10_11a==1 | q10_11b==1 | q10_11c==1 | q10_11d==1 | q10_11e==1
	replace know_whynewborncalostro_avail = 0 if know_whynewborncalostro_avail!=1 & q10_11a!=.

	gen know_whynewborncalostro_famecon=.
	replace know_whynewborncalostro_famecon = 1 if q10_11a==2 | q10_11b==2 | q10_11c==2 | q10_11d==2 | q10_11e==2
	replace know_whynewborncalostro_famecon = 0 if know_whynewborncalostro_famecon!=1 & q10_11a!=.
	
	gen know_whynewborncalostro_MELA=.
	replace know_whynewborncalostro_MELA = 1 if q10_11a==3 | q10_11b==3 | q10_11c==3 | q10_11d==3 | q10_11e==3
	replace know_whynewborncalostro_MELA = 0 if know_whynewborncalostro_MELA!=1 & q10_11a!=.

	gen know_whynewborncalostro_nutrient=.
	replace know_whynewborncalostro_nutrient = 1 if q10_11a==4 | q10_11b==4 | q10_11c==4 | q10_11d==4 | q10_11e==4
	replace know_whynewborncalostro_nutrient = 0 if know_whynewborncalostro_nutrient!=1 & q10_11a!=.

	gen know_whynewborncalostro_defense=.
	replace know_whynewborncalostro_defense = 1 if q10_11a==5 | q10_11b==5 | q10_11c==5 | q10_11d==5 | q10_11e==5
	replace know_whynewborncalostro_defense = 0 if know_whynewborncalostro_defense!=1 & q10_11a!=.
	
	gen know_whynewborncalostro_lesssick=.
	replace know_whynewborncalostro_lesssick = 1 if q10_11a==6 | q10_11b==6 | q10_11c==6 | q10_11d==6 | q10_11e==6
	replace know_whynewborncalostro_lesssick = 0 if know_whynewborncalostro_lesssick!=1 & q10_11a!=.

	gen know_whynewborncalostro_vaccine=.
	replace know_whynewborncalostro_vaccine = 1 if q10_11a==7 | q10_11b==7 | q10_11c==7 | q10_11d==7 | q10_11e==7
	replace know_whynewborncalostro_vaccine = 0 if know_whynewborncalostro_vaccine!=1 & q10_11a!=.
	
	gen know_whynewborncalostro_SUM=.
	replace know_whynewborncalostro_SUM = 1 if q10_11a==7 | q10_11b==7 | q10_11c==7 | q10_11d==7 | q10_11e==7
	replace know_whynewborncalostro_SUM = 0 if know_whynewborncalostro_SUM!=1 & q10_11a!=.
	gen know_whynewborncalostro_score=know_whynewborncalostro_SUM
	
	* ¿Cada cuánto debe una madre darle de mamar a un bebé / [un niño/a] menor de seis meses?
	gen know_freqbreastfeed_want=.
	replace know_freqbreastfeed_want=1 if q10_13a==1 | q10_13b==1 | q10_13c==1 | q10_13d==1
	replace know_freqbreastfeed_want=0 if know_freqbreastfeed_want!=1 & q10_13a!=.
	
	gen know_freqbreastfeed_hunger=.
	replace know_freqbreastfeed_hunger=1 if q10_13a==2 | q10_13b==2 | q10_13c==2 | q10_13d==2
	replace know_freqbreastfeed_hunger=0 if know_freqbreastfeed_hunger!=1 & q10_13a!=.
	
	gen know_freqbreastfeed_cry=.
	replace know_freqbreastfeed_cry=1 if q10_13a==3 | q10_13b==3 | q10_13c==3 | q10_13d==3
	replace know_freqbreastfeed_cry=0 if know_freqbreastfeed_cry!=1 & q10_13a!=.	
	
		* Score
	egen know_freqbreastfeed_SUM=rowtotal(know_freqbreastfeed_want know_freqbreastfeed_cry), m
	gen know_freqbreastfeed_score=know_freqbreastfeed_SUM/2
	
	
	* ¿Cómo sabe una madre si un/una bebé tiene hambre? 
	gen know_knowhundry_lickfinger=.
	replace know_knowhundry_lickfinger=1 if q10_14a==1 | q10_14b==1 | q10_14c==1 | q10_14d==1
	replace know_knowhundry_lickfinger=0 if know_knowhundry_lickfinger!=1 & q10_14a!=.
	
	gen know_knowhungry_restless=.
	replace know_knowhungry_restless=1 if q10_14a==2 | q10_14b==2 | q10_14c==2 | q10_14d==2
	replace know_knowhungry_restless=0 if know_knowhungry_restless!=1 & q10_14a!=.
	
	gen know_knowhungry_seekbreast=.
	replace know_knowhungry_seekbreast=1 if q10_14a==3 | q10_14b==3 | q10_14c==3 | q10_14d==3
	replace know_knowhungry_seekbreast=0 if know_knowhungry_seekbreast!=1 & q10_14a!=.	
	
	gen know_knowhungry_cry=.
	replace know_knowhungry_cry=1 if q10_14a==4 | q10_14b==4 | q10_14c==4 | q10_14d==4
	replace know_knowhungry_cry=0 if know_knowhungry_cry!=1 & q10_14a!=.	
	
		* Score
	egen know_knowhungry_SUM=rowtotal(know_knowhungry_seekbreast know_knowhungry_cry), m
	gen know_knowhungry_score=know_knowhungry_SUM/2
	
	
	* Si una madre de un bebé menor de 6 meses cree que no tiene suficiente leche materna, ¿qué debe hacer?
	gen know_lowmilk_morefreq=.
	replace know_lowmilk_morefreq = 1 if q10_15a==1 | q10_15b==1 | q10_15c==1 | q10_15d==1 | q10_15e==1
	replace know_lowmilk_morefreq = 0 if know_lowmilk_morefreq!=1 & q10_15a!=.
	
	gen know_lowmilk_otherliquid=.
	replace know_lowmilk_otherliquid = 1 if q10_15a==2 | q10_15b==2 | q10_15c==2 | q10_15d==2 | q10_15e==2
	replace know_lowmilk_otherliquid = 0 if know_lowmilk_otherliquid!=1 & q10_15a!=.
	
	gen know_lowmilk_hydrate=.
	replace know_lowmilk_hydrate = 1 if q10_15a==3 | q10_15b==3 | q10_15c==3 | q10_15d==3 | q10_15e==3
	replace know_lowmilk_hydrate = 0 if know_lowmilk_hydrate!=1 & q10_15a!=.
	
	gen know_lowmilk_moreliquid=.
	replace know_lowmilk_moreliquid = 1 if q10_15a==4 | q10_15b==4 | q10_15c==4 | q10_15d==4 | q10_15e==4
	replace know_lowmilk_moreliquid = 0 if know_lowmilk_moreliquid!=1 & q10_15a!=.
	
	gen know_lowmilk_eatmore=.
	replace know_lowmilk_eatmore = 1 if q10_15a==5 | q10_15b==5 | q10_15c==5 | q10_15d==5 | q10_15e==5
	replace know_lowmilk_eatmore = 0 if know_lowmilk_eatmore!=1 & q10_15a!=.
	
	gen know_lowmilk_betterfood=.
	replace know_lowmilk_betterfood = 1 if q10_15a==6 | q10_15b==6 | q10_15c==6 | q10_15d==6 | q10_15e==6
	replace know_lowmilk_betterfood = 0 if know_lowmilk_betterfood!=1 & q10_15a!=.
	
	gen know_lowmilk_boxedmilk=.
	replace know_lowmilk_boxedmilk = 1 if q10_15a==7 | q10_15b==7 | q10_15c==7 | q10_15d==7 | q10_15e==7
	replace know_lowmilk_boxedmilk = 0 if know_lowmilk_boxedmilk!=1 & q10_15a!=.
	
		* Score
	egen know_lowmilk_SUM=rowtotal(know_lowmilk_morefreq know_lowmilk_hydrate know_lowmilk_moreliquid know_lowmilk_eatmore know_lowmilk_betterfood), m
	gen know_lowmilk_score=know_lowmilk_SUM/5
	
	* ¿Piensa/ [Cree] usted que una madre que está dando de mamar a un niño/a menor de seis meses, debe dejar de dar de mamar si vuelve a embarazarse?
	gen know_breastfeedagain_SUM=.
	gen know_breastfeedagain_Q=q10_16
	replace know_breastfeedagain_SUM = 1 if q10_16==2
	replace know_breastfeedagain_SUM = 0 if know_breastfeedagain_SUM!=1 & q10_16!=.
	gen know_breastfeedagain_score=know_breastfeedagain_SUM
	
	* Si una madre tiene un(a) bebé menor de 6 meses y no siempre puede estar con su bebé, ¿qué le puede dar al bebé cuando tiene hambre?
	gen know_notwithbaby_breastmilk=.
	replace know_notwithbaby_breastmilk =1 if q10_17a==1 | q10_17b==1 | q10_17c==1 | q10_17d==1 | q10_17e==1
	replace know_notwithbaby_breastmilk =0 if know_notwithbaby_breastmilk!=1 & q10_17a!=.
	
	gen know_notwithbaby_boxedmilk=.
	replace know_notwithbaby_boxedmilk =1 if q10_17a==2 | q10_17b==2 | q10_17c==2 | q10_17d==2 | q10_17e==2
	replace know_notwithbaby_boxedmilk =0 if know_notwithbaby_boxedmilk!=1 & q10_17a!=.
	
	gen know_notwithbaby_formula=.
	replace know_notwithbaby_formula =1 if q10_17a==3 | q10_17b==3 | q10_17c==3 | q10_17d==3 | q10_17e==3
	replace know_notwithbaby_formula =0 if know_notwithbaby_formula!=1 & q10_17a!=.
	
	gen know_notwithbaby_cowmilk=.
	replace know_notwithbaby_cowmilk =1 if q10_17a==4 | q10_17b==4 | q10_17c==4 | q10_17d==4 | q10_17e==4
	replace know_notwithbaby_cowmilk =0 if know_notwithbaby_cowmilk!=1 & q10_17a!=.
	
	gen know_notwithbaby_goatmilk=.
	replace know_notwithbaby_goatmilk =1 if q10_17a==5 | q10_17b==5 | q10_17c==5 | q10_17d==5 | q10_17e==5
	replace know_notwithbaby_goatmilk =0 if know_notwithbaby_goatmilk!=1 & q10_17a!=.
	
	gen know_notwithbaby_pump=.
	replace know_notwithbaby_pump =1 if q10_17a==8 | q10_17b==8 | q10_17c==8 | q10_17d==8 | q10_17e==8
	replace know_notwithbaby_pump =0 if know_notwithbaby_pump!=1 & q10_17a!=.
	
	gen know_notwithbaby_nothing=.
	replace know_notwithbaby_nothing =1 if q10_17a==6 | q10_17b==6 | q10_17c==6 | q10_17d==6 | q10_17e==6
	replace know_notwithbaby_nothing =0 if know_notwithbaby_nothing!=1 & q10_17a!=.
	
		* Score
	egen know_notwithbaby_SUM=rowtotal(know_notwithbaby_pump),m
	gen know_notwithbaby_score=know_notwithbaby_SUM
	
	* ¿A qué edad se debe empezar a dar líquidos diferentes o además de la leche materna a su bebé/ [niño/a]?
	gen know_ageotherliquid_SUM=.
	gen know_ageotherliquid_age=q10_18
	replace know_ageotherliquid_SUM = 1 if q10_18==6
	replace know_ageotherliquid_SUM = 0 if know_ageotherliquid_SUM!=1 & q10_18!=.
	gen know_ageotherliquid_score=know_ageotherliquid_SUM
	
	* ¿A qué edad se le debe empezar a dar alimentos / [comida] a su bebé/[niño/a]?
	gen know_agesolidfood_SUM=.
	gen know_agesolidfood_age=q10_19
	replace know_agesolidfood_SUM = 1 if q10_19==6
	replace know_agesolidfood_SUM = 0 if know_agesolidfood_SUM!=1 & q10_19!=.
	gen know_agesolidfood_score=know_agesolidfood_SUM
	
	* ¿Cuáles son las razones por las que un bebé/ [un niño/a] menor de 6 meses reciba/ [debe recibir] solamente leche materna o pecho?
	gen know_rznbreastmilk_protect=.
	replace know_rznbreastmilk_protect=1 if q10_20a==1 | q10_20b==1 | q10_20c==1 | q10_20d==1 | q10_20e==1 | q10_20f==1
	replace know_rznbreastmilk_protect=0 if know_rznbreastmilk_protect!=1 & q10_20a!=.
	
	gen know_rznbreastmilk_grow=.
	replace know_rznbreastmilk_grow=1 if q10_20a==2 | q10_20b==2 | q10_20c==2 | q10_20d==2 | q10_20e==2 | q10_20f==2
	replace know_rznbreastmilk_grow=0 if know_rznbreastmilk_grow!=1 & q10_20a!=.
	
	gen know_rznbreastmilk_completefood=.
	replace know_rznbreastmilk_completefood=1 if q10_20a==3 | q10_20b==3 | q10_20c==3 | q10_20d==3 | q10_20e==3 | q10_20f==3
	replace know_rznbreastmilk_completefood=0 if know_rznbreastmilk_completefood!=1 & q10_20a!=.
	
	gen know_rznbreastmilk_notpregnant=.
	replace know_rznbreastmilk_notpregnant=1 if q10_20a==4 | q10_20b==4 | q10_20c==4 | q10_20d==4 | q10_20e==4 | q10_20f==4
	replace know_rznbreastmilk_notpregnant=0 if know_rznbreastmilk_notpregnant!=1 & q10_20a!=.
	
	gen know_rznbreastmilk_periodstop=.
	replace know_rznbreastmilk_periodstop=1 if q10_20a==5 | q10_20b==5 | q10_20c==5 | q10_20d==5 | q10_20e==5 | q10_20f==5
	replace know_rznbreastmilk_periodstop=0 if know_rznbreastmilk_periodstop!=1 & q10_20a!=.
	
	gen know_rznbreastmilk_safe=.
	replace know_rznbreastmilk_safe=1 if q10_20a==6 | q10_20b==6 | q10_20c==6 | q10_20d==6 | q10_20e==6 | q10_20f==6
	replace know_rznbreastmilk_safe=0 if know_rznbreastmilk_safe!=1 & q10_20a!=.
	
	gen know_rznbreastmilk_cheap=.
	replace know_rznbreastmilk_cheap=1 if q10_20a==7 | q10_20b==7 | q10_20c==7 | q10_20d==7 | q10_20e==7 | q10_20f==7
	replace know_rznbreastmilk_cheap=0 if know_rznbreastmilk_cheap!=1 & q10_20a!=.
	
	gen know_rznbreastmilk_lowexpense=.
	replace know_rznbreastmilk_lowexpense=1 if q10_20a==8 | q10_20b==8 | q10_20c==8 | q10_20d==8 | q10_20e==8 | q10_20f==8
	replace know_rznbreastmilk_lowexpense=0 if know_rznbreastmilk_lowexpense!=1 & q10_20a!=.
	
	gen know_rznbreastmilk_cantchew=.
	replace know_rznbreastmilk_cantchew=1 if q10_20a==9 | q10_20b==9 | q10_20c==9 | q10_20d==9 | q10_20e==9 | q10_20f==9
	replace know_rznbreastmilk_cantchew=0 if know_rznbreastmilk_cantchew!=1 & q10_20a!=.
	
	gen know_rznbreastmilk_medadvice=.
	replace know_rznbreastmilk_medadvice=1 if q10_20a==10 | q10_20b==10 | q10_20c==10 | q10_20d==10 | q10_20e==10 | q10_20f==10
	replace know_rznbreastmilk_medadvice=0 if know_rznbreastmilk_medadvice!=1 & q10_20a!=.
	
		* Score
	egen know_rznbreastmilk_SUM=rowtotal(know_rznbreastmilk_protect know_rznbreastmilk_grow know_rznbreastmilk_completefood know_rznbreastmilk_notpregnant know_rznbreastmilk_periodstop know_rznbreastmilk_safe know_rznbreastmilk_cheap know_rznbreastmilk_lowexpense know_rznbreastmilk_cantchew), m
	gen know_rznbreastmilk_score=know_rznbreastmilk_SUM/9
	
	* ¿Hasta qué edad una madre puede continuar dándole de mamar a su bebé?
	gen know_maxagebreastfeed_SUM=.
	gen know_maxagebreastfeed_age=q10_21
	replace know_maxagebreastfeed_SUM=1 if q10_21==24
	replace know_maxagebreastfeed_SUM=0 if know_maxagebreastfeed_SUM!=1 & q10_21!=.
	gen know_maxagebreastfeed_score=know_maxagebreastfeed_SUM
	
	* ¿Sabe usted por qué es bueno que a un niño/a de seis meses, que está mamando, se le den también "algunas comiditas"?
	gen know_milkplusfood_morefood=.
	replace know_milkplusfood_morefood= 1 if q10_22a==1 | q10_22b==1 | q10_22c==1 | q10_22d==1 | q10_22e==1
	replace know_milkplusfood_morefood= 0 if know_milkplusfood_morefood!=1 & q10_22a!=.
	
	gen know_milkplusfood_addnutrient=.
	replace know_milkplusfood_addnutrient= 1 if q10_22a==2 | q10_22b==2 | q10_22c==2 | q10_22d==2 | q10_22e==2
	replace know_milkplusfood_addnutrient= 0 if know_milkplusfood_addnutrient!=1 & q10_22a!=.

	gen know_milkplusfood_newfood=.
	replace know_milkplusfood_newfood= 1 if q10_22a==3 | q10_22b==3 | q10_22c==3 | q10_22d==3 | q10_22e==3
	replace know_milkplusfood_newfood= 0 if know_milkplusfood_newfood!=1 & q10_22a!=.

	gen know_milkplusfood_adaptmixed=.
	replace know_milkplusfood_adaptmixed= 1 if q10_22a==4 | q10_22b==4 | q10_22c==4 | q10_22d==4 | q10_22e==4
	replace know_milkplusfood_adaptmixed= 0 if know_milkplusfood_adaptmixed!=1 & q10_22a!=.

	gen know_milkplusfood_adaptfamily=.
	replace know_milkplusfood_adaptfamily= 1 if q10_22a==5 | q10_22b==5 | q10_22c==5 | q10_22d==5 | q10_22e==5
	replace know_milkplusfood_adaptfamily= 0 if know_milkplusfood_adaptfamily!=1 & q10_22a!=.
	
	gen know_milkplusfood_newsmell=.
	replace know_milkplusfood_newsmell= 1 if q10_22a==7 | q10_22b==7 | q10_22c==7 | q10_22d==7 | q10_22e==7
	replace know_milkplusfood_newsmell= 0 if know_milkplusfood_newsmell!=1 & q10_22a!=.
	
		* Score
	egen know_milkplusfood_SUM=rowtotal(know_milkplusfood_morefood know_milkplusfood_addnutrient know_milkplusfood_newfood know_milkplusfood_adaptmixed), m
	gen know_milkplusfood_score=know_milkplusfood_SUM/4

	* ¿Cómo debe ser la comida que se debe dar a un niño/a de 6 a 8 meses?
	gen know_whichfood68_SUM=.
	gen know_whichfood68_Q=q10_23
	replace know_whichfood68_SUM = 1 if q10_23==1
	replace know_whichfood68_SUM = 0 if know_whichfood68_SUM!=1 & q10_23!=.
	gen know_whichfood68_score=know_whichfood68_SUM
	
	* ¿Cómo debe ser la comida que se debe dar a un niño/a de 9 a 11meses?
	gen know_whichfood911_SUM=.
	gen know_whichfood911_Q=q10_24
	replace know_whichfood911_SUM=1 if q10_24==3
	replace know_whichfood911_SUM=0 if know_whichfood911_SUM!=1 & q10_24!=.
	gen know_whichfood911_score=know_whichfood911_SUM
	
	* ¿Cómo debe ser la comida que se debe dar a un niño/a de un año en adelante?
	gen know_whichfood12_SUM=.
	gen know_whichfood12_Q=q10_25
	replace know_whichfood12_SUM=1 if q10_25==4
	replace know_whichfood12_SUM=0 if know_whichfood12_SUM!=1 & q10_25!=.
	gen know_whichfood12_score=know_whichfood12_SUM
	
	* ¿Cuál es la cantidad de comida que se le debe dar a un niño de 6 a 8 meses?
	gen know_quantfood68_SUM=.
	gen know_quantfood68_Q=q10_26
	replace know_quantfood68_SUM=1 if q10_26==1
	replace know_quantfood68_SUM=0 if know_quantfood68_SUM!=1 & q10_26!=.
	gen know_quantfood68_score=know_quantfood68_SUM
	
	* ¿Cuál es la cantidad de comida que se le debe dar a un niño de 9 a 11 meses?
	gen know_quantfood911_SUM=.
	gen know_quantfood911_Q=q10_27
	replace know_quantfood911_SUM=1 if q10_27==2
	replace know_quantfood911_SUM=0 if know_quantfood911_SUM!=1 & q10_27!=.
	gen know_quantfood911_score=know_quantfood911_SUM
	
	* ¿Cuál es la cantidad de comida que se le debe dar a un niño de 1 año en adelante?
	gen know_quantfood12_SUM=.
	gen know_quantfood12_Q=q10_28
	replace know_quantfood12_SUM=1 if q10_28==3
	replace know_quantfood12_SUM=0 if know_quantfood12_SUM!=1 & q10_28!=.
	gen know_quantfood12_score=know_quantfood12_SUM
	
	* ¿A cada cuánto se debe dar de comer dar a un niño de 6 a 8 meses?
	gen know_freqfood68_SUM=.
	gen know_freqfood68_Q=q10_29
	replace know_freqfood68_SUM=1 if q10_29==1
	replace know_freqfood68_SUM=0 if know_freqfood68_SUM!=1 & q10_29!=.
	gen know_freqfood68_score=know_freqfood68_SUM
	
	* ¿A cada cuánto se debe dar de comer dar a un niño de 9 a 11 meses?
	gen know_freqfood911_SUM=.
	gen know_freqfood911_Q=q10_30
	replace know_freqfood911_SUM=1 if q10_30==2
	replace know_freqfood911_SUM=0 if know_freqfood911_SUM!=1 & q10_30!=.
	gen know_freqfood911_score=know_freqfood911_SUM
	
	* ¿A cada cuánto se debe dar de comer dar a un niño de un año en adelante ?
	gen know_freqfood12_SUM=.
	gen know_freqfood12_Q=q10_31
	replace know_freqfood12_SUM=1 if q10_31==3
	replace know_freqfood12_SUM=0 if know_freqfood12_SUM!=1 & q10_31!=.
	gen know_freqfood12_score=know_freqfood12_SUM
	
	* ¿En qué momentos debe una persona lavarse las manos?
	gen know_timewashhands_eat=.
	replace know_timewashhands_eat=1 if q10_32a==1 | q10_32b==1 | q10_32c==1 | q10_32d==1 | q10_32e==1
	replace know_timewashhands_eat=0 if know_timewashhands_eat!=1 & q10_32a!=.
	
	gen know_timewashhands_toilet=.
	replace know_timewashhands_toilet=1 if q10_32a==2 | q10_32b==2 | q10_32c==2 | q10_32d==2 | q10_32e==2
	replace know_timewashhands_toilet=0 if know_timewashhands_toilet!=1 & q10_32a!=.
	
	gen know_timewashhands_feed=.
	replace know_timewashhands_feed=1 if q10_32a==3 | q10_32b==3 | q10_32c==3 | q10_32d==3 | q10_32e==3
	replace know_timewashhands_feed=0 if know_timewashhands_feed!=1 & q10_32a!=.
	
	gen know_timewashhands_diapers=.
	replace know_timewashhands_diapers=1 if q10_32a==4 | q10_32b==4 | q10_32c==4 | q10_32d==4 | q10_32e==4
	replace know_timewashhands_diapers=0 if know_timewashhands_diapers!=1 & q10_32a!=.

	gen know_timewashhands_cook=.
	replace know_timewashhands_cook=1 if q10_32a==5 | q10_32b==5 | q10_32c==5 | q10_32d==5 | q10_32e==5
	replace know_timewashhands_cook=0 if know_timewashhands_cook!=1 & q10_32a!=.
	
		* Score
	egen know_timewashhands_SUM=rowtotal(know_timewashhands_eat know_timewashhands_toilet know_timewashhands_feed know_timewashhands_diapers know_timewashhands_cook), m
	gen know_timewashhands_score=know_timewashhands_SUM/5
	
	* Además de agua, ¿Qué más puede usar / [que se debe usar] para lavarse las manos?
	gen know_washhands_soap=.
	replace know_washhands_soap=1 if q10_33a==1 | q10_33b==1 | q10_33c==1 | q10_33d==1 | q10_33e==1
	replace know_washhands_soap=0 if know_washhands_soap!=1 & q10_33a!=.
	
	gen know_washhands_detergent=.
	replace know_washhands_detergent=1 if q10_33a==2 | q10_33b==2 | q10_33c==2 | q10_33d==2 | q10_33e==2
	replace know_washhands_detergent=0 if know_washhands_detergent!=1 & q10_33a!=.

	gen know_washhands_liqsoap=.
	replace know_washhands_liqsoap=1 if q10_33a==3 | q10_33b==3 | q10_33c==3 | q10_33d==3 | q10_33e==3
	replace know_washhands_liqsoap=0 if know_washhands_liqsoap!=1 & q10_33a!=.
	
	gen know_washhands_ash=.
	replace know_washhands_ash=1 if q10_33a==4 | q10_33b==4 | q10_33c==4 | q10_33d==4 | q10_33e==4
	replace know_washhands_ash=0 if know_washhands_ash!=1 & q10_33a!=.
	
	gen know_washhands_alcohol=.
	replace know_washhands_alcohol=1 if q10_33a==5 | q10_33b==5 | q10_33c==5 | q10_33d==5 | q10_33e==5
	replace know_washhands_alcohol=0 if know_washhands_alcohol!=1 & q10_33a!=.
	
		* Score
	egen know_washhands_SUM=rowtotal(know_washhands_soap know_washhands_detergent know_washhands_liqsoap know_washhands_ash know_washhands_alcohol), m
	gen know_washhands_score=know_washhands_SUM/5
	
	* ¿Sabe usted qué deben hacer los padres o cuidadores, cuando un niño/a tiene señales de peligro de: diarrea, catarro o gripe o enfermedades de la piel?
	gen know_actsick_SUM = .
	gen know_actsick_Q=q10_34
	replace know_actsick_SUM=1 if q10_34==5
	replace know_actsick_SUM=0 if know_actsick_SUM!=1 & q10_34!=.
	gen know_actsick_score=know_actsick_SUM
	
	* ¿Qué formas conoce usted para purificar el agua que se usa para beber? 
	gen know_purewater_boil=.
	replace know_purewater_boil=1 if q10_35a==1 | q10_35b==1 | q10_35c==1 | q10_35d==1 | q10_35e==1
	replace know_purewater_boil=0 if know_purewater_boil!=1 & q10_35a!=.
	
	gen know_purewater_chlorine=.
	replace know_purewater_chlorine=1 if q10_35a==2 | q10_35b==2 | q10_35c==2 | q10_35d==2 | q10_35e==2
	replace know_purewater_chlorine=0 if know_purewater_chlorine!=1 & q10_35a!=.
	
	gen know_purewater_SODIS=.
	replace know_purewater_SODIS=1 if q10_35a==3 | q10_35b==3 | q10_35c==3 | q10_35d==3 | q10_35e==3
	replace know_purewater_SODIS=0 if know_purewater_SODIS!=1 & q10_35a!=.

	gen know_purewater_iodine=.
	replace know_purewater_iodine=1 if q10_35a==4 | q10_35b==4 | q10_35c==4 | q10_35d==4 | q10_35e==4
	replace know_purewater_iodine=0 if know_purewater_iodine!=1 & q10_35a!=.
	
	gen know_purewater_filter=.
	replace know_purewater_filter=1 if q10_35a==5 | q10_35b==5 | q10_35c==5 | q10_35d==5 | q10_35e==5
	replace know_purewater_filter=0 if know_purewater_filter!=1 & q10_35a!=.
	
		* Score
	egen know_purewater_SUM=rowtotal(know_purewater_boil know_purewater_chlorine know_purewater_SODIS know_purewater_filter), m
	gen know_purewater_score=know_purewater_SUM/4
	
	* ¿Cuáles son las principales causas de la desnutrición en los niños/niñas?
	gen know_malnutrition_insuffood=.
	replace know_malnutrition_insuffood=1 if q10_36a==1 | q10_36b==1 | q10_36c==1 | q10_36d==1 | q10_36e==1 
	replace know_malnutrition_insuffood=0 if know_malnutrition_insuffood!=1 & q10_36a!=.
	
	gen know_malnutrition_irregeat=.
	replace know_malnutrition_irregeat=1 if q10_36a==2 | q10_36b==2 | q10_36c==2 | q10_36d==2 | q10_36e==2 
	replace know_malnutrition_irregeat=0 if know_malnutrition_irregeat!=1 & q10_36a!=.
	
	gen know_malnutrition_illness=.
	replace know_malnutrition_illness=1 if q10_36a==3 | q10_36b==3 | q10_36c==3 | q10_36d==3 | q10_36e==3 
	replace know_malnutrition_illness=0 if know_malnutrition_illness!=1 & q10_36a!=.
	
	gen know_malnutrition_stopbreast=.
	replace know_malnutrition_stopbreast=1 if q10_36a==4 | q10_36b==4 | q10_36c==4 | q10_36d==4 | q10_36e==4 
	replace know_malnutrition_stopbreast=0 if know_malnutrition_stopbreast!=1 & q10_36a!=.
	
	gen know_malnutrition_careless=.
	replace know_malnutrition_careless=1 if q10_36a==5 | q10_36b==5 | q10_36c==5 | q10_36d==5 | q10_36e==5 
	replace know_malnutrition_careless=0 if know_malnutrition_careless!=1 & q10_36a!=.
	
	gen know_malnutrition_novariety=.
	replace know_malnutrition_novariety=1 if q10_36a==6 | q10_36b==6 | q10_36c==6 | q10_36d==6 | q10_36e==6 
	replace know_malnutrition_novariety=0 if know_malnutrition_novariety!=1 & q10_36a!=.
	
		* Score
	egen know_malnutrition_SUM=rowtotal(know_malnutrition_insuffood know_malnutrition_irregeat know_malnutrition_illness know_malnutrition_stopbreast know_malnutrition_careless know_malnutrition_novariety),
	gen know_malnutrition_score=know_malnutrition_SUM/6
	
	label var know_diarheasignal_dehydr 				"Deshidratación"
	label var know_diarheasignal_irritable 				"Intranquilidad e irritabilidad"
	label var know_diarheasignal_blood 					"Presencia de sangres en las heces (disentería)"
	label var know_diarheasignal_deepeyes 				"Mollera caída / ojos hundidos"
	label var know_diarheasignal_lowurine 				"Orina poco, no orina / llanto sin lágrimas"
	label var know_diarheasignal_pliegue 				"Presencia del signo del pliegue"
	label var know_diarheasignal_freqdeposit 			"Deposiciones a cada rato / depositiones abundantes"
	label var know_diarheasignal_decay 					"Decaimiento acentuado (niños/as sin energía)"
	
	label var know_dangerflu_fastbreathe 				"Respiración rápida o entrecortada"
	label var know_dangerflu_whistle 					"Silbido al respirar"
	label var know_dangerflu_chestheat 					"Hervor de pecho"
	label var know_dangerflu_twodayfever 				"Fiebre alta por más de 2 días"
	label var know_dangerflu_deeprib 					"Hundimiento de costillas"
	label var know_dangerflu_ingestdig 					"Dificultad para beber y/o comer"
	
	label var know_dangerskin_dry 						"Abundante piel reseca"
	label var know_dangerskin_itch 						"Escozor o picazón constante"
	label var know_dangerskin_rash 						"Presencia de erupciones o secreciones"
	label var know_dangerskin_sores 					"Presencia de llagas"
	
	label var know_feedsick_lessfood 					"Dar menos alimentos de lo normal"
	label var know_feedsick_equalfood 					"Dar la misma cantidad de alimentos de lo normal"
	label var know_feedsick_morefood 					"Dar más alimentos de lo normal"
	label var know_feedsick_lessliquid 					"Dar menos líquidos de lo normal"
	label var know_feedsick_equalliquid 				"Dar la misma cantidad de líquidos de lo normal"
	label var know_feedsick_moreliquid 					"Dar más líquidos de lo normal"
	label var know_feedsick_lessmilk 					"Dar menos leche materna de lo normal"
	label var know_feedsick_equalmilk 					"Dar la misma cantidad de leche materna de lo normal"
	label var know_feedsick_moremilk 					"Dar más leche de lo normal"
	
	label var know_distribute_econ 						"Aporte económico al hogar"
	label var know_distribute_work 						"El trabajo que hace cada uno"
	label var know_distribute_age 						"Edades de los miembros"
	label var know_distribute_foodneed 					"Necesidades de alimento y nutrientes"
	label var know_distribute_preference 				"Gusto por determinados alimentos"
	label var know_distribute_tradition 				"Por costumbre o tradición de la familia"
	
	label var know_agebreastfeed_months					"Edad máxima para dar solo leche materna a un niño/a"
	
	label var know_whynewborncalostro_avail 			"Siempre está disponible"
	label var know_whynewborncalostro_famecon 			"Favorece l aeconomía familiar"
	label var know_whynewborncalostro_MELA 				"Favorece la recuperación de la madre / MELA"
	label var know_whynewborncalostro_nutrient 			"El niño/a recibe todos los nutrientes que necesita"
	label var know_whynewborncalostro_defense 			"El niño/a recibe defensas para toda su vida"
	label var know_whynewborncalostro_lesssick 			"El niño/a se enferma menos"
	label var know_whynewborncalostro_vaccine 			"Es como la primera vacuna"
	
	label var know_freqbreastfeed_want 					"Cuanto el bebe quiera"
	label var know_freqbreastfeed_hunger 				"Cuando se ve que el bebé está con hambre"
	label var know_freqbreastfeed_cry 					"Cuando el bebé llore"
	
	label var know_knowhundry_lickfinger 				"Cuando el bebé se chupa sus dedos"
	label var know_knowhungry_restless 					"Cuando el bebé está inquieto"
	label var know_knowhungry_seekbreast 				"Cuando el bebé busca el pecho"
	label var know_knowhungry_cry 						"Cuando empieza a llorar"
	
	label var know_lowmilk_morefreq 					"Darle de mamar más seguido"
	label var know_lowmilk_otherliquid 					"Darle otros líquidos o alimentos"
	label var know_lowmilk_hydrate 						"La madre necesita tomar más agua"
	label var know_lowmilk_moreliquid 					"La madre necesita tomar más líquidos"
	label var know_lowmilk_eatmore 						"La madre debe comer más"
	label var know_lowmilk_betterfood 					"La madre debe alimentarse mejor"
	label var know_lowmilk_boxedmilk 					"Dar leche de bote"
	
	label var know_notwithbaby_breastmilk 				"Leche materna"
	label var know_notwithbaby_boxedmilk 				"Lecha en bote"
	label var know_notwithbaby_formula 					"Leche en fórmula especial para bebés"
	label var know_notwithbaby_cowmilk 					"Lecha de vaca"
	label var know_notwithbaby_goatmilk 				"Leche de cabra"
	label var know_notwithbaby_pump 					"Sacarse la lecha (ordeñándose)"
	label var know_notwithbaby_nothing 					"Nada"
	
	label var know_ageotherliquid_age					"Edad para empezar a dar líquidos diferentes o además de leche materna"
	
	label var know_agesolidfood_age						"Edad para empezar a dar alimentos"
	
	label var know_rznbreastmilk_protect 				"Proteger al bebé de una enfermedad"
	label var know_rznbreastmilk_grow 					"Ayuda al bebé a crecer mejor"
	label var know_rznbreastmilk_completefood 			"La leche materna contiene todo lo que el beb+e necesita"
	label var know_rznbreastmilk_notpregnant 			"Es menos probable que la madre quede embarazada"
	label var know_rznbreastmilk_periodstop 			"Detener la regla de la mamá"
	label var know_rznbreastmilk_safe 					"La leche materna es limpia, segura y conveniente"
	label var know_rznbreastmilk_cheap 					"La leche materna es económica"
	label var know_rznbreastmilk_lowexpense 			"Reducir los gastos médicos"
	label var know_rznbreastmilk_cantchew 				"Porque el bebé no puede masticar (No tiene dientes)"
	label var know_rznbreastmilk_medadvice 				"Consejo médico"
	
	label var know_maxagebreastfeed_age 				"Edad máxima para darle de mamar a su bebé"
	
	label var know_milkplusfood_morefood 				"Reciba mayor cantidad de alimentos"
	label var know_milkplusfood_addnutrient 			"Reciba nutrientes en que se queda corta la LM"
	label var know_milkplusfood_newfood 				"Conozca nuevos alimentos / nuevas comidas"
	label var know_milkplusfood_adaptmixed 				"Se adapta a recibir una alimentación mixta"
	label var know_milkplusfood_adaptfamily 			"Se adapta a la comida que come la familia"
	label var know_milkplusfood_newsmell 				"Aprende a conocer otros olores y sabores"
	
	label var know_timewashhands_eat 					"Antes de comer"
	label var know_timewashhands_toilet 				"Después de ir a la letrina o inodoro"
	label var know_timewashhands_feed 					"Antes de darle la comida al niño/a"
	label var know_timewashhands_diapers 				"Después de cambiarle pañales o limpiarle el popó"
	label var know_timewashhands_cook 					"Antes de preparar y tocar comida"
	
	label var know_washhands_soap 						"Jabón"
	label var know_washhands_detergent 					"Detergente (polvo)"
	label var know_washhands_liqsoap 					"Jabón en líquido"
	label var know_washhands_ash 						"Ceniza"
	label var know_washhands_alcohol 					"Alcohol o Gel"
	
	label var know_purewater_boil 						"Hervirla"
	label var know_purewater_chlorine 					"Tratarla con cloro"
	label var know_purewater_SODIS 						"Método de SODIS (asolearla)"
	label var know_purewater_iodine 					"Yodarla"
	label var know_purewater_filter 					"Colar o filtrar el agua"
	
	label var know_malnutrition_insuffood 				"La comuda y alimentos son insuficientes"
	label var know_malnutrition_irregeat 				"Come en tiempos irregulares"
	label var know_malnutrition_illness 				"Enfermedades"
	label var know_malnutrition_stopbreast 				"Destete abrupto"
	label var know_malnutrition_careless 				"Al noño no se le está dando comida con afecto"
	label var know_malnutrition_novariety 				"No hay variedad en su alimentación"
	
	* KNOWLEDGE INDEX CREATION
	
	* V1: Count # right answers and divide over total
	egen knowledge_indexV1=rowtotal(*_SUM), m
	replace knowledge_indexV1=knowledge_indexV1/76
	
	* V2: Create % for each question and then ponderate equally
	egen knowledge_indexV2=rowmean(*_score)
	
	egen knowledge_indexV1_bf=rowtotal(know_agebreastfeed_SUM know_firstbreastfeed_SUM know_newborncalostro_SUM know_whynewborncalostro_SUM know_freqbreastfeed_SUM know_breastfeedagain_SUM know_rznbreastmilk_SUM know_maxagebreastfeed_SUM),m
	replace knowledge_indexV1_bf=knowledge_indexV1_bf/12
	
	egen knowledge_indexV1_food=rowtotal(know_distribute_SUM know_knowhungry_SUM know_lowmilk_SUM know_notwithbaby_SUM know_ageotherliquid_SUM know_agesolidfood_SUM know_milkplusfood_SUM know_whichfood68_SUM know_whichfood911_SUM know_whichfood12_SUM know_quantfood68_SUM know_quantfood911_SUM know_quantfood12_SUM know_freqfood68_SUM know_freqfood911_SUM know_freqfood12_SUM),m
	replace knowledge_indexV1_food=knowledge_indexV1_food/24
	
	egen knowledge_indexV1_health=rowtotal(know_diarheasignal_SUM know_dangerflu_SUM know_dangerskin_SUM know_feedsick_SUM know_timewashhands_SUM know_washhands_SUM know_actsick_SUM know_purewater_SUM know_malnutrition_SUM),m
	replace knowledge_indexV1_health=knowledge_indexV1_health/35
	
	lab var knowledge_indexV1 "Indice de Conocimiento V1"
	lab var knowledge_indexV2 "Weighted: Indice de Conocimiento V2"
	lab var knowledge_indexV1_bf "Indice de Conocimiento V1 - Breastfeed"
	lab var knowledge_indexV1_food "Indice de Conocimiento V1 - Food consumption"
	lab var knowledge_indexV1_health "Indice de Conocimiento V1 - Health and care"	
	
	* Update var labels to remove everything before "=="
	findname, varlabeltext(*==*) 
	labvarch `r(varlist)', after(==) 

	keep folio id_persona *_score *_SUM knowledge* know*
		
	save "${el_processed}/knowledge_el.dta", replace

** DECISION/GRIT/ROSENBERG **

use "${el_raw}/sec_11.dta", clear
merge 1:1 folio id_persona using "${el_raw}/sec_12.dta", gen(sec12_merge)
	// sec12_merge==1 are sec11 only (4)
	// sec12_merge==2 none 
	// sec12_merge==3 are matched (1,328)
merge 1:1 folio id_persona using "${el_raw}/sec_13.dta", gen(sec13_merge)
	// sec13_merge==1 are sec11/12 only (5)
	// sec13_merge==2 none
	// sec13_merge==3 are matched (1,327)
	
	* Create personid 
	tostring folio, gen(folio_str)
	gen id_persona_0=string(id_persona, "%02.0f")
	gen personid = folio_str + id_persona_0
	destring personid, replace
	
* Decisions 
// only take responses from q11_0`i'a and if "other" qualifies. These ask if mother is involved in decision making, answers such as "ambos", "los dos", etc. 

	local i=1
	foreach x in d1 d2 d3 d4 d5 d6 d7 d8 d9{
	gen `x'=(q11_0`i'a==1)
	replace `x'=. if q11_0`i'a==.
	local lbl: variable label q11_0`i'a
	lab var `x' `"`lbl': madre"' 
	local i=`i'+1
	}

	lab var d1 "La comida que se come en la casa: madre"
	
	local i=10
	foreach x in d10 d11 d12 d13 d14 d15 d16{
	gen `x'=(q11_`i'a==1)
	replace `x'=. if q11_`i'a==.
	local lbl: variable label q11_`i'a
	lab var `x' `"`lbl': madre"' 
	local i=`i'+1
	}
	
	egen dec_total=rowtotal(d1-d16), missing
	gen decisiones=dec_total/16
	lab var decisiones "Indice de Empoderamiento"	
	
	label var d1 "La comida que se come en la casa: madre"
	label var d2 "Su ropa : madre"
	label var d3 "La ropa de su esposo: madre"
	label var d4 "La ropa de sus hijos: madre"
	label var d5 "La educacion de sus hijos: madre"
	label var d6 "Los serv. de salud y medicinas: madre"
	label var d7 "Los gastos grandes de la casa: madre"
	label var d8 "El dinero que se le da a sus padres o a otros parientes: madre"
	label var d9 "El dinero que se le da a sus padres o a otros parientes de su esposo: madre"
	label var d10 "Si usted debe trabajar o no  : madre"
	label var d11 "Si su esposo debe trabajar o no: madre"
	label var d12 "Si la familia debe migrar: madre"
	label var d13 "Si usted o su esposo usan anticonceptivos, para no tener hijos : madre"
	label var d14 "Si debe asistir a los controles prenatales en un centro medico: madre"
	label var d15 "Si debe asistir a hacerse el examen del Papanicolau en un centro medico: madre"
	label var d16 "Donde deben nacer sus hijos  : madre"
	
	*Manually read "otro" responses to see if at least mother is included in decision making process (can be a dual-decision)
	
	*d1
	sort q11_01_ot
	by q11_01_ot: tab folio
	replace d1=1 if folio== 4660121 
	replace d1=1 if folio== 7050131 
	replace d1=1 if folio== 4650141 
	replace d1=1 if folio== 4440471 
	
	*d2
	sort q11_02_ot
	by q11_02_ot: tab folio
	replace d2=1 if folio== 4860091 
	
	*d3 
	sort q11_03_ot 
	by q11_03_ot: tab folio
	
	*d4 
	sort q11_04_ot 
	by q11_04_ot: tab folio
	
	*d5 
	tab q11_05_ot
	sort q11_05_ot 
	by q11_05_ot: tab folio
	replace d5=1 if folio== 4860091
	
	*d6 
	sort q11_06_ot 
	by q11_06_ot: tab folio
	replace d6=1 if folio== 60941
	replace d6=1 if folio== 4500051
	replace d6=1 if folio== 5620051 
	replace d6=1 if folio== 4860091
	
	*d7 
	sort q11_07_ot 
	by q11_07_ot: tab folio
	replace d7=1 if folio== 60941 
	replace d7=1 if folio== 4500051 
	replace d7=1 if folio== 4500221 
	replace d7=1 if folio== 5620051 
	replace d7=1 if folio== 4860091 
	replace d7=1 if folio== 7050131 
	
	*d8
	sort q11_08_ot 
	by q11_08_ot: tab folio
	replace d8=1 if folio== 5620051 
	
	*d9 
	sort q11_09_ot 
	by q11_09_ot: tab folio
	replace d9=1 if folio== 5620051 
	
	*d10 
	sort q11_10_ot 
	by q11_10_ot: tab folio
	replace d10=1 if folio== 5620051 
	
	*d11 
	sort q11_11_ot 
	by q11_11_ot: tab folio
	
	*d12
	sort q11_12_ot 
	by q11_12_ot: tab folio
	replace d12=1 if folio== 60941
	replace d12=1 if folio== 5620051 
	
	*d13 
	sort q11_13_ot 
	by q11_13_ot: tab folio
	replace d13=1 if folio== 5620051
	
	*d14
	sort q11_14_ot 
	by q11_14_ot: tab folio
	replace d14=1 if folio== 5620051 
	
	*d15 
	sort q11_15_ot 
	by q11_15_ot: tab folio
	replace d15=1 if folio== 5620051 
	
	*d16 
	sort q11_16_ot 
	by q11_16_ot: tab folio
	replace d16=1 if folio== 5620051 
	replace d16=1 if folio== 4860091
	
	** GRIT
	
	local i=1
	foreach x in g1 g2 g3 g4 g5 g6 g7 g8 g9{
	gen `x'=q12_0`i'
	copydesc q12_0`i' `x'
	tab `x', gen(`x'_)
	local i=`i' +1 
	}
	
	local i=10
	foreach x in g10 g11 g12 g13{
	gen `x'=q12_`i'
	copydesc q12_`i' `x'
	tab `x', gen(`x'_)
	local i=`i' +1 
	}

	egen grit_total=rowtotal(g1 g2 g3 g4 g5 g6 g7 g8 g9 g10 g11 g12 g13), missing
	gen grit=grit_total/13
	lab var grit "Grit Score"
	
	label var g1 "Me propongo ser la mejor del mundo en las cosas que hago"
	label var g2 "He superado dificultades para conquistar un reto o algo importante"
	label var g3 "Ambiciono salir adelante" 
	label var g4 "Las dificultades no me desalientan"
	label var g5 "He estado obsesionada con ideas o proyectos, pero al poco tiempo pierdo el inter"
	label var g6 "Soy una persona que trabaja duro"
	label var g7 "A menudo me propongo metas, pero luego persigo otras distintas"
	label var g8 "Tengo dificultad para mantener mi atencion en proyectos que duran muchos meses"
	label var g9 "Siempre termino lo que empiezo"
	label var g10 "Lograr algo duradero es la meta mas importante de mi vida"
	label var g11 "He logrado una meta que me llevo anos de esfuerzo conseguir"
	label var g12 "Siempre busco tener exito"
	label var g13 "Soy dedicada y disciplinada"
	
	** ROSENBURG

	local i=1
	foreach x in r1 r2 r3 r4 r5 r6 r7 r8 r9{
	gen `x'=q13_0`i'
	copydesc q13_0`i' `x'
	tab `x', gen(`x'_)
	local i=`i' +1 
	}
	
	gen r10=q13_10
	copydesc q13_10 r10
	tab r10, gen(r10_)

	egen rosenberg=rowtotal(r1 r2 r3 r4 r5 r6 r7 r8 r9 r10), missing
	lab var rosenberg "Rosenberg Score"

	* Quartiles for indexes

	lab define quartile_grit 1 "Grit Q1" 2 "Grit Q2" 3 "Grit Q3" 4 "Grit Q4"
	lab define quartile_rose 1 "Rosenberg Q1" 2 "Rosenberg Q2" 3 "Rosenberg Q3" 4 "Rosenberg Q4"
	lab define quartile_dec 1 "Empoderamiento Q1" 2 "Empoderamiento Q2" 3 "Empoderamiento Q3" 4 "Empoderamiento Q4"

	xtile grit_cat=grit, n(4)
	lab val grit_cat quartile_grit
	tab grit_cat, gen(grit_cat)

	xtile rosenberg_cat=rosenberg, n(4)
	lab val rosenberg_cat quartile_rose
	tab rosenberg_cat, gen(rosenberg_cat)

	xtile decisiones_cat=decisiones, n(4)
	lab val decisiones_cat quartile_dec
	tab decisiones_cat, gen(decisiones_cat)

	* Update var labels to remove everything before "=="
	findname, varlabeltext(*==*) 
	labvarch `r(varlist)', after(==) 
		
	label var r1 "En general estoy satisfecha conmigo mismo"
	label var r2 "En algunas ocasiones pienso que no soy buena para nada "
	label var r3 "Siento que tengo algunas buenas cualidades"
	label var r4 "Soy capaz de hacer las cosas tan bien como la mayoria de la gente"
	label var r5 "Siento que no tengo mucho de que sentirme orgullosa "
	label var r6 "De seguro que algunas veces me siento inutil"
	label var r7 "Siento que soy una persona de valor al igual que otras"
	label var r8 "Me gustaria tener mas respeto conmigo misma"
	label var r9 " Me siento inclinada a pensar que soy una fracasada en todo"
	label var r10 "Tengo una actitud positiva hacia mi persona"
	
	keep folio id_persona personid d1-d16 decisiones* g1-g13_5 grit* r1-r10_4 rosenberg* 

	sort folio id_persona
 
save "${el_processed}/dec-grit-rosenberg_el.dta", replace

** OBSERVATIONS 
use "${el_raw}/sec_15.dta", clear
destring folio, replace 
* Observations

	local i=1
	foreach x in o1 o2 o3 o4 o5{
	gen `x'=(q15_0`i'==1)
	replace `x'=. if q15_0`i'==. | q15_0`i'==3
	_crcslbl `x' q15_0`i'
	local i=`i'+1
	}
	
	local i=9
	foreach x in o9{
	gen `x'=(q15_0`i'==1)
	replace `x'=. if q15_0`i'==. | q15_0`i'==3
	_crcslbl `x' q15_0`i'
	local i=`i'+1
	}

	lab var o1 "Observo aguas servidas/negras dentro del terreno"
	
	local i=6
	foreach x in o6_1 o7_1 o8_1{
	gen `x'=(q15_0`i'a==1)
	replace `x'=. if q15_0`i'a==. | q15_0`i'a==3
	_crcslbl `x' q15_0`i'a
	local i=`i'+1
	}
	
	local i=6
	foreach x in o6_2 o7_2 o8_2{
	gen `x'=(q15_0`i'b==1)
	replace `x'=. if q15_0`i'b==. | q15_0`i'b==3
	_crcslbl `x' q15_0`i'b
	local i=`i'+1
	}

	local i=10
	foreach x in o10 o11 o12{
	gen `x'=(q15_`i'==1)
	replace `x'=. if q15_`i'==. | q15_`i'==3
	_crcslbl `x' q15_`i'
	local i=`i'+1
	}
	
	* Update var labels to remove everything before "=="
	findname, varlabeltext(*==*) 
	labvarch `r(varlist)', after(==) 
	
	keep folio o1-o12
	
	save "${el_processed}/observations_el.dta", replace