#Se establece la ruta donde se encuentra el archivo a una variable para posteriormente mandarla llamar
ruta<-"C:/Users/Administrador/Desktop/Curso de Titulacion/Modulo 1 programacion R/Practicas R/Datos/resultados_ageb_urbana_10_cpv2010/conjunto_de_datos"
setwd(ruta) #Se manda llamar la ruta donde se encuentra el archivo csv
library(readr) #Se manda llamar la libreria readr para poder hacer la importacion de los datos del csv
datosINEGI <- read.csv("resultados_ageb_urbana_10_cpv2010.csv",encoding = "UTF-8") #Se importan los datos y se asignan a un data frameprint(paste("El numero total de registros son: ",length(datosINEGI$nom_ent)))#Mediante la funcion length() y una columna del dataframe se obtiene el numero de registros, tambien se puede utilizar la funcion nrow()## [1] "El numero total de registros son: 30876"print(paste("El numero total de colunas son",ncol(datosINEGI)))#Mediante la funcion ncol se obtiene el numero de columnas del data frame## [1] "El numero total de colunas son 198"#Determinar un nuevo data frame solo con los municipios de Lerdo, Gomez Palacio, Durango, Canatlán, Santiago Papasquiaro, Guadalupe Victoria, Vicente Guerrero , Pueblo Nuevo y Nuevo Ideal. Incluir todas las columnas
Filtro.datosINEGI<-datosINEGI[which(datosINEGI$nom_loc=="Lerdo"|datosINEGI$nom_loc=="Gómez Palacio"|datosINEGI$nom_loc=="Victoria de Durango"|datosINEGI$nom_loc=="Canatlán"|datosINEGI$nom_loc=="Santiago Papasquiaro"|datosINEGI$nom_loc=="Guadalupe Victoria"|datosINEGI$nom_loc=="Vicente Guerrero"|datosINEGI$nom_loc=="El Salto"|datosINEGI$nom_loc=="Nuevo Ideal"),] # Se realiza la columna de acuerdo con los parametros establesidos y asignados a un nuevo data framehead(Filtro.datosINEGI) #con la instruccion head muestra los primeros 6 registros## X.U.FEFF.entidad nom_ent mun nom_mun loc nom_loc ageb mza pobtot
## 5 10 Durango 1 Canatlán 1 Canatlán 0054 1 37
## 6 10 Durango 1 Canatlán 1 Canatlán 0054 2 16
## 7 10 Durango 1 Canatlán 1 Canatlán 0054 3 27
## 8 10 Durango 1 Canatlán 1 Canatlán 0054 4 38
## 9 10 Durango 1 Canatlán 1 Canatlán 0054 5 32
## 10 10 Durango 1 Canatlán 1 Canatlán 0054 6 19
## pobmas pobfem p_0a2 p_0a2_m p_0a2_f p_3ymas p_3ymas_m p_3ymas_f p_5ymas
## 5 17 20 5 * 3 32 15 17 32
## 6 6 10 0 0 0 16 6 10 15
## 7 12 15 3 * * 24 10 14 24
## 8 20 18 * 0 * 36 20 16 35
## 9 16 16 * 0 * 31 16 15 29
## 10 6 13 * 0 * 17 6 11 17
## p_5ymas_m p_5ymas_f p_12ymas p_12ymas_m p_12ymas_f p_15ymas p_15ymas_m
## 5 15 17 31 15 16 31 15
## 6 5 10 14 5 9 12 4
## 7 10 14 21 9 12 19 7
## 8 19 16 30 17 13 30 17
## 9 15 14 25 12 13 23 11
## 10 6 11 14 5 9 12 4
## p_15ymas_f p_18ymas p_18ymas_m p_18ymas_f p_3a5 p_3a5_m p_3a5_f p_6a11
## 5 16 29 14 15 0 0 0 *
## 6 8 11 4 7 * * 0 *
## 7 12 17 7 10 0 0 0 3
## 8 13 29 17 12 * * 0 5
## 9 12 21 9 12 * * * 4
## 10 8 10 3 7 0 0 0 3
## p_6a11_m p_6a11_f p_8a14 p_8a14_m p_8a14_f p_12a14 p_12a14_m p_12a14_f
## 5 0 * * 0 * 0 0 0
## 6 0 * * * * * * *
## 7 * * 5 3 * * * 0
## 8 * 3 * 0 * 0 0 0
## 9 3 * 5 3 * * * *
## 10 * * 5 * 3 * * *
## p_15a17 p_15a17_m p_15a17_f p_18a24 p_18a24_m p_18a24_f p_15a49_f
## 5 * * * 4 3 * 10
## 6 * 0 * * * * 5
## 7 * 0 * * 0 * 7
## 8 * 0 * 3 * * 8
## 9 * * 0 3 * * 9
## 10 * * * * 0 * 6
## p_60ymas p_60ymas_m p_60ymas_f rel_h_m pob0_14 pob15_64 pob65_mas
## 5 6 * 4 85 6 26 5
## 6 3 * * 60 4 10 *
## 7 7 3 4 80 8 12 7
## 8 9 4 5 111.11 8 22 8
## 9 4 * * 100 9 19 4
## 10 * * * 46.15 7 10 *
## prom_hnv pnacent pnacent_m pnacent_f pnacoe pnacoe_m pnacoe_f pres2005
## 5 2.50 34 14 20 * * 0 30
## 6 2.25 13 4 9 * * * 14
## 7 2.92 24 10 14 0 0 0 23
## 8 2.92 37 20 17 * 0 * 33
## 9 2.08 29 15 14 3 * * 29
## 10 2.67 17 5 12 * * * 14
## pres2005_m pres2005_f presoe05 presoe05_m presoe05_f p3ym_hli
## 5 14 16 * * * *
## 6 5 9 0 0 0 0
## 7 9 14 0 0 0 0
## 8 17 16 0 0 0 0
## 9 15 14 0 0 0 0
## 10 5 9 3 * * 0
## p3ym_hli_m p3ym_hli_f p3hlinhe p3hlinhe_m p3hlinhe_f p3hli_he
## 5 * 0 0 0 0 *
## 6 0 0 0 0 0 0
## 7 0 0 0 0 0 0
## 8 0 0 0 0 0 0
## 9 0 0 0 0 0 0
## 10 0 0 0 0 0 0
## p3hli_he_m p3hli_he_f p5_hli p5_hli_nhe p5_hli_he phog_ind pcon_lim
## 5 * 0 * 0 * * *
## 6 0 0 0 0 0 0 0
## 7 0 0 0 0 0 0 5
## 8 0 0 0 0 0 0 4
## 9 0 0 0 0 0 0 *
## 10 0 0 0 0 0 0 *
## pclim_mot pclim_vis pclim_leng pclim_aud pclim_mot2 pclim_men
## 5 0 * 0 0 0 0
## 6 0 0 0 0 0 0
## 7 5 0 0 0 0 0
## 8 4 0 0 0 0 0
## 9 * * 0 * 0 0
## 10 0 0 0 0 0 0
## pclim_men2 psin_lim p3a5_noa p3a5_noa_m p3a5_noa_f p6a11_noa p6a11_noam
## 5 0 36 0 0 0 0 0
## 6 0 16 0 0 0 0 0
## 7 0 22 0 0 0 0 0
## 8 0 34 * * 0 0 0
## 9 0 30 0 0 0 0 0
## 10 * 18 0 0 0 0 0
## p6a11_noaf p12a14noa p12a14noam p12a14noaf p15a17a p15a17a_m p15a17a_f
## 5 0 0 0 0 * * *
## 6 0 0 0 0 * 0 *
## 7 0 0 0 0 * 0 *
## 8 0 0 0 0 * 0 *
## 9 0 0 0 0 * * 0
## 10 0 0 0 0 * * *
## p18a24a p18a24a_m p18a24a_f p8a14an p8a14an_m p8a14an_f p15ym_an
## 5 * * 0 0 0 0 0
## 6 * * 0 0 0 0 0
## 7 0 0 0 0 0 0 0
## 8 * * 0 0 0 0 0
## 9 * * 0 0 0 0 *
## 10 0 0 0 0 0 0 *
## p15ym_an_m p15ym_an_f p15ym_se p15ym_se_m p15ym_se_f p15pri_in
## 5 0 0 0 0 0 6
## 6 0 0 0 0 0 *
## 7 0 0 0 0 0 4
## 8 0 0 0 0 0 9
## 9 0 * * 0 * 4
## 10 0 * 0 0 0 3
## p15pri_inm p15pri_inf p15pri_co p15pri_com p15pri_cof p15sec_in
## 5 * 4 4 * * 0
## 6 * 0 * 0 * 0
## 7 * * 3 * * *
## 8 4 5 6 4 * 0
## 9 * * * * 0 *
## 10 * * 3 * * *
## p15sec_inm p15sec_inf p15sec_co p15sec_com p15sec_cof p18ym_pb
## 5 0 0 6 4 * 13
## 6 0 0 4 0 4 5
## 7 0 * 5 * 4 4
## 8 0 0 6 4 * 9
## 9 * 0 6 * 4 9
## 10 0 * 3 * * *
## p18ym_pb_m p18ym_pb_f graproes graproes_m graproes_f pea pea_m pea_f
## 5 6 7 9.20 9.36 9.06 16 12 4
## 6 3 * 9.92 10.25 9.75 6 3 3
## 7 3 * 8.39 9.57 7.64 9 6 3
## 8 5 4 8.27 8.76 7.62 13 11 *
## 9 5 4 8.91 10.18 7.75 15 8 7
## 10 * * 7.50 7.75 7.38 3 * *
## pe_inac pe_inac_m pe_inac_f pocupada pocupada_m pocupada_f pdesocup
## 5 14 3 11 15 11 4 *
## 6 8 * 6 6 3 3 0
## 7 12 3 9 9 6 3 0
## 8 17 6 11 13 11 * 0
## 9 10 4 6 15 8 7 0
## 10 10 * 8 3 * * 0
## pdesocup_m pdesocup_f psinder pder_ss pder_imss pder_iste pder_istee
## 5 * 0 6 31 18 8 0
## 6 0 0 4 12 * 9 0
## 7 0 0 18 9 4 6 0
## 8 0 0 6 32 11 14 0
## 9 0 0 * 30 10 6 0
## 10 0 0 6 13 * 0 0
## pder_segp p12ym_solt p12ym_casa p12ym_sepa pcatolica pncatolica
## 5 6 12 16 3 35 0
## 6 * 6 4 4 16 0
## 7 0 5 12 4 27 0
## 8 6 15 7 8 38 0
## 9 14 8 11 6 28 *
## 10 10 7 6 * 18 *
## potras_rel psin_relig tothog hogjef_m hogjef_f pobhog phogjef_m
## 5 0 * 11 7 4 37 28
## 6 0 0 6 3 3 16 6
## 7 0 0 7 5 * 27 22
## 8 0 0 9 7 * 38 30
## 9 0 0 10 6 4 32 18
## 10 0 0 5 * 3 19 7
## phogjef_f vivtot tvivhab tvivpar vivpar_hab tvivparhab vivpar_des
## 5 9 12 * * * * *
## 6 10 6 * * * * *
## 7 5 9 * * * * *
## 8 8 12 * * * * *
## 9 14 15 * * * * *
## 10 12 9 * * * * *
## vivpar_ut ocupvivpar prom_ocup pro_ocup_c vph_pisodt vph_pisoti
## 5 * 37 3.36 0.86 11 0
## 6 * 16 2.67 0.70 5 *
## 7 * 27 3.86 0.84 7 0
## 8 * 38 4.22 0.79 9 0
## 9 * 32 3.20 0.62 10 0
## 10 * 19 3.80 1.12 5 0
## vph_1dor vph_2ymasd vph_1cuart vph_2cuart vph_3ymasc vph_c_elec
## 5 4 7 0 * 9 11
## 6 3 3 0 0 5 6
## 7 * 5 0 0 7 7
## 8 * 7 0 * 8 9
## 9 3 7 0 0 10 10
## 10 * 4 0 * 4 5
## vph_s_elec vph_aguadv vph_aguafv vph_excsa vph_drenaj vph_nodren
## 5 0 11 0 11 11 0
## 6 0 6 0 6 6 0
## 7 0 7 0 7 7 0
## 8 0 9 0 9 9 0
## 9 0 10 0 10 10 0
## 10 0 5 0 5 5 0
## vph_c_serv vph_snbien vph_radio vph_tv vph_refri vph_lavad vph_autom
## 5 11 0 11 11 9 7 3
## 6 6 0 6 6 6 5 4
## 7 7 0 7 7 7 6 5
## 8 9 * 6 8 8 8 6
## 9 10 0 9 10 10 9 7
## 10 5 0 4 5 5 4 3
## vph_pc vph_telef vph_cel vph_inter
## 5 * 5 9 *
## 6 * 5 3 *
## 7 * 4 6 0
## 8 4 7 * *
## 9 4 5 5 *
## 10 * * 4 0tail(Filtro.datosINEGI)# la funcion tail() muestra los ultimos 6 registros## X.U.FEFF.entidad nom_ent mun nom_mun loc nom_loc ageb mza
## 30871 10 Durango 39 Nuevo Ideal 1 Nuevo Ideal 0475 1
## 30872 10 Durango 39 Nuevo Ideal 1 Nuevo Ideal 0475 2
## 30873 10 Durango 39 Nuevo Ideal 1 Nuevo Ideal 0475 3
## 30874 10 Durango 39 Nuevo Ideal 1 Nuevo Ideal 0475 4
## 30875 10 Durango 39 Nuevo Ideal 1 Nuevo Ideal 0475 5
## 30876 10 Durango 39 Nuevo Ideal 1 Nuevo Ideal 0475 6
## pobtot pobmas pobfem p_0a2 p_0a2_m p_0a2_f p_3ymas p_3ymas_m
## 30871 0 0 0 0 0 0 0 0
## 30872 0 0 0 0 0 0 0 0
## 30873 0 0 0 0 0 0 0 0
## 30874 2 * * * * * * *
## 30875 0 0 0 0 0 0 0 0
## 30876 3 * * * * * * *
## p_3ymas_f p_5ymas p_5ymas_m p_5ymas_f p_12ymas p_12ymas_m p_12ymas_f
## 30871 0 0 0 0 0 0 0
## 30872 0 0 0 0 0 0 0
## 30873 0 0 0 0 0 0 0
## 30874 * * * * * * *
## 30875 0 0 0 0 0 0 0
## 30876 * * * * * * *
## p_15ymas p_15ymas_m p_15ymas_f p_18ymas p_18ymas_m p_18ymas_f p_3a5
## 30871 0 0 0 0 0 0 0
## 30872 0 0 0 0 0 0 0
## 30873 0 0 0 0 0 0 0
## 30874 * * * * * * *
## 30875 0 0 0 0 0 0 0
## 30876 * * * * * * *
## p_3a5_m p_3a5_f p_6a11 p_6a11_m p_6a11_f p_8a14 p_8a14_m p_8a14_f
## 30871 0 0 0 0 0 0 0 0
## 30872 0 0 0 0 0 0 0 0
## 30873 0 0 0 0 0 0 0 0
## 30874 * * * * * * * *
## 30875 0 0 0 0 0 0 0 0
## 30876 * * * * * * * *
## p_12a14 p_12a14_m p_12a14_f p_15a17 p_15a17_m p_15a17_f p_18a24
## 30871 0 0 0 0 0 0 0
## 30872 0 0 0 0 0 0 0
## 30873 0 0 0 0 0 0 0
## 30874 * * * * * * *
## 30875 0 0 0 0 0 0 0
## 30876 * * * * * * *
## p_18a24_m p_18a24_f p_15a49_f p_60ymas p_60ymas_m p_60ymas_f rel_h_m
## 30871 0 0 0 0 0 0 0
## 30872 0 0 0 0 0 0 0
## 30873 0 0 0 0 0 0 0
## 30874 * * * * * * *
## 30875 0 0 0 0 0 0 0
## 30876 * * * * * * *
## pob0_14 pob15_64 pob65_mas prom_hnv pnacent pnacent_m pnacent_f
## 30871 0 0 0 0 0 0 0
## 30872 0 0 0 0 0 0 0
## 30873 0 0 0 0 0 0 0
## 30874 * * * * * * *
## 30875 0 0 0 0 0 0 0
## 30876 * * * * * * *
## pnacoe pnacoe_m pnacoe_f pres2005 pres2005_m pres2005_f presoe05
## 30871 0 0 0 0 0 0 0
## 30872 0 0 0 0 0 0 0
## 30873 0 0 0 0 0 0 0
## 30874 * * * * * * *
## 30875 0 0 0 0 0 0 0
## 30876 * * * * * * *
## presoe05_m presoe05_f p3ym_hli p3ym_hli_m p3ym_hli_f p3hlinhe
## 30871 0 0 0 0 0 0
## 30872 0 0 0 0 0 0
## 30873 0 0 0 0 0 0
## 30874 * * * * * *
## 30875 0 0 0 0 0 0
## 30876 * * * * * *
## p3hlinhe_m p3hlinhe_f p3hli_he p3hli_he_m p3hli_he_f p5_hli
## 30871 0 0 0 0 0 0
## 30872 0 0 0 0 0 0
## 30873 0 0 0 0 0 0
## 30874 * * * * * *
## 30875 0 0 0 0 0 0
## 30876 * * * * * *
## p5_hli_nhe p5_hli_he phog_ind pcon_lim pclim_mot pclim_vis
## 30871 0 0 0 0 0 0
## 30872 0 0 0 0 0 0
## 30873 0 0 0 0 0 0
## 30874 * * * * * *
## 30875 0 0 0 0 0 0
## 30876 * * * * * *
## pclim_leng pclim_aud pclim_mot2 pclim_men pclim_men2 psin_lim
## 30871 0 0 0 0 0 0
## 30872 0 0 0 0 0 0
## 30873 0 0 0 0 0 0
## 30874 * * * * * *
## 30875 0 0 0 0 0 0
## 30876 * * * * * *
## p3a5_noa p3a5_noa_m p3a5_noa_f p6a11_noa p6a11_noam p6a11_noaf
## 30871 0 0 0 0 0 0
## 30872 0 0 0 0 0 0
## 30873 0 0 0 0 0 0
## 30874 * * * * * *
## 30875 0 0 0 0 0 0
## 30876 * * * * * *
## p12a14noa p12a14noam p12a14noaf p15a17a p15a17a_m p15a17a_f p18a24a
## 30871 0 0 0 0 0 0 0
## 30872 0 0 0 0 0 0 0
## 30873 0 0 0 0 0 0 0
## 30874 * * * * * * *
## 30875 0 0 0 0 0 0 0
## 30876 * * * * * * *
## p18a24a_m p18a24a_f p8a14an p8a14an_m p8a14an_f p15ym_an p15ym_an_m
## 30871 0 0 0 0 0 0 0
## 30872 0 0 0 0 0 0 0
## 30873 0 0 0 0 0 0 0
## 30874 * * * * * * *
## 30875 0 0 0 0 0 0 0
## 30876 * * * * * * *
## p15ym_an_f p15ym_se p15ym_se_m p15ym_se_f p15pri_in p15pri_inm
## 30871 0 0 0 0 0 0
## 30872 0 0 0 0 0 0
## 30873 0 0 0 0 0 0
## 30874 * * * * * *
## 30875 0 0 0 0 0 0
## 30876 * * * * * *
## p15pri_inf p15pri_co p15pri_com p15pri_cof p15sec_in p15sec_inm
## 30871 0 0 0 0 0 0
## 30872 0 0 0 0 0 0
## 30873 0 0 0 0 0 0
## 30874 * * * * * *
## 30875 0 0 0 0 0 0
## 30876 * * * * * *
## p15sec_inf p15sec_co p15sec_com p15sec_cof p18ym_pb p18ym_pb_m
## 30871 0 0 0 0 0 0
## 30872 0 0 0 0 0 0
## 30873 0 0 0 0 0 0
## 30874 * * * * * *
## 30875 0 0 0 0 0 0
## 30876 * * * * * *
## p18ym_pb_f graproes graproes_m graproes_f pea pea_m pea_f pe_inac
## 30871 0 0 0 0 0 0 0 0
## 30872 0 0 0 0 0 0 0 0
## 30873 0 0 0 0 0 0 0 0
## 30874 * * * * * * * *
## 30875 0 0 0 0 0 0 0 0
## 30876 * * * * * * * *
## pe_inac_m pe_inac_f pocupada pocupada_m pocupada_f pdesocup
## 30871 0 0 0 0 0 0
## 30872 0 0 0 0 0 0
## 30873 0 0 0 0 0 0
## 30874 * * * * * *
## 30875 0 0 0 0 0 0
## 30876 * * * * * *
## pdesocup_m pdesocup_f psinder pder_ss pder_imss pder_iste pder_istee
## 30871 0 0 0 0 0 0 0
## 30872 0 0 0 0 0 0 0
## 30873 0 0 0 0 0 0 0
## 30874 * * * * * * *
## 30875 0 0 0 0 0 0 0
## 30876 * * * * * * *
## pder_segp p12ym_solt p12ym_casa p12ym_sepa pcatolica pncatolica
## 30871 0 0 0 0 0 0
## 30872 0 0 0 0 0 0
## 30873 0 0 0 0 0 0
## 30874 * * * * * *
## 30875 0 0 0 0 0 0
## 30876 * * * * * *
## potras_rel psin_relig tothog hogjef_m hogjef_f pobhog phogjef_m
## 30871 0 0 0 0 0 0 0
## 30872 0 0 0 0 0 0 0
## 30873 0 0 0 0 0 0 0
## 30874 * * * * * * *
## 30875 0 0 0 0 0 0 0
## 30876 * * * * * * *
## phogjef_f vivtot tvivhab tvivpar vivpar_hab tvivparhab vivpar_des
## 30871 0 1 * * * * *
## 30872 0 2 * * * * *
## 30873 0 0 0 0 0 0 0
## 30874 * 1 * * * * *
## 30875 0 1 * * * * *
## 30876 * 1 * * * * *
## vivpar_ut ocupvivpar prom_ocup pro_ocup_c vph_pisodt vph_pisoti
## 30871 * 0 0 0 0 0
## 30872 * 0 0 0 0 0
## 30873 0 0 0 0 0 0
## 30874 * * * * * *
## 30875 * 0 0 0 0 0
## 30876 * * * * * *
## vph_1dor vph_2ymasd vph_1cuart vph_2cuart vph_3ymasc vph_c_elec
## 30871 0 0 0 0 0 0
## 30872 0 0 0 0 0 0
## 30873 0 0 0 0 0 0
## 30874 * * * * * *
## 30875 0 0 0 0 0 0
## 30876 * * * * * *
## vph_s_elec vph_aguadv vph_aguafv vph_excsa vph_drenaj vph_nodren
## 30871 0 0 0 0 0 0
## 30872 0 0 0 0 0 0
## 30873 0 0 0 0 0 0
## 30874 * * * * * *
## 30875 0 0 0 0 0 0
## 30876 * * * * * *
## vph_c_serv vph_snbien vph_radio vph_tv vph_refri vph_lavad vph_autom
## 30871 0 0 0 0 0 0 0
## 30872 0 0 0 0 0 0 0
## 30873 0 0 0 0 0 0 0
## 30874 * * * * * * *
## 30875 0 0 0 0 0 0 0
## 30876 * * * * * * *
## vph_pc vph_telef vph_cel vph_inter
## 30871 0 0 0 0
## 30872 0 0 0 0
## 30873 0 0 0 0
## 30874 * * * *
## 30875 0 0 0 0
## 30876 * * * *