library(rio)
library(dplyr)##
## Attaching package: 'dplyr'## The following objects are masked from 'package:stats':
##
## filter, lag## The following objects are masked from 'package:base':
##
## intersect, setdiff, setequal, unionmod2=import("Enaho01-2022-200.sav")
mod3=import("Enaho01A-2022-300.sav")
mod4=import("Enaho01A-2022-400.sav")
mod5=import("Enaho01a-2022-500.sav")
sum=import("Sumaria-2022.sav")PREGUNTA DE INVESTIGACION: ¿Qué factores no económicos influyen en el nivel de pobreza por departamento a nivel nacional en 2022?
names(mod2)## [1] "AÑO" "MES" "CONGLOME" "VIVIENDA" "HOGAR"
## [6] "CODPERSO" "UBIGEO" "DOMINIO" "ESTRATO" "P201P"
## [11] "P203" "P203A" "P203B" "P204" "P205"
## [16] "P206" "P207" "P208A" "P208B" "P209"
## [21] "P210" "P211A" "P211D" "P212" "P213"
## [26] "P214" "P215" "P216" "P217" "T211"
## [31] "OCUPAC_R3" "OCUPAC_R4" "RAMA_R3" "RAMA_R4" "CODTAREA"
## [36] "CODTIEMPO" "TICUEST01" "FACPOB07" "NCONGLOME" "SUB_CONGLOME"names(mod3)## [1] "AÑO" "MES" "CONGLOME" "VIVIENDA" "HOGAR"
## [6] "CODPERSO" "UBIGEO" "DOMINIO" "ESTRATO" "CODINFOR"
## [11] "P300N" "P300I" "P300A" "P301A" "P301B"
## [16] "P301C" "P301D" "P301A0" "P301A1" "P301B0"
## [21] "P301B1" "P301B3" "P302" "P302X" "P302A"
## [26] "P302B" "P303" "P304A" "P304B" "P304C"
## [31] "P304D" "P305" "P306" "P307" "P307A1"
## [36] "P307A2" "P307A3" "P307A4" "P307A4_5" "P307A4_6"
## [41] "P307A4_7" "P307B1" "P307B2" "P307B3" "P307B4"
## [46] "P307B4_5" "P307B4_6" "P307B4_7" "P307C" "P308A"
## [51] "P308B" "P308C" "P308D" "P308B1" "P308B2"
## [56] "P308B3" "P308B4" "P308B5" "P308C1" "P308C2"
## [61] "P310" "P310B1" "P310C0" "P310C1" "P310D1"
## [66] "P310D2" "P310E0" "P310E1" "P310E3" "P311N$1"
## [71] "P311N$2" "P311N$3" "P311N$4" "P311N$5" "P311N$6"
## [76] "P311N$7" "P311N$8" "P311N$9" "P311$1" "P311$2"
## [81] "P311$3" "P311$4" "P311$5" "P311$6" "P311$7"
## [86] "P311$8" "P311$9" "P311A1$1" "P311A1$2" "P311A1$3"
## [91] "P311A1$4" "P311A1$5" "P311A1$6" "P311A1$7" "P311A1$8"
## [96] "P311A1$9" "P311A2$1" "P311A2$2" "P311A2$3" "P311A2$4"
## [101] "P311A2$5" "P311A2$6" "P311A2$7" "P311A2$8" "P311A2$9"
## [106] "P311A3$1" "P311A3$2" "P311A3$3" "P311A3$4" "P311A3$5"
## [111] "P311A3$6" "P311A3$7" "P311A3$8" "P311A3$9" "P311A4$1"
## [116] "P311A4$2" "P311A4$3" "P311A4$4" "P311A4$5" "P311A4$6"
## [121] "P311A4$7" "P311A4$8" "P311A4$9" "P311A5$1" "P311A5$2"
## [126] "P311A5$3" "P311A5$4" "P311A5$5" "P311A5$6" "P311A5$7"
## [131] "P311A5$8" "P311A5$9" "P311A6$1" "P311A6$2" "P311A6$3"
## [136] "P311A6$4" "P311A6$5" "P311A6$6" "P311A6$7" "P311A6$8"
## [141] "P311A6$9" "P311A7$1" "P311A7$2" "P311A7$3" "P311A7$4"
## [146] "P311A7$5" "P311A7$6" "P311A7$7" "P311A7$8" "P311A7$9"
## [151] "P311B$1" "P311B$2" "P311B$3" "P311B$4" "P311B$5"
## [156] "P311B$6" "P311B$7" "P311B$8" "P311B$9" "P311C$1"
## [161] "P311C$2" "P311C$3" "P311C$4" "P311C$5" "P311C$6"
## [166] "P311C$7" "P311C$8" "P311C$9" "P311D$1" "P311D$2"
## [171] "P311D$3" "P311D$4" "P311D$5" "P311D$6" "P311D$7"
## [176] "P311D$8" "P311D$9" "P311D2$1" "P311D2$2" "P311D2$3"
## [181] "P311D2$4" "P311D2$5" "P311D2$6" "P311D2$7" "P311D2$8"
## [186] "P311D2$9" "P311D3$1" "P311D3$2" "P311D3$3" "P311D3$4"
## [191] "P311D3$5" "P311D3$6" "P311D3$7" "P311D3$8" "P311D3$9"
## [196] "P311D4$1" "P311D4$2" "P311D4$3" "P311D4$4" "P311D4$5"
## [201] "P311D4$6" "P311D4$7" "P311D4$8" "P311D4$9" "P311D5$1"
## [206] "P311D5$2" "P311D5$3" "P311D5$4" "P311D5$5" "P311D5$6"
## [211] "P311D5$7" "P311D5$8" "P311D5$9" "P311D6$1" "P311D6$2"
## [216] "P311D6$3" "P311D6$4" "P311D6$5" "P311D6$6" "P311D6$7"
## [221] "P311D6$8" "P311D6$9" "P311D7$1" "P311D7$2" "P311D7$3"
## [226] "P311D7$4" "P311D7$5" "P311D7$6" "P311D7$7" "P311D7$8"
## [231] "P311D7$9" "P311E$1" "P311E$2" "P311E$3" "P311E$4"
## [236] "P311E$5" "P311E$6" "P311E$7" "P311E$8" "P311E$9"
## [241] "P311T1" "P311T22" "P311T23" "P311T24" "P311T25"
## [246] "P311T26" "P311T27" "P311T2" "P3121" "P3121A1"
## [251] "P3121A2" "P3121A3" "P3121A4" "P3121A5" "P3121A6"
## [256] "P3121B" "P3121C" "P3121C2" "P3121C3" "P3121C4"
## [261] "P3121C5" "P3121C6" "P3121D" "P3122" "P3122A1"
## [266] "P3122A2" "P3122A3" "P3122A4" "P3122A5" "P3122A6"
## [271] "P3122B" "P3122C" "P3122C2" "P3122C3" "P3122C4"
## [276] "P3122C5" "P3122C6" "P3122D" "P312T1" "P312T22"
## [281] "P312T23" "P312T24" "P312T25" "P312T26" "P312T2"
## [286] "P313" "P314A" "P314B$1" "P314B$2" "P314B$3"
## [291] "P314B$4" "P314B$5" "P314B$6" "P314B$7" "P314B1_1"
## [296] "P314B1_2" "P314B1_6" "P314B1_7" "P314B1_8" "P314B1_9"
## [301] "P314D" "P3151" "P3152" "P3153" "P3154"
## [306] "P3155" "P3156" "P315A" "P315B" "P315B2"
## [311] "P315B3" "P315B4" "P315B5" "P315B6" "P316$1"
## [316] "P316$2" "P316$3" "P316$4" "P316$5" "P316$6"
## [321] "P316$7" "P316$8" "P316$9" "P316$10" "P316$11"
## [326] "P316$12" "P316A1" "P316A2" "P316A3" "P316A4"
## [331] "P316A5" "P316A6" "P316B" "P316C1" "P316C2"
## [336] "P316C3" "P316C4" "P316C5" "P316C6" "P316C7"
## [341] "P316C8" "P316C9" "P316C10" "T313A" "P203"
## [346] "P204" "P205" "P206" "P207" "P208A"
## [351] "P209" "IMPUTADO" "TICUEST01A" "D311B$1" "D311D2$1"
## [356] "D311D3$1" "D311D4$1" "D311D5$1" "D311D6$1" "D311D7$1"
## [361] "D311D$1" "D311B$2" "D311D2$2" "D311D3$2" "D311D4$2"
## [366] "D311D5$2" "D311D6$2" "D311D7$2" "D311D$2" "D311B$3"
## [371] "D311D2$3" "D311D3$3" "D311D4$3" "D311D5$3" "D311D6$3"
## [376] "D311D7$3" "D311D$3" "D311B$4" "D311D2$4" "D311D3$4"
## [381] "D311D4$4" "D311D5$4" "D311D6$4" "D311D7$4" "D311D$4"
## [386] "D311B$5" "D311D2$5" "D311D3$5" "D311D4$5" "D311D5$5"
## [391] "D311D6$5" "D311D7$5" "D311D$5" "D311B$6" "D311D2$6"
## [396] "D311D3$6" "D311D4$6" "D311D5$6" "D311D6$6" "D311D7$6"
## [401] "D311D$6" "D311B$7" "D311D2$7" "D311D3$7" "D311D4$7"
## [406] "D311D5$7" "D311D6$7" "D311D7$7" "D311D$7" "D3121B"
## [411] "D3121C2" "D3121C3" "D3121C4" "D3121C5" "D3121C6"
## [416] "D3121C" "D3122B" "D3122C2" "D3122C3" "D3122C4"
## [421] "D3122C5" "D3122C6" "D3122C" "D315A" "D315B2"
## [426] "D315B3" "D315B4" "D315B5" "D315B6" "D315B"
## [431] "I311B$1" "I311B$2" "I311B$4" "I311B$6" "I311B$3"
## [436] "I311B$5" "I311B$7" "I311D2$1" "I311D3$1" "I311D4$1"
## [441] "I311D5$1" "I311D6$1" "I311D7$1" "I311D2$2" "I311D3$2"
## [446] "I311D4$2" "I311D5$2" "I311D6$2" "I311D7$2" "I311D2$4"
## [451] "I311D3$4" "I311D4$4" "I311D5$4" "I311D6$4" "I311D7$4"
## [456] "I311D2$6" "I311D3$6" "I311D4$6" "I311D5$6" "I311D6$6"
## [461] "I311D7$6" "I311D2$3" "I311D3$3" "I311D4$3" "I311D5$3"
## [466] "I311D6$3" "I311D7$3" "I311D2$5" "I311D3$5" "I311D4$5"
## [471] "I311D5$5" "I311D6$5" "I311D7$5" "I311D2$7" "I311D3$7"
## [476] "I311D4$7" "I311D5$7" "I311D6$7" "I311D7$7" "I3121B"
## [481] "I3122B" "I3121C2" "I3121C3" "I3121C4" "I3121C5"
## [486] "I3121C6" "I3122C2" "I3122C3" "I3122C4" "I3122C5"
## [491] "I3122C6" "I315A" "I315B2" "I315B3" "I315B4"
## [496] "I315B5" "I315B6" "I311D$1" "I311D$2" "I311D$3"
## [501] "I311D$4" "I311D$5" "I311D$6" "I311D$7" "I3121C"
## [506] "I3122C" "I315B" "FACTOR07" "FACTORA07" "NCONGLOME"
## [511] "SUB_CONGLOME"names(mod4)## [1] "AÑO" "MES" "CONGLOME" "VIVIENDA" "HOGAR"
## [6] "CODPERSO" "UBIGEO" "DOMINIO" "ESTRATO" "CODINFOR"
## [11] "P400N" "P400I" "P400A1" "P400A2" "P400A3"
## [16] "P401C" "P401D1" "P401D2" "P401D3" "P401D4"
## [21] "P401D5" "P401D6" "P401D7" "P401D8" "P401D9"
## [26] "P401E1" "P401E2" "P401E3" "P401E4" "P401E5"
## [31] "P401E6" "P401E7" "P401F" "P401G" "P401G1"
## [36] "P401G2" "P401H1" "P401H2" "P401H3" "P401H4"
## [41] "P401H5" "P401H6" "P401" "P4021" "P4022"
## [46] "P4023" "P4024" "P4025" "P4026" "P4031"
## [51] "P4032" "P4033" "P4034" "P4035" "P4036"
## [56] "P4037" "P4038" "P4039" "P40310" "P40311"
## [61] "P40313" "P40314" "P4041" "P4042" "P4043"
## [66] "P4044" "P4045" "P4046" "P4047" "P407F1"
## [71] "P407F2" "P407F3" "P407F4" "P407G1" "P407G2"
## [76] "P407G3" "P407H" "P407H1" "P407H2" "P407I"
## [81] "P407J" "P407K" "P407L1" "P407L2" "P407L3"
## [86] "P407L4" "P407L5" "P407L6" "P407L7" "P407L8"
## [91] "P407L9" "P407L10" "P407L11$01" "P407L11$02" "P407L11$03"
## [96] "P407L11$04" "P407L11$05" "P407L11$06" "P407L11$07" "P407L11$08"
## [101] "P407L11$09" "P407L11$10" "P407L11$11" "P407L11$12" "P407L11$13"
## [106] "P407L11$14" "P407L11$15" "P407L11$16" "P407L11$17" "P407L11$18"
## [111] "P407L11$19" "P407L11$20" "P4091" "P4092" "P4093"
## [116] "P4094" "P4095" "P4096" "P4097" "P4098"
## [121] "P4099" "P40910" "P40911" "P413B1" "P413B1A"
## [126] "P413B2" "P413B2A" "P413F" "P413F1" "P413G1"
## [131] "P413G2" "P413G3" "P413G4" "P413D1" "P413D1A"
## [136] "P413D2" "P413D2A" "P414N$01" "P414N$02" "P414N$03"
## [141] "P414N$04" "P414N$05" "P414N$06" "P414N$07" "P414N$08"
## [146] "P414N$09" "P414N$10" "P414N$11" "P414N$12" "P414N$13"
## [151] "P414N$14" "P414N$15" "P414N$16" "P414N$17" "P414$01"
## [156] "P414$02" "P414$03" "P414$04" "P414$05" "P414$06"
## [161] "P414$07" "P414$08" "P414$09" "P414$10" "P414$11"
## [166] "P414$12" "P414$13" "P414$14" "P414$15" "P414$16"
## [171] "P414$17" "P4151$01" "P4151$02" "P4151$03" "P4151$04"
## [176] "P4151$05" "P4151$06" "P4151$07" "P4151$08" "P4151$09"
## [181] "P4151$10" "P4151$11" "P4151$12" "P4151$13" "P4151$14"
## [186] "P4151$15" "P4151$16" "P4151$17" "P4152$01" "P4152$02"
## [191] "P4152$03" "P4152$04" "P4152$05" "P4152$06" "P4152$07"
## [196] "P4152$08" "P4152$09" "P4152$10" "P4152$11" "P4152$12"
## [201] "P4152$13" "P4152$14" "P4152$15" "P4152$16" "P4152$17"
## [206] "P4153$01" "P4153$02" "P4153$03" "P4153$04" "P4153$05"
## [211] "P4153$06" "P4153$07" "P4153$08" "P4153$09" "P4153$10"
## [216] "P4153$11" "P4153$12" "P4153$13" "P4153$14" "P4153$15"
## [221] "P4153$16" "P4153$17" "P4154$01" "P4154$02" "P4154$03"
## [226] "P4154$04" "P4154$05" "P4154$06" "P4154$07" "P4154$08"
## [231] "P4154$09" "P4154$10" "P4154$11" "P4154$12" "P4154$13"
## [236] "P4154$14" "P4154$15" "P4154$16" "P4154$17" "P4155$01"
## [241] "P4155$02" "P4155$03" "P4155$04" "P4155$05" "P4155$06"
## [246] "P4155$07" "P4155$08" "P4155$09" "P4155$10" "P4155$11"
## [251] "P4155$12" "P4155$13" "P4155$14" "P4155$15" "P4155$16"
## [256] "P4155$17" "P4156$01" "P4156$02" "P4156$03" "P4156$04"
## [261] "P4156$05" "P4156$06" "P4156$07" "P4156$08" "P4156$09"
## [266] "P4156$10" "P4156$11" "P4156$12" "P4156$13" "P4156$14"
## [271] "P4156$15" "P4156$16" "P4156$17" "P4157$01" "P4157$02"
## [276] "P4157$03" "P4157$04" "P4157$05" "P4157$06" "P4157$07"
## [281] "P4157$08" "P4157$09" "P4157$10" "P4157$11" "P4157$12"
## [286] "P4157$13" "P4157$14" "P4157$15" "P4157$16" "P4157$17"
## [291] "P4158$01" "P4158$02" "P4158$03" "P4158$04" "P4158$05"
## [296] "P4158$06" "P4158$07" "P4158$08" "P4158$09" "P4158$10"
## [301] "P4158$11" "P4158$12" "P4158$13" "P4158$14" "P4158$15"
## [306] "P4158$16" "P4158$17" "P4159$01" "P4159$02" "P4159$03"
## [311] "P4159$04" "P4159$05" "P4159$06" "P4159$07" "P4159$08"
## [316] "P4159$09" "P4159$10" "P4159$11" "P4159$12" "P4159$13"
## [321] "P4159$14" "P4159$15" "P4159$16" "P4159$17" "P4151001"
## [326] "P4151002" "P4151003" "P4151004" "P4151005" "P4151006"
## [331] "P4151007" "P4151008" "P4151009" "P4151010" "P4151011"
## [336] "P4151012" "P4151013" "P4151014" "P4151015" "P4151016"
## [341] "P4151017" "P41510$01" "P41510$02" "P41510$03" "P41510$04"
## [346] "P41510$05" "P41510$06" "P41510$07" "P41510$08" "P41510$09"
## [351] "P41510$10" "P41510$11" "P41510$12" "P41510$13" "P41510$14"
## [356] "P41510$15" "P41510$16" "P41510$17" "P41511$01" "P41511$02"
## [361] "P41511$03" "P41511$04" "P41511$05" "P41511$06" "P41511$07"
## [366] "P41511$08" "P41511$09" "P41511$10" "P41511$11" "P41511$12"
## [371] "P41511$13" "P41511$14" "P41511$15" "P41511$16" "P41511$17"
## [376] "P41601" "P41602" "P41603" "P41604" "P41605"
## [381] "P41606" "P41607" "P41608" "P41609" "P41610"
## [386] "P41611" "P41612" "P41613" "P41614" "P41615"
## [391] "P41616" "P41617" "P417$01" "P417$02" "P417$03"
## [396] "P417$04" "P417$05" "P417$06" "P417$07" "P417$08"
## [401] "P417$09" "P417$10" "P417$11" "P417$12" "P417$13"
## [406] "P417$14" "P417$15" "P417$16" "P417$17" "P418201"
## [411] "P418202" "P418203" "P418204" "P418205" "P418206"
## [416] "P418207" "P418208" "P418209" "P418210" "P418211"
## [421] "P418212" "P418213" "P418214" "P418215" "P418216"
## [426] "P418217" "P418301" "P418302" "P418303" "P418304"
## [431] "P418305" "P418306" "P418307" "P418308" "P418309"
## [436] "P418310" "P418311" "P418312" "P418313" "P418314"
## [441] "P418315" "P418316" "P418317" "P418401" "P418402"
## [446] "P418403" "P418404" "P418405" "P418406" "P418407"
## [451] "P418408" "P418409" "P418410" "P418411" "P418412"
## [456] "P418413" "P418414" "P418415" "P418416" "P418417"
## [461] "P418501" "P418502" "P418503" "P418504" "P418505"
## [466] "P418506" "P418507" "P418508" "P418509" "P418510"
## [471] "P418511" "P418512" "P418513" "P418514" "P418515"
## [476] "P418516" "P418517" "P418601" "P418602" "P418603"
## [481] "P418604" "P418605" "P418606" "P418607" "P418608"
## [486] "P418609" "P418610" "P418611" "P418612" "P418613"
## [491] "P418614" "P418615" "P418616" "P418617" "P418701"
## [496] "P418702" "P418703" "P418704" "P418705" "P418706"
## [501] "P418707" "P418708" "P418709" "P418710" "P418711"
## [506] "P418712" "P418713" "P418714" "P418715" "P418716"
## [511] "P418717" "P418801" "P418802" "P418803" "P418804"
## [516] "P418805" "P418806" "P418807" "P418808" "P418809"
## [521] "P418810" "P418811" "P418812" "P418813" "P418814"
## [526] "P418815" "P418816" "P418817" "P4181001" "P4181002"
## [531] "P4181003" "P4181004" "P4181005" "P4181006" "P4181007"
## [536] "P4181008" "P4181009" "P4181010" "P4181011" "P4181012"
## [541] "P4181013" "P4181014" "P4181015" "P4181016" "P4181017"
## [546] "P4181101" "P4181102" "P4181103" "P4181104" "P4181105"
## [551] "P4181106" "P4181107" "P4181108" "P4181109" "P4181110"
## [556] "P4181111" "P4181112" "P4181113" "P4181114" "P4181115"
## [561] "P4181116" "P4181117" "P41801" "P41802" "P41803"
## [566] "P41804" "P41805" "P41806" "P41807" "P41808"
## [571] "P41809" "P41810" "P41811" "P41812" "P41813"
## [576] "P41814" "P41815" "P41816" "P41817" "P4191"
## [581] "P4192" "P4193" "P4194" "P4195" "P4196"
## [586] "P4197" "P4198" "P419A1" "P419A2" "P419A3"
## [591] "P419A4" "P419A5" "P419A6" "P419A7" "P419A8"
## [596] "P420A" "P420B" "P203" "P204" "P205"
## [601] "P206" "P207" "P208A" "P208B" "P209"
## [606] "P301A" "IMPUTADO" "TICUEST01A" "D41601" "D41602"
## [611] "D41603" "D41604" "D41605" "D41606" "D41607"
## [616] "D41608" "D41609" "D41610" "D41611" "D41612"
## [621] "D41617" "D41613" "D41614" "D41615" "D41616"
## [626] "D418201" "D418301" "D418401" "D418501" "D418601"
## [631] "D418701" "D418801" "D4181001" "D4181101" "D418202"
## [636] "D418302" "D418402" "D418502" "D418602" "D418702"
## [641] "D418802" "D4181002" "D4181102" "D418203" "D418303"
## [646] "D418403" "D418503" "D418603" "D418703" "D418803"
## [651] "D4181003" "D4181103" "D418204" "D418304" "D418404"
## [656] "D418504" "D418604" "D418704" "D418804" "D4181004"
## [661] "D4181104" "D418205" "D418305" "D418405" "D418505"
## [666] "D418605" "D418705" "D418805" "D4181005" "D4181105"
## [671] "D41801" "D41802" "D41803" "D41804" "D41805"
## [676] "D418206" "D418306" "D418406" "D418506" "D418606"
## [681] "D418706" "D418806" "D4181006" "D4181106" "D418207"
## [686] "D418307" "D418407" "D418507" "D418607" "D418707"
## [691] "D418807" "D4181007" "D4181107" "D418208" "D418308"
## [696] "D418408" "D418508" "D418608" "D418708" "D418808"
## [701] "D4181008" "D4181108" "D418209" "D418309" "D418409"
## [706] "D418509" "D418609" "D418709" "D418809" "D4181009"
## [711] "D4181109" "D418210" "D418310" "D418410" "D418510"
## [716] "D418610" "D418710" "D418810" "D4181010" "D4181110"
## [721] "D418211" "D418311" "D418411" "D418511" "D418611"
## [726] "D418711" "D418811" "D4181011" "D4181111" "D418212"
## [731] "D418312" "D418412" "D418512" "D418612" "D418712"
## [736] "D418812" "D4181012" "D4181112" "D418217" "D418317"
## [741] "D418417" "D418517" "D418617" "D418717" "D418817"
## [746] "D4181017" "D4181117" "D41806" "D41807" "D41808"
## [751] "D41809" "D41810" "D41811" "D41812" "D41817"
## [756] "D418213" "D418313" "D418413" "D418513" "D418613"
## [761] "D418713" "D418813" "D4181013" "D4181113" "D418214"
## [766] "D418314" "D418414" "D418514" "D418614" "D418714"
## [771] "D418814" "D4181014" "D4181114" "D418215" "D418315"
## [776] "D418415" "D418515" "D418615" "D418715" "D418815"
## [781] "D4181015" "D4181115" "D418216" "D418316" "D418416"
## [786] "D418516" "D418616" "D418716" "D418816" "D4181016"
## [791] "D4181116" "D41813" "D41814" "D41815" "D41816"
## [796] "BLIBRE22" "T41581$2" "T41582$2" "I41601" "I41603"
## [801] "I41604" "I41605" "I41602" "I41606" "I41607"
## [806] "I41608" "I41609" "I41610" "I41611" "I41612"
## [811] "I41613" "I41614" "I41615" "I41616" "I418201"
## [816] "I418203" "I418204" "I418205" "I418301" "I418303"
## [821] "I418304" "I418305" "I418401" "I418403" "I418404"
## [826] "I418405" "I418501" "I418503" "I418504" "I418505"
## [831] "I418601" "I418603" "I418604" "I418605" "I418701"
## [836] "I418703" "I418704" "I418705" "I418801" "I418803"
## [841] "I418804" "I418805" "I4181001" "I4181003" "I4181004"
## [846] "I4181005" "I4181101" "I4181103" "I4181104" "I4181105"
## [851] "I418202" "I418302" "I418402" "I418502" "I418602"
## [856] "I418702" "I418802" "I4181002" "I4181102" "I418206"
## [861] "I418207" "I418208" "I418209" "I418210" "I418211"
## [866] "I418212" "I418306" "I418307" "I418308" "I418309"
## [871] "I418310" "I418311" "I418312" "I418406" "I418407"
## [876] "I418408" "I418409" "I418410" "I418411" "I418412"
## [881] "I418506" "I418507" "I418508" "I418509" "I418510"
## [886] "I418511" "I418512" "I418606" "I418607" "I418608"
## [891] "I418609" "I418610" "I418611" "I418612" "I418706"
## [896] "I418707" "I418708" "I418709" "I418710" "I418711"
## [901] "I418712" "I418806" "I418807" "I418808" "I418809"
## [906] "I418810" "I418811" "I418812" "I4181006" "I4181007"
## [911] "I4181008" "I4181009" "I4181010" "I4181011" "I4181012"
## [916] "I4181106" "I4181107" "I4181108" "I4181109" "I4181110"
## [921] "I4181111" "I4181112" "I418213" "I418313" "I418413"
## [926] "I418513" "I418613" "I418713" "I418813" "I4181013"
## [931] "I4181113" "I418214" "I418314" "I418414" "I418514"
## [936] "I418614" "I418714" "I418814" "I4181014" "I4181114"
## [941] "I418215" "I418216" "I418315" "I418316" "I418415"
## [946] "I418416" "I418515" "I418516" "I418615" "I418616"
## [951] "I418715" "I418716" "I418815" "I418816" "I4181015"
## [956] "I4181016" "I4181115" "I4181116" "I41801" "I41802"
## [961] "I41803" "I41804" "I41805" "I41806" "I41807"
## [966] "I41808" "I41809" "I41810" "I41811" "I41812"
## [971] "I41813" "I41814" "I41815" "I41816" "FACTOR07"
## [976] "NCONGLOME" "SUB_CONGLOME"names(mod5)## [1] "AÑO" "MES" "CONGLOME" "VIVIENDA"
## [5] "HOGAR" "CODPERSO" "UBIGEO" "DOMINIO"
## [9] "ESTRATO" "CODINFOR" "P500A" "P500B"
## [13] "P500B1" "P500C" "P500D" "P500D1"
## [17] "P500N" "P500I" "P501" "P502"
## [21] "P503" "P504" "P5041" "P5042"
## [25] "P5043" "P5044" "P5045" "P5046"
## [29] "P5047" "P5048" "P5049" "P50410"
## [33] "P50411" "P504A" "P504B" "P505"
## [37] "P505R4" "P505B" "P506" "P506R4"
## [41] "P507" "P508" "P509" "P510"
## [45] "P510A1" "P510B" "P5111" "P5112"
## [49] "P5113" "P5114" "P5115" "P5116"
## [53] "P5117" "P5118" "P5119" "P51110"
## [57] "P51111" "P51112" "P511A" "P512A"
## [61] "P512B" "P513" "P513A" "P513B"
## [65] "P513C" "P513D" "P513E" "P513F"
## [69] "P513G" "P513T" "P513A1" "P513A2"
## [73] "P514" "P5151" "P5152" "P5153"
## [77] "P5154" "P5155" "P5156" "P5157"
## [81] "P5158" "P5159" "P51510" "P51511"
## [85] "P516" "P516R4" "P517" "P517A"
## [89] "P517B1" "P517C" "P517D1" "P517D2"
## [93] "P518" "P519" "P520" "P520A"
## [97] "P521" "P521A" "P521B" "P521B1"
## [101] "P521C" "P521D" "P522A" "P522B"
## [105] "P522C" "P523" "P524A1" "P524A2"
## [109] "P524B1" "P524B2" "P524C1" "P524C2"
## [113] "P524D1" "P524D2" "P524E1" "P524E2"
## [117] "P528" "P5291A" "P5291B" "P5291C"
## [121] "P5292A" "P5292B" "P5292C" "P5293A"
## [125] "P5293B" "P5293C" "P5294A" "P5294B"
## [129] "P5294C" "P5295A" "P5295B" "P5295C"
## [133] "P5296A" "P5296B" "P5296C" "P529T"
## [137] "P529H" "P529I" "P529J" "P5297A"
## [141] "P530A" "P530B" "P535" "P536"
## [145] "P5371" "P5372" "P5373" "P5374"
## [149] "P5375" "P5376" "P5377" "P5378"
## [153] "P5379" "P53710" "P53711" "P53712"
## [157] "P538A1" "P538A2" "P538B1" "P538B2"
## [161] "P538C1" "P538C2" "P538D1" "P538D2"
## [165] "P538E1" "P538E2" "P539" "P5401A"
## [169] "P5401B" "P5401C" "P5402A" "P5402B"
## [173] "P5402C" "P5403A" "P5403B" "P5403C"
## [177] "P5404A" "P5404B" "P5404C" "P5405A"
## [181] "P5405B" "P5405C" "P5406A" "P5406B"
## [185] "P5406C" "P540T" "P5407A" "P541A"
## [189] "P541B" "P542" "P543" "P5441A"
## [193] "P5441B" "P5442A" "P5442B" "P5443A"
## [197] "P5443B" "P5444A" "P5444B" "P5445A"
## [201] "P5445B" "P5446A" "P5446B" "P5447A"
## [205] "P5447B" "P5448A" "P5448B" "P544T"
## [209] "P545" "P546" "P547" "P548"
## [213] "P549" "P550_1" "P550_2" "P550_3"
## [217] "P550_4" "P550_5" "P550_6" "P550_7"
## [221] "P550_GI" "P551" "P552" "P554"
## [225] "P554R4" "P555" "P5561A" "P5561B"
## [229] "P5561C" "P5561D" "P5561E" "P5562A"
## [233] "P5562B" "P5562C" "P5562D" "P5562E"
## [237] "P5563A" "P5563B" "P5563C" "P5563C1"
## [241] "P5563D" "P5563E" "P5563F" "P5563G"
## [245] "P5564A" "P5564B" "P5564C" "P5564D"
## [249] "P5564E" "P5565A" "P5565B" "P5565C"
## [253] "P5565D" "P5565E" "P5566A" "P5566B"
## [257] "P5566C" "P5566D" "P5566E" "P5567A"
## [261] "P5567B" "P5567C" "P5567D" "P5567E"
## [265] "P5568A" "P5568B" "P5568C" "P5568D"
## [269] "P5568E" "P5569A" "P5569B" "P5569C"
## [273] "P5569D" "P5569E" "P55610A" "P55610B"
## [277] "P55610C" "P55610D" "P55610E" "P55611A"
## [281] "P55611B" "P55611C" "P55611D" "P55611E"
## [285] "P55612A" "P55612B" "P55612C" "P55612D"
## [289] "P55612E" "P55613A" "P55613B" "P55613C"
## [293] "P55613D" "P55613E" "P55614A" "P55614B"
## [297] "P55614C" "P55614D" "P55614E" "P55616A"
## [301] "P55616B" "P55616C" "P55616D" "P55616E"
## [305] "P55617A" "P55617B" "P55617C" "P55617D"
## [309] "P55617E" "P55618A" "P55618B" "P55618C"
## [313] "P55618D" "P55618E" "P55619A" "P55619B"
## [317] "P55619C" "P55619D" "P55619E" "P55620A"
## [321] "P55620B" "P55620C" "P55620D" "P55620E"
## [325] "P55621A" "P55621B" "P55621C" "P55621D"
## [329] "P55621E" "P55622A" "P55622B" "P55622C"
## [333] "P55622D" "P55622E" "P55623A" "P55623B"
## [337] "P55623C" "P55623D" "P55623E" "P55624A"
## [341] "P55624B" "P55624C" "P55624D" "P55624E"
## [345] "P55625A" "P55625B" "P55625C" "P55625D"
## [349] "P55625E" "P55626A" "P55626B" "P55626C"
## [353] "P55626D" "P55626E" "P556T1" "P556T2"
## [357] "P55624A_E" "P55624B_E" "P55624C_E" "P55624D_E"
## [361] "D55624C_E" "P55626A_E" "P55626B_E" "P55626C_E"
## [365] "P55626D_E" "D55626C_E" "P556T1_E" "D556T1_E"
## [369] "P5571A" "P5571B" "P5571C" "P5572A"
## [373] "P5572B" "P5572C" "P5573A" "P5573B"
## [377] "P5573C" "P5574A" "P5574B" "P5574C"
## [381] "P5575A" "P5575B" "P5575C" "P5576A"
## [385] "P5576B" "P5576C" "P5577A" "P5577B"
## [389] "P5577C" "P5578A" "P5578B" "P5578C"
## [393] "P557T" "P5581A" "P5581B" "P5582A"
## [397] "P5582B" "P5583A" "P5583B" "P5584A"
## [401] "P5584B" "P5585A" "P5585B" "P5586A"
## [405] "P5586B" "P5587A" "P5587B" "P5588A"
## [409] "P5588B" "P5589A" "P5589B" "P558T"
## [413] "P558T1" "P558A1" "P558A2" "P558A3"
## [417] "P558A4" "P558A5" "P558B1" "P558B2"
## [421] "P558B3" "P558C" "P558D2_1" "P558D2_2"
## [425] "P558E1_1" "P558E1_2" "P558E1_3" "P558E1_6"
## [429] "P558E1_7" "P558E2_1" "P558E3_1" "P558E2_2"
## [433] "P558E3_2" "P558F1A" "P558F1B" "P558G1"
## [437] "P558G2" "P558G3" "P558G4" "P558G5"
## [441] "P558H1_1" "P558H1_2" "P558H1_3" "P558H1_4"
## [445] "P558H1_5" "P558H1_6" "P558H2_1" "P558H2_2"
## [449] "P558H2_3" "P558H2_4" "P558H2_5" "P558H2_6"
## [453] "P558H3_1" "P558H3_2" "P558H3_3" "P558H3_4"
## [457] "P558H3_5" "P558H3_6" "P558H4_1" "P558H4_2"
## [461] "P558H4_3" "P558H4_4" "P558H4_5" "P558H4_6"
## [465] "P558H5_1" "P558H5_2" "P558H5_3" "P558H5_4"
## [469] "P558H5_5" "P558H5_6" "P558H6_1" "P558H6_2"
## [473] "P558H6_3" "P558H6_4" "P558H6_5" "P558H6_6"
## [477] "P558H7_1" "P558H7_2" "P558H7_3" "P558H7_4"
## [481] "P558H7_5" "P558H7_6" "P558H8_1" "P558H8_2"
## [485] "P558H8_3" "P558H8_4" "P558H8_5" "P558H8_6"
## [489] "P558H9_1" "P558H9_2" "P558H9_3" "P558H9_4"
## [493] "P558H9_5" "P558H9_6" "P558H10_1" "P558H10_2"
## [497] "P558H10_3" "P558H10_4" "P558H10_5" "P558H10_6"
## [501] "P558H11_1" "P558H11_2" "P558H11_3" "P558H11_4"
## [505] "P558H11_5" "P558H11_6" "P558H12_1" "P558H12_2"
## [509] "P558H12_3" "P558H12_4" "P558H12_5" "P558H12_6"
## [513] "P559$01" "P559$02" "P559$03" "P559$04"
## [517] "P559$05" "P559$06" "P559$07" "P559$08"
## [521] "P559$09" "P559$10" "P559$11" "P559$12"
## [525] "P559$13" "P559$14" "P559$15" "P559$16"
## [529] "P559$17" "P559$18" "P559$19" "P559$20"
## [533] "P559$21" "P559$22" "P559$23" "P559$24"
## [537] "P559$25" "P559$26" "P559$27" "P559$28"
## [541] "P559$29" "P559$30" "P559$31" "P559$32"
## [545] "P559$33" "P559$34" "P559$35" "P559$36"
## [549] "P559$37" "P559$38" "P559$39" "P559$40"
## [553] "P559$41" "P559$42" "P559$43" "P559$44"
## [557] "P559$45" "P559$46" "P559$47" "P559$48"
## [561] "P559$49" "P559$50" "P559T$01" "P559T$02"
## [565] "P559T$03" "P559T$04" "P559T$05" "P559T$06"
## [569] "P559T$07" "P559T$08" "P559T$09" "P559T$10"
## [573] "P559T$11" "P559T$12" "P559T$13" "P559T$14"
## [577] "P559T$15" "P559T$16" "P559T$17" "P559T$18"
## [581] "P559T$19" "P559T$20" "P559T$21" "P559T$22"
## [585] "P559T$23" "P559T$24" "P559T$25" "P559T$26"
## [589] "P559T$27" "P559T$28" "P559T$29" "P559T$30"
## [593] "P559T$31" "P559T$32" "P559T$33" "P559T$34"
## [597] "P559T$35" "P559T$36" "P559T$37" "P559T$38"
## [601] "P559T$39" "P559T$40" "P559T$41" "P559T$42"
## [605] "P559T$43" "P559T$44" "P559T$45" "P559T$46"
## [609] "P559T$47" "P559T$48" "P559T$49" "P559T$50"
## [613] "P559A$01" "P559A$02" "P559A$03" "P559A$04"
## [617] "P559A$05" "P559A$06" "P559A$07" "P559A$08"
## [621] "P559A$09" "P559A$10" "P559A$11" "P559A$12"
## [625] "P559A$13" "P559A$14" "P559A$15" "P559A$16"
## [629] "P559A$17" "P559A$18" "P559A$19" "P559A$20"
## [633] "P559A$21" "P559A$22" "P559A$23" "P559A$24"
## [637] "P559A$25" "P559A$26" "P559A$27" "P559A$28"
## [641] "P559A$29" "P559A$30" "P559A$31" "P559A$32"
## [645] "P559A$33" "P559A$34" "P559A$35" "P559A$36"
## [649] "P559A$37" "P559A$38" "P559A$39" "P559A$40"
## [653] "P559A$41" "P559A$42" "P559A$43" "P559A$44"
## [657] "P559A$45" "P559A$46" "P559A$47" "P559A$48"
## [661] "P559A$49" "P559A$50" "P559B$01" "P559B$02"
## [665] "P559B$03" "P559B$04" "P559B$05" "P559B$06"
## [669] "P559B$07" "P559B$08" "P559B$09" "P559B$10"
## [673] "P559B$11" "P559B$12" "P559B$13" "P559B$14"
## [677] "P559B$15" "P559B$16" "P559B$17" "P559B$18"
## [681] "P559B$19" "P559B$20" "P559B$21" "P559B$22"
## [685] "P559B$23" "P559B$24" "P559B$25" "P559B$26"
## [689] "P559B$27" "P559B$28" "P559B$29" "P559B$30"
## [693] "P559B$31" "P559B$32" "P559B$33" "P559B$34"
## [697] "P559B$35" "P559B$36" "P559B$37" "P559B$38"
## [701] "P559B$39" "P559B$40" "P559B$41" "P559B$42"
## [705] "P559B$43" "P559B$44" "P559B$45" "P559B$46"
## [709] "P559B$47" "P559B$48" "P559B$49" "P559B$50"
## [713] "P559C$01" "P559C$02" "P559C$03" "P559C$04"
## [717] "P559C$05" "P559C$06" "P559C$07" "P559C$08"
## [721] "P559C$09" "P559C$10" "P559C$11" "P559C$12"
## [725] "P559C$13" "P559C$14" "P559C$15" "P559C$16"
## [729] "P559C$17" "P559C$18" "P559C$19" "P559C$20"
## [733] "P559C$21" "P559C$22" "P559C$23" "P559C$24"
## [737] "P559C$25" "P559C$26" "P559C$27" "P559C$28"
## [741] "P559C$29" "P559C$30" "P559C$31" "P559C$32"
## [745] "P559C$33" "P559C$34" "P559C$35" "P559C$36"
## [749] "P559C$37" "P559C$38" "P559C$39" "P559C$40"
## [753] "P559C$41" "P559C$42" "P559C$43" "P559C$44"
## [757] "P559C$45" "P559C$46" "P559C$47" "P559C$48"
## [761] "P559C$49" "P559C$50" "P559D$01" "P559D$02"
## [765] "P559D$03" "P559D$04" "P559D$05" "P559D$06"
## [769] "P559D$07" "P559D$08" "P559D$09" "P559D$10"
## [773] "P559D$11" "P559D$12" "P559D$13" "P559D$14"
## [777] "P559D$15" "P559D$16" "P559D$17" "P559D$18"
## [781] "P559D$19" "P559D$20" "P559D$21" "P559D$22"
## [785] "P559D$23" "P559D$24" "P559D$25" "P559D$26"
## [789] "P559D$27" "P559D$28" "P559D$29" "P559D$30"
## [793] "P559D$31" "P559D$32" "P559D$33" "P559D$34"
## [797] "P559D$35" "P559D$36" "P559D$37" "P559D$38"
## [801] "P559D$39" "P559D$40" "P559D$41" "P559D$42"
## [805] "P559D$43" "P559D$44" "P559D$45" "P559D$46"
## [809] "P559D$47" "P559D$48" "P559D$49" "P559D$50"
## [813] "P559E$01" "P559E$02" "P559E$03" "P559E$04"
## [817] "P559E$05" "P559E$06" "P559E$07" "P559E$08"
## [821] "P559E$09" "P559E$10" "P559E$11" "P559E$12"
## [825] "P559E$13" "P559E$14" "P559E$15" "P559E$16"
## [829] "P559E$17" "P559E$18" "P559E$19" "P559E$20"
## [833] "P559E$21" "P559E$22" "P559E$23" "P559E$24"
## [837] "P559E$25" "P559E$26" "P559E$27" "P559E$28"
## [841] "P559E$29" "P559E$30" "P559E$31" "P559E$32"
## [845] "P559E$33" "P559E$34" "P559E$35" "P559E$36"
## [849] "P559E$37" "P559E$38" "P559E$39" "P559E$40"
## [853] "P559E$41" "P559E$42" "P559E$43" "P559E$44"
## [857] "P559E$45" "P559E$46" "P559E$47" "P559E$48"
## [861] "P559E$49" "P559E$50" "P59F1$01" "P59F1$02"
## [865] "P59F1$03" "P59F1$04" "P59F1$05" "P59F1$06"
## [869] "P59F1$07" "P59F1$08" "P59F1$09" "P59F1$10"
## [873] "P59F1$11" "P59F1$12" "P59F1$13" "P59F1$14"
## [877] "P59F1$15" "P59F1$16" "P59F1$17" "P59F1$18"
## [881] "P59F1$19" "P59F1$20" "P59F1$21" "P59F1$22"
## [885] "P59F1$23" "P59F1$24" "P59F1$25" "P59F1$26"
## [889] "P59F1$27" "P59F1$28" "P59F1$29" "P59F1$30"
## [893] "P59F1$31" "P59F1$32" "P59F1$33" "P59F1$34"
## [897] "P59F1$35" "P59F1$36" "P59F1$37" "P59F1$38"
## [901] "P59F1$39" "P59F1$40" "P59F1$41" "P59F1$42"
## [905] "P59F1$43" "P59F1$44" "P59F1$45" "P59F1$46"
## [909] "P59F1$47" "P59F1$48" "P59F1$49" "P59F1$50"
## [913] "P59F2$01" "P59F2$02" "P59F2$03" "P59F2$04"
## [917] "P59F2$05" "P59F2$06" "P59F2$07" "P59F2$08"
## [921] "P59F2$09" "P59F2$10" "P59F2$11" "P59F2$12"
## [925] "P59F2$13" "P59F2$14" "P59F2$15" "P59F2$16"
## [929] "P59F2$17" "P59F2$18" "P59F2$19" "P59F2$20"
## [933] "P59F2$21" "P59F2$22" "P59F2$23" "P59F2$24"
## [937] "P59F2$25" "P59F2$26" "P59F2$27" "P59F2$28"
## [941] "P59F2$29" "P59F2$30" "P59F2$31" "P59F2$32"
## [945] "P59F2$33" "P59F2$34" "P59F2$35" "P59F2$36"
## [949] "P59F2$37" "P59F2$38" "P59F2$39" "P59F2$40"
## [953] "P59F2$41" "P59F2$42" "P59F2$43" "P59F2$44"
## [957] "P59F2$45" "P59F2$46" "P59F2$47" "P59F2$48"
## [961] "P59F2$49" "P59F2$50" "P560T$01" "P560T$02"
## [965] "P560T$03" "P560T$04" "P560T$05" "P560T$06"
## [969] "P560T$07" "P560T$08" "P560T$09" "P560T$10"
## [973] "P560A1$01" "P560A1$02" "P560A1$03" "P560A1$04"
## [977] "P560A1$05" "P560A1$06" "P560A1$07" "P560A1$08"
## [981] "P560A1$09" "P560A1$10" "P560A$01" "P560A$02"
## [985] "P560A$03" "P560A$04" "P560A$05" "P560A$06"
## [989] "P560A$07" "P560A$08" "P560A$09" "P560A$10"
## [993] "P560C$01" "P560C$02" "P560C$03" "P560C$04"
## [997] "P560C$05" "P560C$06" "P560C$07" "P560C$08"
## [1001] "P560C$09" "P560C$10" "P560D$01" "P560D$02"
## [1005] "P560D$03" "P560D$04" "P560D$05" "P560D$06"
## [1009] "P560D$07" "P560D$08" "P560D$09" "P560D$10"
## [1013] "P560E$01" "P560E$02" "P560E$03" "P560E$04"
## [1017] "P560E$05" "P560E$06" "P560E$07" "P560E$08"
## [1021] "P560E$09" "P560E$10" "P560F1$01" "P560F1$02"
## [1025] "P560F1$03" "P560F1$04" "P560F1$05" "P560F1$06"
## [1029] "P560F1$07" "P560F1$08" "P560F1$09" "P560F1$10"
## [1033] "P560F2$01" "P560F2$02" "P560F2$03" "P560F2$04"
## [1037] "P560F2$05" "P560F2$06" "P560F2$07" "P560F2$08"
## [1041] "P560F2$09" "P560F2$10" "P599" "P203"
## [1045] "P204" "P205" "P206" "P207"
## [1049] "P208A" "P209" "P301A" "IMPUTADO"
## [1053] "TICUEST01A" "D524A1" "D524B1" "D524C1"
## [1057] "D524D1" "D524E1" "D5291B" "D5292B"
## [1061] "D5293B" "D5294B" "D5295B" "D5296B"
## [1065] "D529T" "D530A" "D536" "D538A1"
## [1069] "D538B1" "D538C1" "D538D1" "D538E1"
## [1073] "D5401B" "D5402B" "D5403B" "D5404B"
## [1077] "D5405B" "D5406B" "D540T" "D541A"
## [1081] "D543" "D5441B" "D5442B" "D5443B"
## [1085] "D5444B" "D5445B" "D5446B" "D5447B"
## [1089] "D5448B" "D544T" "D5561C" "D5561E"
## [1093] "D5562C" "D5562E" "D5563C" "D5563E"
## [1097] "D5564C" "D5564E" "D5565C" "D5565E"
## [1101] "D5566C" "D5566E" "D5567C" "D5567E"
## [1105] "D5568C" "D5568E" "D5569C" "D5569E"
## [1109] "D55610C" "D55610E" "D55611C" "D55611E"
## [1113] "D55612C" "D55612E" "D55613C" "D55613E"
## [1117] "D55614C" "D55614E" "D55616C" "D55616E"
## [1121] "D55617C" "D55617E" "D55618C" "D55618E"
## [1125] "D55619C" "D55619E" "D55620C" "D55620E"
## [1129] "D55621C" "D55621E" "D55622C" "D55622E"
## [1133] "D55623C" "D55623E" "D55624C" "D55624E"
## [1137] "D55625C" "D55625E" "D55626C" "D55626E"
## [1141] "D556T1" "D556T2" "D5571C" "D5572C"
## [1145] "D5573C" "D5574C" "D5575C" "D5576C"
## [1149] "D5577C" "D5578C" "D557T" "D558T"
## [1153] "D559D1" "D559D2" "D559D3" "D559D41"
## [1157] "D559D42" "D559D43" "D559D44" "D559D45"
## [1161] "D559D46" "D559D47" "D559D48" "D559D49"
## [1165] "D559D410" "D559D411" "D559D412" "D559D413"
## [1169] "D559D414" "D559D415" "D559D416" "D559D417"
## [1173] "D559D418" "D559D419" "D559D420" "D559D421"
## [1177] "D559D422" "D559D423" "D559D424" "D559D425"
## [1181] "D559D426" "D559D427" "D559D428" "D559D429"
## [1185] "D559D430" "D559D431" "D559D432" "D559D433"
## [1189] "D559D434" "D559D435" "D559D436" "D559D437"
## [1193] "D559D438" "D559D439" "D559D440" "D559D441"
## [1197] "D559D442" "D559D443" "D559D444" "D559D445"
## [1201] "D559D446" "D559D447" "D560D1" "D560D2"
## [1205] "D560D3" "D560D4" "D560D5" "D560D6"
## [1209] "D560D7" "D560D8" "D560D9" "D560D10"
## [1213] "T559B$01" "T559B$02" "T559B$03" "T559B$04"
## [1217] "T559B$05" "T559B$06" "T559B$07" "T559B$08"
## [1221] "T559B$09" "T559B$10" "T559B$11" "T559B$12"
## [1225] "T559B$13" "T559B$14" "T559B$15" "T559B$16"
## [1229] "T559B$17" "T559B$18" "T559B$19" "T559B$20"
## [1233] "T559B$21" "T559B$22" "T559B$23" "T559B$24"
## [1237] "T559B$25" "T559B$26" "T559B$27" "T559B$28"
## [1241] "T559B$29" "T559B$30" "T559B$31" "T559B$32"
## [1245] "T559B$33" "T559B$34" "T559B$35" "T559B$36"
## [1249] "T559B$37" "T559B$38" "T559B$39" "T559B$40"
## [1253] "T559B$41" "T559B$42" "T559B$43" "T559B$44"
## [1257] "T559B$45" "T559B$46" "T559B$47" "T559B$48"
## [1261] "T559B$49" "T559B$50" "Z559B$01" "Z559B$02"
## [1265] "Z559B$03" "Z559B$04" "Z559B$05" "Z559B$06"
## [1269] "Z559B$07" "Z559B$08" "Z559B$09" "Z559B$10"
## [1273] "Z559B$11" "Z559B$12" "Z559B$13" "Z559B$14"
## [1277] "Z559B$15" "Z559B$16" "Z559B$17" "Z559B$18"
## [1281] "Z559B$19" "Z559B$20" "Z559B$21" "Z559B$22"
## [1285] "Z559B$23" "Z559B$24" "Z559B$25" "Z559B$26"
## [1289] "Z559B$27" "Z559B$28" "Z559B$29" "Z559B$30"
## [1293] "Z559B$31" "Z559B$32" "Z559B$33" "Z559B$34"
## [1297] "Z559B$35" "Z559B$36" "Z559B$37" "Z559B$38"
## [1301] "Z559B$39" "Z559B$40" "Z559B$41" "Z559B$42"
## [1305] "Z559B$43" "Z559B$44" "Z559B$45" "Z559B$46"
## [1309] "Z559B$47" "Z559B$48" "Z559B$49" "Z559B$50"
## [1313] "I559D1" "I559D2" "I559D3" "I559D41"
## [1317] "I559D42" "I559D43" "I559D44" "I559D45"
## [1321] "I559D46" "I559D47" "I559D48" "I559D49"
## [1325] "I559D410" "I559D411" "I559D412" "I559D413"
## [1329] "I559D414" "I559D415" "I559D416" "I559D417"
## [1333] "I559D418" "I559D419" "I559D420" "I559D421"
## [1337] "I559D422" "I559D423" "I559D424" "I559D425"
## [1341] "I559D426" "I559D427" "I559D428" "I559D429"
## [1345] "I559D430" "I559D431" "I559D432" "I559D433"
## [1349] "I559D434" "I559D435" "I559D436" "I559D437"
## [1353] "I559D438" "I559D439" "I559D440" "I559D441"
## [1357] "I559D442" "I559D443" "I559D444" "I559D445"
## [1361] "I559D446" "I559D447" "I560D1" "I560D2"
## [1365] "I560D3" "I560D4" "I560D5" "I560D6"
## [1369] "I560D7" "I560D8" "I560D9" "I560D10"
## [1373] "R559_01" "R559_02" "R559_03" "R559_04"
## [1377] "R559_05" "R559_06" "R559_07" "R559_08"
## [1381] "R559_09" "R559_10" "R559_11" "R559_12"
## [1385] "R559_13" "R559_14" "R559_15" "R559_16"
## [1389] "R559_17" "R559_18" "R559_19" "R559_20"
## [1393] "R559_21" "R559_22" "R559_23" "R559_24"
## [1397] "R559_25" "R559_26" "R559_27" "R559_28"
## [1401] "R559_29" "R559_30" "R559_31" "R559_32"
## [1405] "R559_33" "R559_34" "R559_35" "R559_36"
## [1409] "R559_37" "R559_38" "R559_39" "R559_40"
## [1413] "R559_41" "R559_42" "R559_43" "R559_44"
## [1417] "R559_45" "R559_46" "R559_47" "R559_48"
## [1421] "R559_49" "R559_50" "I518" "I513T"
## [1425] "I520" "I530A" "I524A1" "I524B1"
## [1429] "I524C1" "I524D1" "I524E1" "I538A1"
## [1433] "I538B1" "I538C1" "I538D1" "I538E1"
## [1437] "I5294B" "I5404B" "I541A" "OCU500"
## [1441] "OCUPINF" "EMPLPSEC" "FAC500A" "NCONGLOME"
## [1445] "SUB_CONGLOME"names(sum)## [1] "AÑO" "MES" "CONGLOME" "VIVIENDA" "HOGAR"
## [6] "UBIGEO" "DOMINIO" "ESTRATO" "MIEPERHO" "TOTMIEHO"
## [11] "PERCEPHO" "IA01HD" "IA02HD" "IG03HD1" "IG03HD2"
## [16] "IG03HD3" "IG03HD4" "GA03HD" "GA04HD" "SG23"
## [21] "SIG24" "SG25" "SIG26" "SG42" "SG421"
## [26] "SG422" "SG423" "SG42D" "SG42D1" "SG42D2"
## [31] "SG42D3" "INGBRUHD" "INGNETHD" "PAGESPHD" "INGINDHD"
## [36] "INGAUTHD" "INSEDTHD" "INSEDTHD1" "INSEDLHD" "PAESECHD"
## [41] "PAESECHD1" "INGSEIHD" "ISECAUHD" "INGEXTHD" "INGTRAHD"
## [46] "INGTEXHD" "INGRENHD" "INGOEXHD" "G05HD" "IG06HD"
## [51] "G05HD1" "IG06HD1" "G05HD2" "IG06HD2" "G05HD3"
## [56] "IG06HD3" "G05HD4" "IG06HD4" "G05HD5" "IG06HD5"
## [61] "G05HD6" "IG06HD6" "G07HD" "IG08HD" "INGTPRHD"
## [66] "INGTPUHD" "INGTPU01" "INGTPU02" "INGTPU03" "INGTPU04"
## [71] "INGTPU05" "INGTPU06" "INGTPU07" "INGTPU08" "INGTPU09"
## [76] "INGTPU10" "INGTPU11" "INGTPU12" "INGTPU13" "INGTPU14"
## [81] "INGTPU15" "INGTPU16" "GRU11HD" "GRU12HD1" "GRU12HD2"
## [86] "GRU13HD1" "GRU13HD2" "GRU13HD3" "GRU13HD4" "GRU14HD"
## [91] "GRU14HD1" "GRU14HD2" "GRU14HD3" "GRU14HD4" "GRU14HD5"
## [96] "GRU14HD6" "GRU21HD" "GRU22HD1" "GRU22HD2" "GRU23HD1"
## [101] "GRU23HD2" "GRU23HD3" "GRU24HD" "GRU31HD" "GRU32HD1"
## [106] "GRU32HD2" "GRU33HD1" "GRU33HD2" "GRU33HD3" "GRU34HD"
## [111] "GRU41HD" "GRU42HD1" "GRU42HD2" "GRU43HD1" "GRU43HD2"
## [116] "GRU43HD3" "GRU44HD" "GRU51HD" "GRU52HD1" "GRU53HD1"
## [121] "GRU53HD2" "GRU53HD3" "GRU53HD4" "GRU54HD" "GRU61HD"
## [126] "GRU62HD1" "GRU62HD2" "GRU63HD1" "GRU63HD2" "GRU63HD3"
## [131] "GRU64HD" "GRU71HD" "GRU72HD1" "GRU72HD2" "GRU73HD1"
## [136] "GRU73HD2" "GRU73HD3" "GRU74HD" "GRU81HD" "GRU82HD1"
## [141] "GRU82HD2" "GRU83HD1" "GRU83HD2" "GRU83HD3" "GRU83HD4"
## [146] "GRU84HD" "GRU84HD1" "GRU85HD1" "GRU86HD1" "GRU86HD2"
## [151] "GRU87HD" "INGMO1HD" "INGMO2HD" "INGHOG1D" "INGHOG2D"
## [156] "GASHOG1D" "GASHOG2D" "ESTRSOCIAL" "FACTOR07" "LD"
## [161] "LINPE" "LINEA" "POBREZA" "LINEAV" "POBREZAV"
## [166] "NCONGLOME" "SUB_CONGLOME"justificacion por hogar: el sujeto es en colectivo
seleccionar variables:
mod2 = mod2 %>% select(UBIGEO, P207)
mod3 = mod3 %>% select(UBIGEO, P301A)
mod4 = mod4 %>% select(UBIGEO, P401)
mod5 = mod5 %>% select(UBIGEO, P507)
sum = sum %>% select(UBIGEO, POBREZA)DEPARMENTO:
POBREZA
library(stringr)
sum$UBIGEO=substr(sum$UBIGEO,1,2)conteo=sum %>%
group_by(UBIGEO, POBREZA) %>%
summarise(total = n(), .groups = "drop")library(tidyverse)## ── Attaching core tidyverse packages ──────────────────────── tidyverse 2.0.0 ──
## ✔ forcats 1.0.0 ✔ readr 2.1.5
## ✔ ggplot2 3.5.0 ✔ tibble 3.2.1
## ✔ lubridate 1.9.3 ✔ tidyr 1.3.1
## ✔ purrr 1.0.2
## ── Conflicts ────────────────────────────────────────── tidyverse_conflicts() ──
## ✖ dplyr::filter() masks stats::filter()
## ✖ dplyr::lag() masks stats::lag()
## ℹ Use the conflicted package (<http://conflicted.r-lib.org/>) to force all conflicts to become errorspobreza_wide = conteo %>%
pivot_wider(
names_from = POBREZA,
values_from = total,
names_prefix = "POBREZA")MOD2
library(stringr)
mod2$UBIGEO=substr(mod2$UBIGEO,1,2)conteo2=mod2 %>%
group_by(UBIGEO, P207) %>%
summarise(total = n(), .groups = "drop")library(tidyverse)
mod2_wide = conteo2 %>%
pivot_wider(
names_from = P207,
values_from = total,
names_prefix = "SEXO")MOD3
library(stringr)
mod3$UBIGEO=substr(mod3$UBIGEO,1,2)RECATEGORIZAR VARIABLE NIVEL DE EDUCACION en 4 niveles (porque se tienen 12 niveles)
NIVEL 1 = SIN NIVEL EDUCATIVO = solo variable “sin_nivel” –> 1 NIVEL 2 = EDUCACION INICIAL = incluye “educación_inicial”–> 2 NIVEL 3 = EDUCACION PRIMARIA”primaria_incompleta”, “primaria_completa” –>3,4 NIVEL 4 = EDUCACION SECUNDARIA = “secundaria_incompleta”, “secundaria_completa” –> 5 y 6 NIVEL 5 = EDUCACION SUPERIOR NO UNIVERSITARIA = “superior_técnica_incompleta”, “superior_técnica_completa” –> 7 y 8 NIVEL 6 = EDUCACION SUPERIOR UNIVERSITARIA “superior_universitaria_incompleta”, “superior_universitaria_completa”, “maestria_doctorado” –> 9,10,11 MIVEL 7 = EDUCACION BÁSICA ESPECIAL –> 12
unique(mod3$P301A)## [1] 4 6 1 8 7 5 10 3 2 9 11 NA 12mod3=mod3%>%
mutate(NIVEL_EDU_REAGRUP = case_when(
P301A == 1 ~ 1, # Nivel 1: Sin nivel educativo
P301A == 2 ~ 2, # Nivel 2: Educación inicial
P301A %in% c(3, 4) ~ 3, # Nivel 3: Educación primaria
P301A %in% c(5, 6) ~ 4, # Nivel 4: Educación secundaria
P301A %in% c(7, 8) ~ 5, # Nivel 5: superior no universitaria
P301A %in% c(9, 10, 11) ~ 6, # Nivel 6: superior universitaria
P301A == 12 ~ 7, # Nivel 7: Educación básica especial
))conteo3=mod3 %>%
group_by(UBIGEO, NIVEL_EDU_REAGRUP) %>%
summarise(total = n(), .groups = "drop")library(tidyverse)
mod3_wide = conteo3 %>%
pivot_wider(
names_from = NIVEL_EDU_REAGRUP,
values_from = total,
names_prefix = "NIVEL_EDU")MOD4
library(stringr)
mod4$UBIGEO=substr(mod4$UBIGEO,1,2)conteo4=mod4 %>%
group_by(UBIGEO, P401) %>%
summarise(total = n(), .groups = "drop")library(tidyverse)
mod4_wide = conteo4 %>%
pivot_wider(
names_from = P401,
values_from = total,
names_prefix = "MAL_CRO")MOD5
library(stringr)
mod5$UBIGEO=substr(mod5$UBIGEO,1,2)reagrupar variable tipo de empleo en solo 2 niveles: “FORMAL” e “INFORMAL” –> justificación: INEI = La informalidad se calcula en base a la Metodología de la OIT, que comprende a aquellos trabajadores que laboran en unidades productivas no registradas en la administración tributaria (SUNAT), aquellos asalariados que no cuentan con seguro social pagado por el empleador y los trabajadores familiares no remunerados independientemente de la naturaleza formal o informal de la unidad productiva donde labora
NIVEL 1 (FORMAL) = “Empleador_patrono”, “Empleado”, “Obrero” –> 1,3,4 NIVEL 2 (INFORMAL) = “Trabajador_indep”, “Trabajador_fam_no_remun”, “Trabajador_del_hogar”, “Otro” –> 2,5,6,7
unique(mod5$P507)## [1] 3 4 2 NA 5 6 1 7mod5=mod5%>%
mutate(TIPO_EMPLEO_REGRUP = case_when(
P507 %in% c(1,3,4) ~ 1, # Nivel 1: empleo formal
P507 %in% c(2,5,6,7) ~ 2, # Nivel 2: empleo informal
))conteo5=mod5 %>%
group_by(UBIGEO, TIPO_EMPLEO_REGRUP) %>%
summarise(total = n(), .groups = "drop")library(tidyverse)
mod5_wide = conteo5 %>%
pivot_wider(
names_from = TIPO_EMPLEO_REGRUP,
values_from = total,
names_prefix = "TIPO_EMPLEO")JUNTAR DATAS
enaho=merge(mod2_wide,mod3_wide,all.x = T,by='UBIGEO')enaho=merge(enaho,mod4_wide,all.x = T,by='UBIGEO')enaho=merge(enaho,mod5_wide,all.x = T,by='UBIGEO')enaho=merge(enaho,pobreza_wide,all.x = T,by='UBIGEO')crear variable DEPARTAMENTO
enaho=enaho%>%
mutate(DEPARTAMENTO=case_when(
UBIGEO == "01" ~ "AMAZONAS",
UBIGEO == "02" ~ "ANCASH",
UBIGEO == "03" ~ "APURIMAC",
UBIGEO == "04" ~ "AREQUIPA",
UBIGEO == "05" ~ "AYACUCHO",
UBIGEO == "06" ~ "CAJAMARCA",
UBIGEO == "07" ~ "CALLAO",
UBIGEO == "08" ~ "CUSCO",
UBIGEO == "09" ~ "HUANCAVELICA",
UBIGEO == "10" ~ "HUANUCO",
UBIGEO == "11" ~ "ICA",
UBIGEO == "12" ~ "JUNIN",
UBIGEO == "13" ~ "LA LIBERTAD",
UBIGEO == "14" ~ "LAMBAYEQUE",
UBIGEO == "15" ~ "LIMA",
UBIGEO == "16" ~ "LORETO",
UBIGEO == "17" ~ "MADRE DE DIOS",
UBIGEO == "18" ~ "MOQUEGUA",
UBIGEO == "19" ~ "PASCO",
UBIGEO == "20" ~ "PIURA",
UBIGEO == "21" ~ "PUNO",
UBIGEO == "22" ~ "SAN MARTIN",
UBIGEO == "23" ~ "TACNA",
UBIGEO == "24" ~ "TUMBES",
UBIGEO == "25" ~ "UCAYALI"))
head(enaho$DEPARTAMENTO)## [1] "AMAZONAS" "ANCASH" "APURIMAC" "AREQUIPA" "AYACUCHO" "CAJAMARCA"eliminar columnas que hacen recuento de NAS
enaho=enaho[,-c(4,12,15,18)]modificar orden de columnas
enaho = enaho[,c(18,2,3,4,5,6,7,8,9,10,11,12,13,14,15,16,17)]str(enaho)## 'data.frame': 25 obs. of 17 variables:
## $ DEPARTAMENTO: chr "AMAZONAS" "ANCASH" "APURIMAC" "AREQUIPA" ...
## $ SEXO1 : int 2242 2375 1478 2538 1698 2294 1684 1895 1658 2113 ...
## $ SEXO2 : int 2275 2479 1564 2635 1857 2455 1931 2068 1824 2247 ...
## $ NIVEL_EDU1 : int 310 362 322 231 372 455 130 370 371 469 ...
## $ NIVEL_EDU2 : int 243 194 124 218 168 215 164 159 141 198 ...
## $ NIVEL_EDU3 : int 1848 1525 952 1113 1176 1918 681 1253 1197 1492 ...
## $ NIVEL_EDU4 : int 1230 1526 940 1756 1057 1253 1529 1199 1095 1140 ...
## $ NIVEL_EDU5 : int 255 329 172 643 239 267 475 322 214 206 ...
## $ NIVEL_EDU6 : int 247 528 299 860 302 320 473 452 242 420 ...
## $ NIVEL_EDU7 : int NA 8 2 7 1 1 9 2 1 3 ...
## $ MAL_CRO1 : int 1995 2313 1464 2109 1206 1684 1606 1445 812 1508 ...
## $ MAL_CRO2 : int 2322 2337 1450 2904 2234 2917 1961 2429 2549 2591 ...
## $ TIPO_EMPLEO1: int 765 992 523 1482 601 750 1054 683 543 818 ...
## $ TIPO_EMPLEO2: int 1828 1893 1491 1201 1484 2225 645 1768 1738 1665 ...
## $ POBREZA1 : int 93 48 33 33 109 239 30 31 79 95 ...
## $ POBREZA2 : int 215 192 167 153 278 361 190 197 237 278 ...
## $ POBREZA3 : int 957 1169 747 1353 758 872 786 1005 724 890 ...enaho=enaho%>%
mutate(DEPARTAMENTO = as.factor(DEPARTAMENTO)) %>%
mutate(across(-DEPARTAMENTO, as.numeric))str(enaho)## 'data.frame': 25 obs. of 17 variables:
## $ DEPARTAMENTO: Factor w/ 25 levels "AMAZONAS","ANCASH",..: 1 2 3 4 5 6 7 8 9 10 ...
## $ SEXO1 : num 2242 2375 1478 2538 1698 ...
## $ SEXO2 : num 2275 2479 1564 2635 1857 ...
## $ NIVEL_EDU1 : num 310 362 322 231 372 455 130 370 371 469 ...
## $ NIVEL_EDU2 : num 243 194 124 218 168 215 164 159 141 198 ...
## $ NIVEL_EDU3 : num 1848 1525 952 1113 1176 ...
## $ NIVEL_EDU4 : num 1230 1526 940 1756 1057 ...
## $ NIVEL_EDU5 : num 255 329 172 643 239 267 475 322 214 206 ...
## $ NIVEL_EDU6 : num 247 528 299 860 302 320 473 452 242 420 ...
## $ NIVEL_EDU7 : num NA 8 2 7 1 1 9 2 1 3 ...
## $ MAL_CRO1 : num 1995 2313 1464 2109 1206 ...
## $ MAL_CRO2 : num 2322 2337 1450 2904 2234 ...
## $ TIPO_EMPLEO1: num 765 992 523 1482 601 ...
## $ TIPO_EMPLEO2: num 1828 1893 1491 1201 1484 ...
## $ POBREZA1 : num 93 48 33 33 109 239 30 31 79 95 ...
## $ POBREZA2 : num 215 192 167 153 278 361 190 197 237 278 ...
## $ POBREZA3 : num 957 1169 747 1353 758 ...export(enaho,"enaholimpia.csv", encoding="UTF-8")–> preguntar si es necesario que deje la columna de cada variable independiente que cuenta la cantidad de NAS, pues en algunos casos la cantidad de NAS supera la cantidad (la variable POBREZA no tiene POBREZANA) –> esto podría usarlo en la interpretación al decir que la cantidad de datos NA supera la data real –> DECIDÍ ELIMNARLAS PQ TRAS REAGRUPAR la cantidad agrupada de NAs resultó menor a la cantidad de datos reales
–> decirle que es un analisis cualitativo por eso hay muchas variables a la derecha (data ancha)
–> preguntarle si debo o no filtrar los NAs por cada columna, pq a parte de la columna que termina en NA hay algunas columnas que tienen NA