datos2019 = read.csv("Datos_molec_2019-1.csv", stringsAsFactors = FALSE )
datos2024 = read.csv("Datos_molec_2024-1.csv", stringsAsFactors = FALSE )
dim(datos2019)
## [1] 1980 108
dim(datos2024)
## [1] 2016 108
variables2019 = colnames(datos2019)
variables2024 = colnames(datos2024)
variables_comunes = intersect(variables2019,variables2024)
variables_solo_2019 = setdiff(variables2019,variables2024)
variables_solo_2024 = setdiff(variables2024,variables2019)
length(variables_comunes)
## [1] 102
length(variables_solo_2019)
## [1] 6
length(variables_solo_2024)
## [1] 6
variables_comunes
## [1] "cd" "periodo" "folio" "entidad" "control" "viv_sel"
## [7] "num_hog" "hog_mud" "p1" "p2" "p3_1" "p3_2"
## [13] "p3_3" "p3_4" "p3_5" "p4" "p5" "p5_6esp"
## [19] "p6_1" "p6_2" "p6_3" "p6_4" "p6_5" "p6_6"
## [25] "p6_6esp" "p7" "p7_3" "p8_1" "p8_2" "p9"
## [31] "p9_5esp" "p10" "p11" "p11_6esp" "p12_1" "p12_2"
## [37] "p12_3" "p12_4" "p12_5" "p12_6" "p12_7" "p12_8"
## [43] "p12_9" "p12_9esp" "p13" "p13_3" "p14_1" "p14_2"
## [49] "p15" "p15_5esp" "p16" "p17" "p17_6esp" "p18_1"
## [55] "p18_2" "p18_3" "p18_4" "p18_5" "p19" "p19_3"
## [61] "p20_1" "p20_2" "p21" "p21_5esp" "p22" "p23_1"
## [67] "p23_2" "p24" "p25" "p25_6esp" "p26" "p27"
## [73] "p28" "p28_7esp" "p29" "p30" "p31" "p32"
## [79] "p32_6esp" "p33_1" "p33_2" "p33_3" "p33_4" "p34_1"
## [85] "p34_2" "p34_3" "p34_3_1" "p34_4" "p34_4_1" "p35"
## [91] "p36_1" "p36_2" "p36_3" "p36_4" "factor" "h_lec"
## [97] "mat_lec" "perslec" "edad" "sexo" "anio" "nivel"
variables_solo_2019
## [1] "n_ren_ele" "l_formato" "r_formato" "p_formato" "persleclrp"
## [6] "cond_activ"
variables_solo_2024
## [1] "n_ren_el" "cond_act" "l_format" "r_format" "p_format" "perslecl"
v