1<!DOCTYPE html> 2<html lang="" xml:lang=""> 3 <head> 4 <title>Seminario de Instrumentos Computacionales</title> 5 <meta charset="utf-8" /> 6<!-- This site is hosted on Netlify. Anyone can build and deploy a site 7 like this one for free: https://netlify.new/?utm_campaign=loops&utm_source=ai-legible&utm_medium=owned&utm_content=comment&utm_id=ad7e5767-7b7d-4fe5-9b5e-57c0dbe3aab4 8 Netlify hosting facts for this site: static/SSR served via Netlify Edge. --> 9 <meta name="author" content="Cristian Bonavida" /> 10
10<script src="site_libs/header-attrs-2.21/header-attrs.js"></script>
10 11
11<script src="site_libs/clipboard-2.0.6/clipboard.min.js"></script>
11 12 <link href="site_libs/xaringanExtra-clipboard-0.2.6/xaringanExtra-clipboard.css" rel="stylesheet" /> 13
13<script src="site_libs/xaringanExtra-clipboard-0.2.6/xaringanExtra-clipboard.js"></script>
13 14
14<script>window.xaringanExtraClipboard(null, {"button":"Copy Code","success":"Copied!","error":"Press Ctrl+C to Copy"})</script>
14 15 <link href="site_libs/panelset-0.2.6/panelset.css" rel="stylesheet" /> 16
16<script src="site_libs/panelset-0.2.6/panelset.js"></script>
16 17 <meta name="description" content="Material completo de las clases de R"/> 18 <meta name="generator" content="Curso dictado en la MaestrÃa en Economia de la UNLP"/> 19 <meta name="twitter:title" content="Curso de R - UNLP"/> 20 <meta name="twitter:description" content="Material completo de las clases de R Curso dictado en la MaestrÃa en Economia de la UNLP"/> 21 <meta name="twitter:url" content="https://crisbonavida-rclass.netlify.app/"/> 22 <meta name="twitter:image" content="https://crisbonavida-rclass.netlify.app/social-card.png"/> 23 <meta name="twitter:image:alt" content="Title slide of Curso de R - UNLP"/> 24 <meta name="twitter:card" content="summary_large_image"/> 25 <meta name="twitter:creator" content="@crisbonavida"/> 26 <meta name="twitter:site" content="@crisbonavida"/> 27 <meta property="og:title" content="Curso de R - UNLP"/> 28 <meta property="og:description" content="Material completo de las clases de R Curso dictado en la MaestrÃa en Economia de la UNLP"/> 29 <meta property="og:url" content="https://crisbonavida-rclass.netlify.app/"/> 30 <meta property="og:image" content="https://crisbonavida-rclass.netlify.app/social-card.png"/> 31 <meta property="og:image:alt" content="Title slide of Curso de R - UNLP"/> 32 <meta property="og:type" content="website"/> 33 <meta property="og:locale" content="en_US"/> 34 <meta property="article:author" content="Cristian Bonavida"/> 35
35<script src="site_libs/kePrint-0.0.1/kePrint.js"></script>
35 36 <link href="site_libs/lightable-0.0.1/lightable.css" rel="stylesheet" /> 37 <link rel="stylesheet" href="xaringan-themer.css" type="text/css" /> 38 </head> 39 <body> 40 <textarea id="source"> 41class: center, middle, inverse, title-slide 42 43.title[ 44# Seminario de Instrumentos Computacionales 45] 46.subtitle[ 47## R - Clase 2 48] 49.author[ 50### Cristian Bonavida 51] 52 53--- 54 55 56<style> 57p.caption { 58 font-size: 0.6em; 59} 60</style> 61 62 63<style> 64div.remark-slide-content { 65 padding: 1em; /*default is 1em 4em*/ 66} 67.dataTables_wrapper { 68 font-size: .5em; 69} 70</style> 71 72 73<style> 74pre { 75 white-space: pre !important; 76 overflow-y: auto !important; 77 max-height: 25vh !important; 78} 79</style> 80 81 82 83 84 85 86 87 88 89 90<style>.panelset{--panel-tab-active-foreground: #d33682;--panel-tab-hover-foreground: #42b39c;--panel-tab-font-family: sans-serif;}</style> 91 92 93 94 95 96 97 98 99 100 101<style type="text/css"> 102 103.remark-code, .remark-inline-code { 104 background: #f0f0f0; 105} 106.remark-code { 107 font-size: 18px; 108} 109.inter .remark-code { /*Change made here*/ 110 font-size: 85% !important; 111} 112.mid .remark-code { /*Change made here*/ 113 font-size: 75% !important; 114} 115 116</style> 117 118 119 120 121 122## Repaso Clase 1 123 124En la clase anterior vimos 125 126- Qué era R y cuáles eran sus ventajas comparativas 127 128 129-- 130 131- Aprendimos los fundamentos de R, es decir el ABC de este lenguaje 132 - valores 133 - vectores 134 - funciones 135 - dataframes 136 137 138-- 139 140- Vimos qué tipos de datos existen y cómo reconocerlos 141 142 143 144-- 145 146- Definimos un dataframe y vimos cómo navegar por él, llamando filas y columnas, filtrando observaciones y usando el operador `$` 147 148--- 149 150## Data frames y bases de datos 151 152En la gran mayorÃa de las veces, no definimos un dataframe a mano, sino que este es una base de datos que importamos de un archivo, tal como ocurre con las encuestas de hogares. 153 154Los misma sintaxis que vimos antes nos servirán para manipular bases de datos mas grandes 155 156El primer paso es saber importarlas 157 158 159--- 160 161## Importar bases 162 163R es muy eficiente importando bases de datos en múltiples formatos, incluso desde otros lenguajes 164 165Veamos el caso de la EPH. Cuando la descargamos de INDEC podemos bajar el archivo en formato `txt` y en formato `xls`. Para leer respectivas extensiones podemos usar las funciones de `R base`: 166 167- `read.csv()` 168- `read.xls()` 169 170-- 171 172 173```r 174read.csv("datos/Clase2/EPH_3T_22/usu_individual_T322.txt", sep=";", dec=",") 175``` 176 177- `sep=` con este argumento indicamos cuál es el patrón que separa cada columna, cada vez que R encuentre en el 178archivo de texto ";" sabrá que allà comienza una nueva columna 179 180- `dec=` le indica que los decimales en el archivo están indicados por la coma y no por el punto. Si no indicamos esto R entiende la columna como texto y al pasarla a numérica genera casos `NAs` 181 182 183--- 184 185## Importar bases 186 187Notar que solo la importamos, por lo tanto el output del comando (omitido aquÃ) será un print de las primeras filas. 188 189Recuerden que en R podemos tener múltiples dataframes cargados en el entorno de trabajo, por eso, lo que debemos 190hacer es **asignar esta base de datos a un objeto**, es decir almacenarla con un nombre 191 192 193 194```r 195eph_ind <- read.csv("datos/Clase2/EPH_3T_22/usu_individual_T322.txt", sep=";", dec=",") 196``` 197 198Ahora R no imprime nada, si la carga fue exitosa no obtendremos ningún output al correr el código 199 200--- 201 202## Importar bases 203 204Pero en nuestro entorno de trabajo debemos ver ahora la base cargada, indicando cantidad filas (obs) y columnas (variables) 205 206<img src="inputs/Clase2/carga_base.jpg" width="70%" height="50%" style="display: block; margin: auto;" /> 207 208--- 209 210## Explorar la base de datos 211 212Cuántas filas y cuantas columnas tiene nuestra base 213 214```r 215dim(eph_ind) 216``` 217 218``` 219## [1] 49232 177 220``` 221 222Cuáles son los nombres de esas columnas 223 224 225```r 226names(eph_ind) 227``` 228 229``` 230## [1] "CODUSU" "ANO4" "TRIMESTRE" "NRO_HOGAR" "COMPONENTE" 231## [6] "H15" "REGION" "MAS_500" "AGLOMERADO" "PONDERA" 232## [11] "CH03" "CH04" "CH05" "CH06" "CH07" 233## [16] "CH08" "CH09" "CH10" "CH11" "CH12" 234## [21] "CH13" "CH14" "CH15" "CH15_COD" "CH16" 235## [26] "CH16_COD" "NIVEL_ED" "ESTADO" "CAT_OCUP" "CAT_INAC" 236## [31] "IMPUTA" "PP02C1" "PP02C2" "PP02C3" "PP02C4" 237## [36] "PP02C5" "PP02C6" "PP02C7" "PP02C8" "PP02E" 238## [41] "PP02H" "PP02I" "PP03C" "PP03D" "PP3E_TOT" 239## [46] "PP3F_TOT" "PP03G" "PP03H" "PP03I" "PP03J" 240## [51] "INTENSI" "PP04A" "PP04B_COD" "PP04B1" "PP04B2" 241## [56] "PP04B3_MES" "PP04B3_ANO" "PP04B3_DIA" "PP04C" "PP04C99"
242## [61] "PP04D_COD" "PP04G" "PP05B2_MES" "PP05B2_ANO" "PP05B2_DIA" 243## [66] "PP05C_1" "PP05C_2" "PP05C_3" "PP05E" "PP05F" 244## [71] "PP05H" "PP06A" "PP06C" "PP06D" "PP06E" 245## [76] "PP06H" "PP07A" "PP07C" "PP07D" "PP07E" 246## [81] "PP07F1" "PP07F2" "PP07F3" "PP07F4" "PP07F5" 247## [86] "PP07G1" "PP07G2" "PP07G3" "PP07G4" "PP07G_59" 248## [91] "PP07H" "PP07I" "PP07J" "PP07K" "PP08D1" 249## [96] "PP08D4" "PP08F1" "PP08F2" "PP08J1" "PP08J2" 250## [101] "PP08J3" "PP09A" "PP09A_ESP" "PP09B" "PP09C" 251## [106] "PP09C_ESP" "PP10A" "PP10C" "PP10D" "PP10E" 252## [111] "PP11A" "PP11B_COD" "PP11B1" "PP11B2_MES" "PP11B2_ANO" 253## [116] "PP11B2_DIA" "PP11C" "PP11C99" "PP11D_COD" "PP11G_ANO" 254## [121] "PP11G_MES" "PP11G_DIA" "PP11L" "PP11L1" "PP11M" 255## [126] "PP11N" "PP11O" "PP11P" "PP11Q" "PP11R" 256## [131] "PP11S" "PP11T" "P21" "DECOCUR" "IDECOCUR" 257## [136] "RDECOCUR" "GDECOCUR" "PDECOCUR" "ADECOCUR" "PONDIIO" 258## [141] "TOT_P12" "P47T" "DECINDR" "IDECINDR" "RDECINDR" 259## [146] "GDECINDR" "PDECINDR" "ADECINDR" "PONDII" "V2_M" 260## [151] "V3_M" "V4_M" "V5_M" "V8_M" "V9_M" 261## [156] "V10_M" "V11_M" "V12_M" "V18_M" "V19_AM" 262## [161] "V21_M" "T_VI" "ITF" "DECIFR" "IDECIFR" 263## [166] "RDECIFR" "GDECIFR" "PDECIFR" "ADECIFR" "IPCF" 264## [171] "DECCFR" "IDECCFR" "RDECCFR" "GDECCFR" "PDECCFR" 265## [176] "ADECCFR" "PONDIH" 266``` 267 268 269 270--- 271 272## Explorar la base de datos 273 274Quiero chequear que todo esté ok, para eso puedo imprimir las primeras n filas (n=10 en este caso) 275 276 277```r 278head(eph_ind, 10) 279``` 280 281``` 282## CODUSU ANO4 TRIMESTRE NRO_HOGAR COMPONENTE H15 REGION 283## 1 TQRMNORVQHJNLTCDEGGFB00788741 2022 3 1 1 1 42 284## 2 TQRMNOQSWHKNKRCDEGJBF00789123 2022 3 1 1 1 43 285## 3 TQRMNOQSWHKNKRCDEGJBF00789123 2022 3 1 2 1 43 286## 4 TQRMNOTSQHLLMLCDEIIAD00703213 2022 3 1 1 1 1 287## 5 TQRMNOTSQHLLMLCDEIIAD00703213 2022 3 1 2 1 1 288## 6 TQRMNOSWVHKMKOCDEHPJB00790947 2022 3 1 1 1 40 289## 7 TQRMNOSWVHKMKOCDEHPJB00790947 2022 3 1 2 1 40 290## 8 TQRMNOSWVHKMKOCDEHPJB00790947 2022 3 1 3 1 40 291## 9 TQRMNOSWVHKMKOCDEHPJB00790947 2022 3 1 4 0 40 292## 10 TQRMNOSWVHKMKOCDEHPJB00790947 2022 3 1 5 1 40 293## MAS_500 AGLOMERADO PONDERA CH03 CH04 CH05 CH06 CH07 CH08 CH09 CH10 294## 1 S 10 537 1 1 10/04/1961 61 5 3 1 2 295## 2 S 13 543 1 1 06/10/1953 68 2 1 1 2 296## 3 S 13 543 2 2 28/08/1955 66 2 1 1 2 297## 4 S 32 894 1 1 10/03/1957 65 2 12 1 2 298## 5 S 32 894 2 2 07/01/1958 64 2 12 1 2 299## 6 S 29 345 1 2 18/09/1977 44 5 4 1 2 300## 7 S 29 345 3 1 13/05/2003 19 1 4 1 2 301## 8 S 29 345 3 1 30/03/2010 12 5 4 1 1 302## 9 S 29 345 3 1 06/03/2015 7 5 3 2 1 303## 10 S 29 345 4 2 30/04/2005 17 1 4 1 2 304## CH11 CH12 CH13 CH14 CH15 CH15_COD CH16 CH16_COD NIVEL_ED ESTADO CAT_OCUP 305## 1 0 4 2 2 1 NA 1 NA 3 1 2 306## 2 0 4 1 NA 1 NA 1 NA 4 3 0 307## 3 0 7 1 NA 1 NA 1 NA 6 3 0 308## 4 0 8 1 NA 1 NA 1 NA 6 3 0 309## 5 0 6 1 NA 1 NA 1 NA 6 3 0 310## 6 0 2 2 4 1 NA 1 NA 1 3 0 311## 7 0 4 2 1 1 NA 1 NA 3 1 3 312## 8 1 4 2 0 1 NA 1 NA 3 3 0 313## 9 1 2 2 1 1 NA 1 NA 1 4 0 314## 10 0 4 2 1 1 NA 1 NA 3 1 3 315## CAT_INAC IMPUTA PP02C1 PP02C2 PP02C3 PP02C4 PP02C5 PP02C6 PP02C7 PP02C8 316## 1 0 NA 0 0 0 0 0 0 0 0 317## 2 1 NA 0 0 0 0 0 0 0 0 318## 3 1 NA 0 0 0 0 0 0 0 0 319## 4 1 NA 0 0 0 0 0 0 0 0 320## 5 1 NA 0 0 0 0 0 0 0 0 321## 6 4 NA 0 0 0 0 0 0 0 0 322## 7 0 NA 0 0 0 0 0 0 0 0 323## 8 3 NA 0 0 0 0 0 0 0 0 324## 9 1 NA 0 0 0 0 0 0 0 0 325## 10 0 NA 0 0 0 0 0 0 0 0 326## PP02E PP02H PP02I PP03C PP03D PP3E_TOT PP3F_TOT PP03G PP03H PP03I PP03J 327## 1 0 0 0 1 0 32 0 1 1 1 1 328## 2 0 2 2 NA NA NA NA NA NA NA NA 329## 3 0 2 2 NA NA NA NA NA NA NA NA 330## 4 0 2 2 NA NA NA NA NA NA NA NA 331## 5 0 2 2 NA NA NA NA NA NA NA NA 332## 6 0 2 2 NA NA NA NA NA NA NA NA 333## 7 0 0 0 1 0 8 0 1 1 1 2 334## 8 0 2 2 NA NA NA NA NA NA NA NA 335## 9 0 0 0 NA NA NA NA NA NA NA NA 336## 10 0 0 0 1 0 8 0 1 1 1 1 337## INTENSI PP04A PP04B_COD PP04B1 PP04B2 PP04B3_MES PP04B3_ANO PP04B3_DIA PP04C 338## 1 1 2 4000 2 0 0 0 0 1 339## 2 NA NA NA NA NA NA NA NA NA 340## 3 NA NA NA NA NA NA NA NA NA 341## 4 NA NA NA NA NA NA NA NA NA 342## 5 NA NA NA NA NA NA NA NA NA 343## 6 NA NA NA NA NA NA NA NA NA 344## 7 1 2 4000 2 0 0 0 0 2 345## 8 NA NA NA NA NA NA NA NA NA 346## 9 NA NA NA NA NA NA NA NA NA 347## 10 1 2 9700 1 1 0 0 2 0 348## PP04C99 PP04D_COD PP04G PP05B2_MES PP05B2_ANO PP05B2_DIA PP05C_1 PP05C_2 349## 1 0 72113 5 0 0 0 1 3 350## 2 NA NA NA NA NA NA NA NA 351## 3 NA NA NA NA NA NA NA NA 352## 4 NA NA NA NA NA NA NA NA 353## 5 NA NA NA NA NA NA NA NA 354## 6 NA NA NA NA NA NA NA NA 355## 7 0 72314 8 0 0 0 0 0 356## 8 NA NA NA NA NA NA NA NA 357## 9 NA NA NA NA NA NA NA NA 358## 10 0 55314 0 0 0 0 0 0 359## PP05C_3 PP05E PP05F PP05H PP06A PP06C PP06D PP06E PP06H PP07A PP07C PP07D 360## 1 3 1 7 6 2 20000 0 0 0 0 0 0 361## 2 NA NA NA NA NA NA NA NA NA NA NA NA 362## 3 NA NA NA NA NA NA NA NA NA NA NA NA 363## 4 NA NA NA NA NA NA NA NA NA NA NA NA 364## 5 NA NA NA NA NA NA NA NA NA NA NA NA 365## 6 NA NA NA NA NA NA NA NA NA NA NA NA 366## 7 0 0 0 0 0 0 0 0 0 1 1 1 367## 8 NA NA NA NA NA NA NA NA NA NA NA NA 368## 9 NA NA NA NA NA NA NA NA NA NA NA NA 369## 10 0 0 0 0 0 0 0 0 0 0 0 0 370## PP07E PP07F1 PP07F2 PP07F3 PP07F4 PP07F5 PP07G1 PP07G2 PP07G3 PP07G4 371## 1 0 0 0 0 0 0 0 0 0 0 372## 2 NA NA NA NA NA NA NA NA NA NA 373## 3 NA NA NA NA NA NA NA NA NA NA 374## 4 NA NA NA NA NA NA NA NA NA NA 375## 5 NA NA NA NA NA NA NA NA NA NA 376## 6 NA NA NA NA NA NA NA NA NA NA 377## 7 4 2 2 2 2 5 2 2 2 2 378## 8 NA NA NA NA NA NA NA NA NA NA 379## 9 NA NA NA NA NA NA NA NA NA NA 380## 10 0 2 2 2 2 5 2 2 2 2 381## PP07G_59 PP07H PP07I PP07J PP07K PP08D1 PP08D4 PP08F1 PP08F2 PP08J1 PP08J2
382## 1 0 0 0 0 0 0 0 0 0 0 0 383## 2 NA NA NA NA NA NA NA NA NA NA NA 384## 3 NA NA NA NA NA NA NA NA NA NA NA 385## 4 NA NA NA NA NA NA NA NA NA NA NA 386## 5 NA NA NA NA NA NA NA NA NA NA NA 387## 6 NA NA NA NA NA NA NA NA NA NA NA 388## 7 5 2 2 1 4 0 0 0 0 0 0 389## 8 NA NA NA NA NA NA NA NA NA NA NA 390## 9 NA NA NA NA NA NA NA NA NA NA NA 391## 10 5 2 2 1 4 0 0 0 0 0 0 392## PP08J3 PP09A PP09A_ESP PP09B PP09C PP09C_ESP PP10A PP10C PP10D PP10E PP11A 393## 1 0 0 0 0 NA NA NA NA NA 394## 2 NA NA NA NA NA NA NA NA NA 395## 3 NA NA NA NA NA NA NA NA NA 396## 4 NA NA NA NA NA NA NA NA NA 397## 5 NA NA NA NA NA NA NA NA NA 398## 6 NA NA NA NA NA NA NA NA NA 399## 7 0 0 0 0 NA NA NA NA NA 400## 8 NA NA NA NA NA NA NA NA NA 401## 9 NA NA NA NA NA NA NA NA NA 402## 10 0 0 0 0 NA NA NA NA NA 403## PP11B_COD PP11B1 PP11B2_MES PP11B2_ANO PP11B2_DIA PP11C PP11C99 PP11D_COD 404## 1 NA NA NA NA NA NA NA NA 405## 2 NA NA NA NA NA NA NA NA 406## 3 NA NA NA NA NA NA NA NA 407## 4 NA NA NA NA NA NA NA NA 408## 5 NA NA NA NA NA NA NA NA 409## 6 NA NA NA NA NA NA NA NA 410## 7 NA NA NA NA NA NA NA NA 411## 8 NA NA NA NA NA NA NA NA 412## 9 NA NA NA NA NA NA NA NA 413## 10 NA NA NA NA NA NA NA NA 414## PP11G_ANO PP11G_MES PP11G_DIA PP11L PP11L1 PP11M PP11N PP11O PP11P PP11Q 415## 1 NA NA NA NA NA NA NA NA NA NA 416## 2 NA NA NA NA NA NA NA NA NA NA 417## 3 NA NA NA NA NA NA NA NA NA NA 418## 4 NA NA NA NA NA NA NA NA NA NA 419## 5 NA NA NA NA NA NA NA NA NA NA 420## 6 NA NA NA NA NA NA NA NA NA NA 421## 7 NA NA NA NA NA NA NA NA NA NA 422## 8 NA NA NA NA NA NA NA NA NA NA 423## 9 NA NA NA NA NA NA NA NA NA NA 424## 10 NA NA NA NA NA NA NA NA NA NA 425## PP11R PP11S PP11T P21 DECOCUR IDECOCUR RDECOCUR GDECOCUR PDECOCUR ADECOCUR 426## 1 NA NA NA 20000 1 2 2 1 NA 2 427## 2 NA NA NA 0 0 0 0 0 NA 0 428## 3 NA NA NA 0 0 0 0 0 NA 0 429## 4 NA NA NA 0 0 NA 0 0 NA 0 430## 5 NA NA NA 0 0 NA 0 0 NA 0 431## 6 NA NA NA 0 0 0 0 0 NA 0 432## 7 NA NA NA 0 0 0 0 0 NA 0 433## 8 NA NA NA 0 0 0 0 0 NA 0 434## 9 NA NA NA 0 0 0 0 0 NA 0 435## 10 NA NA NA 0 0 0 0 0 NA 0 436## PONDIIO TOT_P12 P47T DECINDR IDECINDR RDECINDR GDECINDR PDECINDR ADECINDR 437## 1 580 0 46000 4 4 4 4 NA 4 438## 2 543 0 44400 4 4 4 4 NA 4 439## 3 543 0 276000 10 10 10 10 NA 10 440## 4 894 0 -9 12 NA 12 12 NA 12 441## 5 894 0 -9 12 NA 12 12 NA 12 442## 6 345 0 5000 1 1 1 1 NA 1 443## 7 345 15000 15000 1 1 1 1 NA 2 444## 8 345 0 0 0 0 0 0 NA 0 445## 9 345 0 31800 2 3 3 2 NA 3 446## 10 345 0 0 0 0 0 0 NA 0 447## PONDII V2_M V3_M V4_M V5_M V8_M V9_M V10_M V11_M V12_M V18_M V19_AM V21_M 448## 1 565 26000 0 0 0 0 0 0 0 0 0 0 0 449## 2 561 44400 0 0 0 0 0 0 0 0 0 0 0 450## 3 567 276000 0 0 0 0 0 0 0 0 0 0 0 451## 4 0 -9 0 0 0 0 0 0 0 0 0 0 0 452## 5 0 -9 0 0 0 0 0 0 0 0 0 0 0 453## 6 363 0 0 0 5000 0 0 0 0 0 0 0 0 454## 7 394 0 0 0 0 0 0 0 0 0 0 0 0 455## 8 345 0 0 0 0 0 0 0 0 0 0 0 0 456## 9 345 31800 0 0 0 0 0 0 0 0 0 0 0 457## 10 345 0 0 0 0 0 0 0 0 0 0 0 0 458## T_VI ITF DECIFR IDECIFR RDECIFR GDECIFR PDECIFR ADECIFR IPCF DECCFR 459## 1 26000 46000 2 1 1 2 NA 1 46000 5 460## 2 44400 320400 10 10 10 10 NA 10 160200 10 461## 3 276000 320400 10 10 10 10 NA 10 160200 10 462## 4 -9 0 12 NA 12 12 NA 12 0 12 463## 5 -9 0 12 NA 12 12 NA 12 0 12 464## 6 5000 51800 2 2 2 2 NA 2 10360 1 465## 7 0 51800 2 2 2 2 NA 2 10360 1 466## 8 0 51800 2 2 2 2 NA 2 10360 1 467## 9 31800 51800 2 2 2 2 NA 2 10360 1 468## 10 0 51800 2 2 2 2 NA 2 10360 1
469## IDECCFR RDECCFR GDECCFR PDECCFR ADECCFR PONDIH 470## 1 6 6 5 NA 5 474 471## 2 10 10 10 NA 10 611 472## 3 10 10 10 NA 10 611 473## 4 NA 12 12 NA 12 0 474## 5 NA 12 12 NA 12 0 475## 6 1 1 1 NA 1 321 476## 7 1 1 1 NA 1 321 477## 8 1 1 1 NA 1 321 478## 9 1 1 1 NA 1 321 479## 10 1 1 1 NA 1 321 480``` 481 482 483--- 484 485## Explorar la base de datos 486 487Para visualizar la base completa la clickeamos yendo al entorno o sino corremos 488 489 490```r 491View(eph_ind) 492``` 493 494 495Y se abre una pestaña que muestra el dataframe completo, similar a esto 496 497<div style="border: 1px solid #ddd; padding: 0px; overflow-y: scroll; height:300px; overflow-x: scroll; width:100%; "><table class="table" style="font-size: 13px; margin-left: auto; margin-right: auto;"> 498 <thead> 499 <tr> 500 <th style="text-align:left;position: sticky; top:0; background-color: #FFFFFF;"> CODUSU </th> 501 <th style="text-align:right;position: sticky; top:0; background-color: #FFFFFF;"> ANO4 </th> 502 <th style="text-align:right;position: sticky; top:0; background-color: #FFFFFF;"> TRIMESTRE </th> 503 <th style="text-align:right;position: sticky; top:0; background-color: #FFFFFF;"> NRO_HOGAR </th> 504 <th style="text-align:right;position: sticky; top:0; background-color: #FFFFFF;"> COMPONENTE </th> 505 <th style="text-align:right;position: sticky; top:0; background-color: #FFFFFF;"> H15 </th> 506 <th style="text-align:right;position: sticky; top:0; background-color: #FFFFFF;"> REGION </th> 507 <th style="text-align:left;position: sticky; top:0; background-color: #FFFFFF;"> MAS_500 </th> 508 <th style="text-align:right;position: sticky; top:0; background-color: #FFFFFF;"> AGLOMERADO </th> 509 <th style="text-align:right;position: sticky; top:0; background-color: #FFFFFF;"> PONDERA </th> 510 <th style="text-align:right;position: sticky; top:0; background-color: #FFFFFF;"> CH03 </th> 511 <th style="text-align:right;position: sticky; top:0; background-color: #FFFFFF;"> CH04 </th> 512 <th style="text-align:left;position: sticky; top:0; background-color: #FFFFFF;"> CH05 </th> 513 <th style="text-align:right;position: sticky; top:0; background-color: #FFFFFF;"> CH06 </th> 514 <th style="text-align:right;position: sticky; top:0; background-color: #FFFFFF;"> CH07 </th> 515 <th style="text-align:right;position: sticky; top:0; background-color: #FFFFFF;"> CH08 </th> 516 <th style="text-align:right;position: sticky; top:0; background-color: #FFFFFF;"> CH09 </th> 517 <th style="text-align:right;position: sticky; top:0; background-color: #FFFFFF;"> CH10 </th> 518 <th style="text-align:right;position: sticky; top:0; background-color: #FFFFFF;"> CH11 </th> 519 <th style="text-align:right;position: sticky; top:0; background-color: #FFFFFF;"> CH12 </th> 520 <th style="text-align:right;position: sticky; top:0; background-color: #FFFFFF;"> CH13 </th> 521 <th style="text-align:right;position: sticky; top:0; background-color: #FFFFFF;"> CH14 </th> 522 <th style="text-align:right;position: sticky; top:0; background-color: #FFFFFF;"> CH15 </th> 523 <th style="text-align:right;position: sticky; top:0; background-color: #FFFFFF;"> CH15_COD </th> 524 <th style="text-align:right;position: sticky; top:0; background-color: #FFFFFF;"> CH16 </th> 525 <th style="text-align:right;position: sticky; top:0; background-color: #FFFFFF;"> CH16_COD </th> 526 <th style="text-align:right;position: sticky; top:0; background-color: #FFFFFF;"> NIVEL_ED </th> 527 <th style="text-align:right;position: sticky; top:0; background-color: #FFFFFF;"> ESTADO </th> 528 <th style="text-align:right;position: sticky; top:0; background-color: #FFFFFF;"> CAT_OCUP </th> 529 <th style="text-align:right;position: sticky; top:0; background-color: #FFFFFF;"> CAT_INAC </th> 530 </tr> 531 </thead> 532<tbody> 533 <tr> 534 <td style="text-align:left;"> TQRMNORVQHJNLTCDEGGFB00788741 </td> 535 <td style="text-align:right;"> 2022 </td> 536 <td style="text-align:right;"> 3 </td> 537 <td style="text-align:right;"> 1 </td> 538 <td style="text-align:right;"> 1 </td> 539 <td style="text-align:right;"> 1 </td> 540 <td style="text-align:right;"> 42 </td> 541 <td style="text-align:left;"> S </td> 542 <td style="text-align:right;"> 10 </td> 543 <td style="text-align:right;"> 537 </td> 544 <td style="text-align:right;"> 1 </td> 545 <td style="text-align:right;"> 1 </td> 546 <td style="text-align:left;"> 10/04/1961 </td> 547 <td style="text-align:right;"> 61 </td> 548 <td style="text-align:right;"> 5 </td> 549 <td style="text-align:right;"> 3 </td> 550 <td style="text-align:right;"> 1 </td> 551 <td style="text-align:right;"> 2 </td> 552 <td style="text-align:right;"> 0 </td> 553 <td style="text-align:right;"> 4 </td> 554 <td style="text-align:right;"> 2 </td> 555 <td style="text-align:right;"> 2 </td> 556 <td style="text-align:right;"> 1 </td> 557 <td style="text-align:right;"> NA </td> 558 <td style="text-align:right;"> 1 </td> 559 <td style="text-align:right;"> NA </td> 560 <td style="text-align:right;"> 3 </td> 561 <td style="text-align:right;"> 1 </td> 562 <td style="text-align:right;"> 2 </td> 563 <td style="text-align:right;"> 0 </td> 564 </tr> 565 <tr> 566 <td style="text-align:left;"> TQRMNOQSWHKNKRCDEGJBF00789123 </td> 567 <td style="text-align:right;"> 2022 </td> 568 <td style="text-align:right;"> 3 </td> 569 <td style="text-align:right;"> 1 </td> 570 <td style="text-align:right;"> 1 </td> 571 <td style="text-align:right;"> 1 </td> 572 <td style="text-align:right;"> 43 </td> 573 <td style="text-align:left;"> S </td> 574 <td style="text-align:right;"> 13 </td> 575 <td style="text-align:right;"> 543 </td> 576 <td style="text-align:right;"> 1 </td> 577 <td style="text-align:right;"> 1 </td> 578 <td style="text-align:left;"> 06/10/1953 </td> 579 <td style="text-align:right;"> 68 </td> 580 <td style="text-align:right;"> 2 </td> 581 <td style="text-align:right;"> 1 </td> 582 <td style="text-align:right;"> 1 </td> 583 <td style="text-align:right;"> 2 </td> 584 <td style="text-align:right;"> 0 </td> 585 <td style="text-align:right;"> 4 </td> 586 <td style="text-align:right;"> 1 </td> 587 <td style="text-align:right;"> NA </td> 588 <td style="text-align:right;"> 1 </td> 589 <td style="text-align:right;"> NA </td> 590 <td style="text-align:right;"> 1 </td> 591 <td style="text-align:right;"> NA </td> 592 <td style="text-align:right;"> 4 </td> 593 <td style="text-align:right;"> 3 </td> 594 <td style="text-align:right;"> 0 </td> 595 <td style="text-align:right;"> 1 </td> 596 </tr> 597 <tr> 598 <td style="text-align:left;"> TQRMNOQSWHKNKRCDEGJBF00789123 </td> 599 <td style="text-align:right;"> 2022 </td> 600 <td style="text-align:right;"> 3 </td> 601 <td style="text-align:right;"> 1 </td> 602 <td style="text-align:right;"> 2 </td> 603 <td style="text-align:right;"> 1 </td> 604 <td style="text-align:right;"> 43 </td> 605 <td style="text-align:left;"> S </td> 606 <td style="text-align:right;"> 13 </td> 607 <td style="text-align:right;"> 543 </td> 608 <td style="text-align:right;"> 2 </td> 609 <td style="text-align:right;"> 2 </td> 610 <td style="text-align:left;"> 28/08/1955 </td> 611 <td style="text-align:right;"> 66 </td> 612 <td style="text-align:right;"> 2 </td> 613 <td style="text-align:right;"> 1 </td> 614 <td style="text-align:right;"> 1 </td> 615 <td style="text-align:right;"> 2 </td> 616 <td style="text-align:right;"> 0 </td> 617 <td style="text-align:right;"> 7 </td> 618 <td style="text-align:right;"> 1 </td> 619 <td style="text-align:right;"> NA </td> 620 <td style="text-align:right;"> 1 </td> 621 <td style="text-align:right;"> NA </td> 622 <td style="text-align:right;"> 1 </td> 623 <td style="text-align:right;"> NA </td> 624 <td style="text-align:right;"> 6 </td> 625 <td style="text-align:right;"> 3 </td> 626 <td style="text-align:right;"> 0 </td> 627 <td style="text-align:right;"> 1 </td> 628 </tr> 629 <tr> 630 <td style="text-align:left;"> TQRMNOTSQHLLMLCDEIIAD00703213 </td> 631 <td style="text-align:right;"> 2022 </td> 632 <td style="text-align:right;"> 3 </td> 633 <td style="text-align:right;"> 1 </td> 634 <td style="text-align:right;"> 1 </td> 635 <td style="text-align:right;"> 1 </td> 636 <td style="text-align:right;"> 1 </td> 637 <td style="text-align:left;"> S </td> 638 <td style="text-align:right;"> 32 </td> 639 <td style="text-align:right;"> 894 </td> 640 <td style="text-align:right;"> 1 </td> 641 <td style="text-align:right;"> 1 </td> 642 <td style="text-align:left;"> 10/03/1957 </td> 643 <td style="text-align:right;"> 65 </td> 644 <td style="text-align:right;"> 2 </td> 645 <td style="text-align:right;"> 12 </td> 646 <td style="text-align:right;"> 1 </td> 647 <td style="text-align:right;"> 2 </td> 648 <td style="text-align:right;"> 0 </td> 649 <td style="text-align:right;"> 8 </td> 650 <td style="text-align:right;"> 1 </td> 651 <td style="text-align:right;"> NA </td> 652 <td style="text-align:right;"> 1 </td> 653 <td style="text-align:right;"> NA </td> 654 <td style="text-align:right;"> 1 </td> 655 <td style="text-align:right;"> NA </td> 656 <td style="text-align:right;"> 6 </td> 657 <td style="text-align:right;"> 3 </td> 658 <td style="text-align:right;"> 0 </td> 659 <td style="text-align:right;"> 1 </td> 660 </tr> 661 <tr> 662 <td style="text-align:left;"> TQRMNOTSQHLLMLCDEIIAD00703213 </td> 663 <td style="text-align:right;"> 2022 </td> 664 <td style="text-align:right;"> 3 </td> 665 <td style="text-align:right;"> 1 </td> 666 <td style="text-align:right;"> 2 </td> 667 <td style="text-align:right;"> 1 </td> 668 <td style="text-align:right;"> 1 </td> 669 <td style="text-align:left;"> S </td> 670 <td style="text-align:right;"> 32 </td> 671 <td style="text-align:right;"> 894 </td> 672 <td style="text-align:right;"> 2 </td> 673 <td style="text-align:right;"> 2 </td> 674 <td style="text-align:left;"> 07/01/1958 </td> 675 <td style="text-align:right;"> 64 </td> 676 <td style="text-align:right;"> 2 </td> 677 <td style="text-align:right;"> 12 </td> 678 <td style="text-align:right;"> 1 </td> 679 <td style="text-align:right;"> 2 </td> 680 <td style="text-align:right;"> 0 </td> 681 <td style="text-align:right;"> 6 </td> 682 <td style="text-align:right;"> 1 </td> 683 <td style="text-align:right;"> NA </td> 684 <td style="text-align:right;"> 1 </td> 685 <td style="text-align:right;"> NA </td> 686 <td style="text-align:right;"> 1 </td> 687 <td style="text-align:right;"> NA </td> 688 <td style="text-align:right;"> 6 </td> 689 <td style="text-align:right;"> 3 </td> 690 <td style="text-align:right;"> 0 </td> 691 <td style="text-align:right;"> 1 </td> 692 </tr> 693 <tr> 694 <td style="text-align:left;"> TQRMNOSWVHKMKOCDEHPJB00790947 </td> 695 <td style="text-align:right;"> 2022 </td> 696 <td style="text-align:right;"> 3 </td> 697 <td style="text-align:right;"> 1 </td> 698 <td style="text-align:right;"> 1 </td> 699 <td style="text-align:right;"> 1 </td> 700 <td style="text-align:right;"> 40 </td> 701 <td style="text-align:left;"> S </td> 702 <td style="text-align:right;"> 29 </td> 703 <td style="text-align:right;"> 345 </td> 704 <td style="text-align:right;"> 1 </td> 705 <td style="text-align:right;"> 2 </td> 706 <td style="text-align:left;"> 18/09/1977 </td> 707 <td style="text-align:right;"> 44 </td> 708 <td style="text-align:right;"> 5 </td> 709 <td style="text-align:right;"> 4 </td> 710 <td style="text-align:right;"> 1 </td> 711 <td style="text-align:right;"> 2 </td> 712 <td style="text-align:right;"> 0 </td> 713 <td style="text-align:right;"> 2 </td> 714 <td style="text-align:right;"> 2 </td> 715 <td style="text-align:right;"> 4 </td> 716 <td style="text-align:right;"> 1 </td> 717 <td style="text-align:right;"> NA </td> 718 <td style="text-align:right;"> 1 </td> 719 <td style="text-align:right;"> NA </td> 720 <td style="text-align:right;"> 1 </td> 721 <td style="text-align:right;"> 3 </td> 722 <td style="text-align:right;"> 0 </td> 723 <td style="text-align:right;"> 4 </td> 724 </tr> 725 <tr> 726 <td style="text-align:left;"> TQRMNOSWVHKMKOCDEHPJB00790947 </td> 727 <td style="text-align:right;"> 2022 </td> 728 <td style="text-align:right;"> 3 </td> 729 <td style="text-align:right;"> 1 </td> 730 <td style="text-align:right;"> 2 </td> 731 <td style="text-align:right;"> 1 </td> 732 <td style="text-align:right;"> 40 </td> 733 <td style="text-align:left;"> S </td> 734 <td style="text-align:right;"> 29 </td> 735 <td style="text-align:right;"> 345 </td> 736 <td style="text-align:right;"> 3 </td> 737 <td style="text-align:right;"> 1 </td> 738 <td style="text-align:left;">
738 13/05/2003 </td> 739 <td style="text-align:right;"> 19 </td> 740 <td style="text-align:right;"> 1 </td> 741 <td style="text-align:right;"> 4 </td> 742 <td style="text-align:right;"> 1 </td> 743 <td style="text-align:right;"> 2 </td> 744 <td style="text-align:right;"> 0 </td> 745 <td style="text-align:right;"> 4 </td> 746 <td style="text-align:right;"> 2 </td> 747 <td style="text-align:right;"> 1 </td> 748 <td style="text-align:right;"> 1 </td> 749 <td style="text-align:right;"> NA </td> 750 <td style="text-align:right;"> 1 </td> 751 <td style="text-align:right;"> NA </td> 752 <td style="text-align:right;"> 3 </td> 753 <td style="text-align:right;"> 1 </td> 754 <td style="text-align:right;"> 3 </td> 755 <td style="text-align:right;"> 0 </td> 756 </tr> 757 <tr> 758 <td style="text-align:left;"> TQRMNOSWVHKMKOCDEHPJB00790947 </td> 759 <td style="text-align:right;"> 2022 </td> 760 <td style="text-align:right;"> 3 </td> 761 <td style="text-align:right;"> 1 </td> 762 <td style="text-align:right;"> 3 </td> 763 <td style="text-align:right;"> 1 </td> 764 <td style="text-align:right;"> 40 </td> 765 <td style="text-align:left;"> S </td> 766 <td style="text-align:right;"> 29 </td> 767 <td style="text-align:right;"> 345 </td> 768 <td style="text-align:right;"> 3 </td> 769 <td style="text-align:right;"> 1 </td> 770 <td style="text-align:left;"> 30/03/2010 </td> 771 <td style="text-align:right;"> 12 </td> 772 <td style="text-align:right;"> 5 </td> 773 <td style="text-align:right;"> 4 </td> 774 <td style="text-align:right;"> 1 </td> 775 <td style="text-align:right;"> 1 </td> 776 <td style="text-align:right;"> 1 </td> 777 <td style="text-align:right;"> 4 </td> 778 <td style="text-align:right;"> 2 </td> 779 <td style="text-align:right;"> 0 </td> 780 <td style="text-align:right;"> 1 </td> 781 <td style="text-align:right;"> NA </td> 782 <td style="text-align:right;"> 1 </td> 783 <td style="text-align:right;"> NA </td> 784 <td style="text-align:right;"> 3 </td> 785 <td style="text-align:right;"> 3 </td> 786 <td style="text-align:right;"> 0 </td> 787 <td style="text-align:right;"> 3 </td> 788 </tr> 789 <tr> 790 <td style="text-align:left;"> TQRMNOSWVHKMKOCDEHPJB00790947 </td> 791 <td style="text-align:right;"> 2022 </td> 792 <td style="text-align:right;"> 3 </td> 793 <td style="text-align:right;"> 1 </td> 794 <td style="text-align:right;"> 4 </td> 795 <td style="text-align:right;"> 0 </td> 796 <td style="text-align:right;"> 40 </td> 797 <td style="text-align:left;"> S </td> 798 <td style="text-align:right;"> 29 </td> 799 <td style="text-align:right;"> 345 </td> 800 <td style="text-align:right;"> 3 </td> 801 <td style="text-align:right;"> 1 </td> 802 <td style="text-align:left;"> 06/03/2015 </td> 803 <td style="text-align:right;"> 7 </td> 804 <td style="text-align:right;"> 5 </td> 805 <td style="text-align:right;"> 3 </td> 806 <td style="text-align:right;"> 2 </td> 807 <td style="text-align:right;"> 1 </td> 808 <td style="text-align:right;"> 1 </td> 809 <td style="text-align:right;"> 2 </td> 810 <td style="text-align:right;"> 2 </td> 811 <td style="text-align:right;"> 1 </td> 812 <td style="text-align:right;"> 1 </td> 813 <td style="text-align:right;"> NA </td> 814 <td style="text-align:right;"> 1 </td> 815 <td style="text-align:right;"> NA </td> 816 <td style="text-align:right;"> 1 </td> 817 <td style="text-align:right;"> 4 </td> 818 <td style="text-align:right;"> 0 </td> 819 <td style="text-align:right;"> 1 </td> 820 </tr> 821 <tr> 822 <td style="text-align:left;"> TQRMNOSWVHKMKOCDEHPJB00790947 </td> 823 <td style="text-align:right;"> 2022 </td> 824 <td style="text-align:right;"> 3 </td> 825 <td style="text-align:right;"> 1 </td> 826 <td style="text-align:right;"> 5 </td> 827 <td style="text-align:right;"> 1 </td> 828 <td style="text-align:right;"> 40 </td> 829 <td style="text-align:left;"> S </td> 830 <td style="text-align:right;"> 29 </td> 831 <td style="text-align:right;"> 345 </td> 832 <td style="text-align:right;"> 4 </td> 833 <td style="text-align:right;"> 2 </td> 834 <td style="text-align:left;"> 30/04/2005 </td> 835 <td style="text-align:right;"> 17 </td> 836 <td style="text-align:right;"> 1 </td> 837 <td style="text-align:right;"> 4 </td> 838 <td style="text-align:right;"> 1 </td> 839 <td style="text-align:right;"> 2 </td> 840 <td style="text-align:right;"> 0 </td> 841 <td style="text-align:right;"> 4 </td> 842 <td style="text-align:right;"> 2 </td> 843 <td style="text-align:right;"> 1 </td> 844 <td style="text-align:right;"> 1 </td> 845 <td style="text-align:right;"> NA </td> 846 <td style="text-align:right;"> 1 </td> 847 <td style="text-align:right;"> NA </td> 848 <td style="text-align:right;"> 3 </td> 849 <td style="text-align:right;"> 1 </td> 850 <td style="text-align:right;"> 3 </td> 851 <td style="text-align:right;"> 0 </td> 852 </tr> 853 <tr> 854 <td style="text-align:left;"> TQRMNORRTHMMLLCDEOHCH00710640 </td> 855 <td style="text-align:right;"> 2022 </td> 856 <td style="text-align:right;"> 3 </td> 857 <td style="text-align:right;"> 1 </td> 858 <td style="text-align:right;"> 1 </td> 859 <td style="text-align:right;"> 1 </td> 860 <td style="text-align:right;"> 44 </td> 861 <td style="text-align:left;"> N </td> 862 <td style="text-align:right;"> 91 </td> 863 <td style="text-align:right;"> 141 </td> 864 <td style="text-align:right;"> 1 </td> 865 <td style="text-align:right;"> 1 </td> 866 <td style="text-align:left;"> 17/08/1970 </td> 867 <td style="text-align:right;"> 52 </td> 868 <td style="text-align:right;"> 2 </td> 869 <td style="text-align:right;"> 1 </td> 870 <td style="text-align:right;"> 1 </td> 871 <td style="text-align:right;"> 2 </td> 872 <td style="text-align:right;"> 0 </td> 873 <td style="text-align:right;"> 4 </td> 874 <td style="text-align:right;"> 1 </td> 875 <td style="text-align:right;"> NA </td> 876 <td style="text-align:right;"> 1 </td> 877 <td style="text-align:right;"> NA </td> 878 <td style="text-align:right;"> 1 </td> 879 <td style="text-align:right;"> NA </td> 880 <td style="text-align:right;"> 4 </td> 881 <td style="text-align:right;"> 2 </td> 882 <td style="text-align:right;"> 0 </td> 883 <td style="text-align:right;"> 0 </td> 884 </tr> 885 <tr> 886 <td style="text-align:left;"> TQRMNORRTHMMLLCDEOHCH00710640 </td> 887 <td style="text-align:right;"> 2022 </td> 888 <td style="text-align:right;"> 3 </td> 889 <td style="text-align:right;"> 1 </td> 890 <td style="text-align:right;"> 2 </td> 891 <td style="text-align:right;"> 1 </td> 892 <td style="text-align:right;"> 44 </td> 893 <td style="text-align:left;"> N </td> 894 <td style="text-align:right;"> 91 </td> 895 <td style="text-align:right;"> 141 </td> 896 <td style="text-align:right;"> 2 </td> 897 <td style="text-align:right;"> 2 </td> 898 <td style="text-align:left;"> 03/07/1974 </td> 899 <td style="text-align:right;"> 48 </td> 900 <td style="text-align:right;"> 2 </td> 901 <td style="text-align:right;"> 1 </td> 902 <td style="text-align:right;"> 1 </td> 903 <td style="text-align:right;"> 2 </td> 904 <td style="text-align:right;"> 0 </td> 905 <td style="text-align:right;"> 7 </td> 906 <td style="text-align:right;"> 1 </td> 907 <td style="text-align:right;"> NA </td> 908 <td style="text-align:right;"> 1 </td> 909 <td style="text-align:right;"> NA </td> 910 <td style="text-align:right;"> 1 </td> 911 <td style="text-align:right;"> NA </td> 912 <td style="text-align:right;"> 6 </td> 913 <td style="text-align:right;"> 1 </td> 914 <td style="text-align:right;"> 3 </td> 915 <td style="text-align:right;"> 0 </td> 916 </tr> 917 <tr> 918 <td style="text-align:left;"> TQRMNORRTHMMLLCDEOHCH00710640 </td> 919 <td style="text-align:right;"> 2022 </td> 920 <td style="text-align:right;"> 3 </td> 921 <td style="text-align:right;"> 1 </td> 922 <td style="text-align:right;"> 3 </td> 923 <td style="text-align:right;"> 1 </td> 924 <td style="text-align:right;"> 44 </td> 925 <td style="text-align:left;"> N </td> 926 <td style="text-align:right;"> 91 </td> 927 <td style="text-align:right;"> 141 </td> 928 <td style="text-align:right;"> 3 </td> 929 <td style="text-align:right;"> 1 </td> 930 <td style="text-align:left;"> 16/08/2007 </td> 931 <td style="text-align:right;"> 15 </td> 932 <td style="text-align:right;"> 5 </td> 933 <td style="text-align:right;"> 1 </td> 934 <td style="text-align:right;"> 1 </td> 935 <td style="text-align:right;"> 1 </td> 936 <td style="text-align:right;"> 1 </td> 937 <td style="text-align:right;"> 4 </td> 938 <td style="text-align:right;"> 2 </td> 939 <td style="text-align:right;"> 2 </td> 940 <td style="text-align:right;"> 1 </td> 941 <td style="text-align:right;"> NA </td> 942 <td style="text-align:right;"> 1 </td> 943 <td style="text-align:right;"> NA </td> 944 <td style="text-align:right;"> 3 </td> 945 <td style="text-align:right;"> 3 </td> 946 <td style="text-align:right;"> 0 </td> 947 <td style="text-align:right;"> 3 </td> 948 </tr> 949 <tr> 950 <td style="text-align:left;"> TQRMNORRTHMMLLCDEOHCH00710640 </td> 951 <td style="text-align:right;"> 2022 </td> 952 <td style="text-align:right;"> 3 </td> 953 <td style="text-align:right;"> 1 </td> 954 <td style="text-align:right;"> 4 </td> 955 <td style="text-align:right;"> 1 </td> 956 <td style="text-align:right;"> 44 </td> 957 <td style="text-align:left;"> N </td> 958 <td style="text-align:right;"> 91 </td> 959 <td style="text-align:right;"> 141 </td> 960 <td style="text-align:right;"> 3 </td> 961 <td style="text-align:right;"> 1 </td> 962 <td style="text-align:left;"> 17/09/2010 </td> 963 <td style="text-align:right;"> 11 </td> 964 <td style="text-align:right;"> 5 </td> 965 <td style="text-align:right;"> 1 </td> 966 <td style="text-align:right;"> 1 </td> 967 <td style="text-align:right;"> 1 </td> 968 <td style="text-align:right;"> 1 </td> 969 <td style="text-align:right;"> 2 </td> 970 <td style="text-align:right;"> 2 </td> 971 <td style="text-align:right;"> 5 </td> 972 <td style="text-align:right;"> 1 </td> 973 <td style="text-align:right;"> NA </td> 974 <td style="text-align:right;"> 1 </td> 975 <td style="text-align:right;"> NA </td> 976 <td style="text-align:right;"> 1 </td> 977 <td style="text-align:right;"> 3 </td> 978 <td style="text-align:right;"> 0 </td> 979 <td style="text-align:right;"> 3 </td> 980 </tr> 981 <tr> 982 <td style="text-align:left;"> TQRMNOQVXHMOKUCDEFNFF00710948 </td> 983 <td style="text-align:right;"> 2022 </td> 984 <td style="text-align:right;"> 3 </td> 985 <td style="text-align:right;"> 1 </td> 986 <td style="text-align:right;"> 1 </td> 987 <td style="text-align:right;"> 1 </td> 988 <td style="text-align:right;"> 41 </td> 989 <td style="text-align:left;"> N </td> 990 <td style="text-align:right;"> 7 </td> 991 <td style="text-align:right;"> 303 </td> 992 <td style="text-align:right;"> 1 </td> 993 <td style="text-align:right;"> 1 </td> 994 <td style="text-align:left;"> 19/08/1968 </td> 995 <td style="text-align:right;"> 54 </td> 996 <td style="text-align:right;"> 1 </td> 997 <td style="text-align:right;"> 1 </td> 998 <td style="text-align:right;"> 1 </td> 999 <td style="text-align:right;"> 2 </td> 1000 <td style="text-align:right;"> 0 </td> 1001 <td style="text-align:right;"> 2 </td> 1002 <td style="text-align:right;"> 2 </td> 1003 <td style="text-align:right;"> 3 </td> 1004 <td style="text-align:right;"> 4 </td> 1005 <td style="text-align:right;"> 221 </td> 1006 <td style="text-align:right;"> 1 </td> 1007 <td style="text-align:right;"> NA </td> 1008 <td style="text-align:right;"> 1 </td> 1009 <td style="text-align:right;"> 1 </td> 1010 <td style="text-align:right;"> 3 </td> 1011 <td style="text-align:right;"> 0 </td> 1012 </tr> 1013 <tr> 1014 <td style="text-align:left;"> TQRMNOQVXHMOKUCDEFNFF00710948 </td> 1015 <td style="text-align:right;"> 2022 </td> 1016 <td style="text-align:right;"> 3 </td> 1017 <td style="text-align:right;"> 1 </td> 1018 <td style="text-align:right;"> 2 </td> 1019 <td style="text-align:right;"> 1 </td> 1020 <td style="text-align:right;"> 41 </td> 1021 <td style="text-align:left;"> N </td> 1022 <td style="text-align:right;"> 7 </td> 1023 <td style="text-align:right;"> 303 </td> 1024 <td style="text-align:right;"> 2 </td> 1025 <td style="text-align:right;"> 2 </td> 1026 <td style="text-align:left;"> 28/05/1970 </td> 1027 <td style="text-align:right;"> 52 </td> 1028 <td style="text-align:right;"> 1 </td> 1029 <td style="text-align:right;"> 1 </td> 1030 <td style="text-align:right;"> 1 </td> 1031 <td style="text-align:right;"> 2 </td> 1032 <td style="text-align:right;"> 0 </td> 1033 <td style="text-align:right;"> 2 </td> 1034 <td style="text-align:right;"> 2 </td> 1035 <td style="text-align:right;"> 3 </td> 1036 <td style="text-align:right;"> 4 </td> 1037 <td style="text-align:right;"> 221 </td> 1038 <td style="text-align:right;"> 1 </td> 1039 <td style="text-align:right;"> NA </td> 1040 <td style="text-align:right;"> 1 </td> 1041 <td style="text-align:right;"> 3 </td> 1042 <td style="text-a
1042lign:right;"> 0 </td> 1043 <td style="text-align:right;"> 7 </td> 1044 </tr> 1045 <tr> 1046 <td style="text-align:left;"> TQRMNOQVXHMOKUCDEFNFF00710948 </td> 1047 <td style="text-align:right;"> 2022 </td> 1048 <td style="text-align:right;"> 3 </td> 1049 <td style="text-align:right;"> 1 </td> 1050 <td style="text-align:right;"> 3 </td> 1051 <td style="text-align:right;"> 1 </td> 1052 <td style="text-align:right;"> 41 </td> 1053 <td style="text-align:left;"> N </td> 1054 <td style="text-align:right;"> 7 </td> 1055 <td style="text-align:right;"> 303 </td> 1056 <td style="text-align:right;"> 3 </td> 1057 <td style="text-align:right;"> 2 </td> 1058 <td style="text-align:left;"> 09/01/1997 </td> 1059 <td style="text-align:right;"> 25 </td> 1060 <td style="text-align:right;"> 5 </td> 1061 <td style="text-align:right;"> 4 </td> 1062 <td style="text-align:right;"> 1 </td> 1063 <td style="text-align:right;"> 1 </td> 1064 <td style="text-align:right;"> 1 </td> 1065 <td style="text-align:right;"> 4 </td> 1066 <td style="text-align:right;"> 2 </td> 1067 <td style="text-align:right;"> 1 </td> 1068 <td style="text-align:right;"> 1 </td> 1069 <td style="text-align:right;"> NA </td> 1070 <td style="text-align:right;"> 1 </td> 1071 <td style="text-align:right;"> NA </td> 1072 <td style="text-align:right;"> 3 </td> 1073 <td style="text-align:right;"> 1 </td> 1074 <td style="text-align:right;"> 3 </td> 1075 <td style="text-align:right;"> 0 </td> 1076 </tr> 1077 <tr> 1078 <td style="text-align:left;"> TQRMNOQVXHMOKUCDEFNFF00710948 </td> 1079 <td style="text-align:right;"> 2022 </td> 1080 <td style="text-align:right;"> 3 </td> 1081 <td style="text-align:right;"> 1 </td> 1082 <td style="text-align:right;"> 4 </td> 1083 <td style="text-align:right;"> 1 </td> 1084 <td style="text-align:right;"> 41 </td> 1085 <td style="text-align:left;"> N </td> 1086 <td style="text-align:right;"> 7 </td> 1087 <td style="text-align:right;"> 303 </td> 1088 <td style="text-align:right;"> 3 </td> 1089 <td style="text-align:right;"> 2 </td> 1090 <td style="text-align:left;"> 08/11/2003 </td> 1091 <td style="text-align:right;"> 18 </td> 1092 <td style="text-align:right;"> 5 </td> 1093 <td style="text-align:right;"> 1 </td> 1094 <td style="text-align:right;"> 1 </td> 1095 <td style="text-align:right;"> 2 </td> 1096 <td style="text-align:right;"> 0 </td> 1097 <td style="text-align:right;"> 4 </td> 1098 <td style="text-align:right;"> 2 </td> 1099 <td style="text-align:right;"> 1 </td> 1100 <td style="text-align:right;"> 1 </td> 1101 <td style="text-align:right;"> NA </td> 1102 <td style="text-align:right;"> 1 </td> 1103 <td style="text-align:right;"> NA </td> 1104 <td style="text-align:right;"> 3 </td> 1105 <td style="text-align:right;"> 3 </td> 1106 <td style="text-align:right;"> 0 </td> 1107 <td style="text-align:right;"> 7 </td> 1108 </tr> 1109 <tr> 1110 <td style="text-align:left;"> TQRMNOQVXHMOKUCDEFNFF00710948 </td> 1111 <td style="text-align:right;"> 2022 </td> 1112 <td style="text-align:right;"> 3 </td> 1113 <td style="text-align:right;"> 1 </td> 1114 <td style="text-align:right;"> 5 </td> 1115 <td style="text-align:right;"> 0 </td> 1116 <td style="text-align:right;"> 41 </td> 1117 <td style="text-align:left;"> N </td> 1118 <td style="text-align:right;"> 7 </td> 1119 <td style="text-align:right;"> 303 </td> 1120 <td style="text-align:right;"> 5 </td> 1121 <td style="text-align:right;"> 1 </td> 1122 <td style="text-align:left;"> 12/05/2014 </td> 1123 <td style="text-align:right;"> 8 </td> 1124 <td style="text-align:right;"> 5 </td> 1125 <td style="text-align:right;"> 4 </td> 1126 <td style="text-align:right;"> 1 </td> 1127 <td style="text-align:right;"> 1 </td> 1128 <td style="text-align:right;"> 1 </td> 1129 <td style="text-align:right;"> 2 </td> 1130 <td style="text-align:right;"> 2 </td> 1131 <td style="text-align:right;"> 2 </td> 1132 <td style="text-align:right;"> 1 </td> 1133 <td style="text-align:right;"> NA </td> 1134 <td style="text-align:right;"> 1 </td> 1135 <td style="text-align:right;"> NA </td> 1136 <td style="text-align:right;"> 1 </td> 1137 <td style="text-align:right;"> 4 </td> 1138 <td style="text-align:right;"> 0 </td> 1139 <td style="text-align:right;"> 3 </td> 1140 </tr> 1141 <tr> 1142 <td style="text-align:left;"> TQRMNOPXUHLMKUCDEGOIH00706727 </td> 1143 <td style="text-align:right;"> 2022 </td> 1144 <td style="text-align:right;"> 3 </td> 1145 <td style="text-align:right;"> 1 </td> 1146 <td style="text-align:right;"> 1 </td> 1147 <td style="text-align:right;"> 1 </td> 1148 <td style="text-align:right;"> 40 </td> 1149 <td style="text-align:left;"> N </td> 1150 <td style="text-align:right;"> 18 </td> 1151 <td style="text-align:right;"> 275 </td> 1152 <td style="text-align:right;"> 1 </td> 1153 <td style="text-align:right;"> 1 </td> 1154 <td style="text-align:left;"> 03/03/1983 </td> 1155 <td style="text-align:right;"> 39 </td> 1156 <td style="text-align:right;"> 2 </td> 1157 <td style="text-align:right;"> 1 </td> 1158 <td style="text-align:right;"> 1 </td> 1159 <td style="text-align:right;"> 2 </td> 1160 <td style="text-align:right;"> 0 </td> 1161 <td style="text-align:right;"> 4 </td> 1162 <td style="text-align:right;"> 1 </td> 1163 <td style="text-align:right;"> NA </td> 1164 <td style="text-align:right;"> 3 </td> 1165 <td style="text-align:right;"> 54 </td> 1166 <td style="text-align:right;"> 1 </td> 1167 <td style="text-align:right;"> NA </td> 1168 <td style="text-align:right;"> 4 </td> 1169 <td style="text-align:right;"> 1 </td> 1170 <td style="text-align:right;"> 3 </td> 1171 <td style="text-align:right;"> 0 </td> 1172 </tr> 1173 <tr> 1174 <td style="text-align:left;"> TQRMNOPXUHLMKUCDEGOIH00706727 </td> 1175 <td style="text-align:right;"> 2022 </td> 1176 <td style="text-align:right;"> 3 </td> 1177 <td style="text-align:right;"> 1 </td> 1178 <td style="text-align:right;"> 2 </td> 1179 <td style="text-align:right;"> 1 </td> 1180 <td style="text-align:right;"> 40 </td> 1181 <td style="text-align:left;"> N </td> 1182 <td style="text-align:right;"> 18 </td> 1183 <td style="text-align:right;"> 275 </td> 1184 <td style="text-align:right;"> 2 </td> 1185 <td style="text-align:right;"> 2 </td> 1186 <td style="text-align:left;"> 26/08/1985 </td> 1187 <td style="text-align:right;"> 37 </td> 1188 <td style="text-align:right;"> 2 </td> 1189 <td style="text-align:right;"> 1 </td> 1190 <td style="text-align:right;"> 1 </td> 1191 <td style="text-align:right;"> 2 </td> 1192 <td style="text-align:right;"> 0 </td> 1193 <td style="text-align:right;"> 4 </td> 1194 <td style="text-align:right;"> 1 </td> 1195 <td style="text-align:right;"> NA </td> 1196 <td style="text-align:right;"> 3 </td> 1197 <td style="text-align:right;"> 54 </td> 1198 <td style="text-align:right;"> 1 </td> 1199 <td style="text-align:right;"> NA </td> 1200 <td style="text-align:right;"> 4 </td> 1201 <td style="text-align:right;"> 3 </td> 1202 <td style="text-align:right;"> 0 </td> 1203 <td style="text-align:right;"> 4 </td> 1204 </tr> 1205 <tr> 1206 <td style="text-align:left;"> TQRMNOPXUHLMKUCDEGOIH00706727 </td> 1207 <td style="text-align:right;"> 2022 </td> 1208 <td style="text-align:right;"> 3 </td> 1209 <td style="text-align:right;"> 1 </td> 1210 <td style="text-align:right;"> 3 </td> 1211 <td style="text-align:right;"> 1 </td> 1212 <td style="text-align:right;"> 40 </td> 1213 <td style="text-align:left;"> N </td> 1214 <td style="text-align:right;"> 18 </td> 1215 <td style="text-align:right;"> 275 </td> 1216 <td style="text-align:right;"> 3 </td> 1217 <td style="text-align:right;"> 1 </td> 1218 <td style="text-align:left;"> 04/02/2012 </td> 1219 <td style="text-align:right;"> 10 </td> 1220 <td style="text-align:right;"> 5 </td> 1221 <td style="text-align:right;"> 1 </td> 1222 <td style="text-align:right;"> 1 </td> 1223 <td style="text-align:right;"> 1 </td> 1224 <td style="text-align:right;"> 1 </td> 1225 <td style="text-align:right;"> 2 </td> 1226 <td style="text-align:right;"> 2 </td> 1227 <td style="text-align:right;"> 3 </td> 1228 <td style="text-align:right;"> 3 </td> 1229 <td style="text-align:right;"> 54 </td> 1230 <td style="text-align:right;"> 1 </td> 1231 <td style="text-align:right;"> NA </td> 1232 <td style="text-align:right;"> 1 </td> 1233 <td style="text-align:right;"> 3 </td> 1234 <td style="text-align:right;"> 0 </td> 1235 <td style="text-align:right;"> 3 </td> 1236 </tr> 1237 <tr> 1238 <td style="text-align:left;"> TQRMNOPPTHMMLMCDEGIBJ00712052 </td> 1239 <td style="text-align:right;"> 2022 </td> 1240 <td style="text-align:right;"> 3 </td> 1241 <td style="text-align:right;"> 1 </td> 1242 <td style="text-align:right;"> 1 </td> 1243 <td style="text-align:right;"> 1 </td> 1244 <td style="text-align:right;"> 41 </td> 1245 <td style="text-align:left;"> N </td> 1246 <td style="text-align:right;"> 12 </td> 1247 <td style="text-align:right;"> 333 </td> 1248 <td style="text-align:right;"> 1 </td> 1249 <td style="text-align:right;"> 1 </td> 1250 <td style="text-align:left;"> 20/12/1994 </td> 1251 <td style="text-align:right;"> 27 </td> 1252 <td style="text-align:right;"> 1 </td> 1253 <td style="text-align:right;"> 1 </td> 1254 <td style="text-align:right;"> 1 </td> 1255 <td style="text-align:right;"> 2 </td> 1256 <td style="text-align:right;"> 0 </td> 1257 <td style="text-align:right;"> 6 </td> 1258 <td style="text-align:right;"> 1 </td> 1259 <td style="text-align:right;"> NA </td> 1260 <td style="text-align:right;"> 3 </td> 1261 <td style="text-align:right;"> 94 </td> 1262 <td style="text-align:right;"> 1 </td> 1263 <td style="text-align:right;"> NA </td> 1264 <td style="text-align:right;"> 6 </td> 1265 <td style="text-align:right;"> 1 </td> 1266 <td style="text-align:right;"> 3 </td> 1267 <td style="text-align:right;"> 0 </td> 1268 </tr> 1269 <tr> 1270 <td style="text-align:left;"> TQRMNOPPTHMMLMCDEGIBJ00712052 </td> 1271 <td style="text-align:right;"> 2022 </td> 1272 <td style="text-align:right;"> 3 </td> 1273 <td style="text-align:right;"> 1 </td> 1274 <td style="text-align:right;"> 2 </td> 1275 <td style="text-align:right;"> 1 </td> 1276 <td style="text-align:right;"> 41 </td> 1277 <td style="text-align:left;"> N </td> 1278 <td style="text-align:right;"> 12 </td> 1279 <td style="text-align:right;"> 333 </td> 1280 <td style="text-align:right;"> 2 </td> 1281 <td style="text-align:right;"> 2 </td> 1282 <td style="text-align:left;"> 29/11/1993 </td> 1283 <td style="text-align:right;"> 28 </td> 1284 <td style="text-align:right;"> 1 </td> 1285 <td style="text-align:right;"> 1 </td> 1286 <td style="text-align:right;"> 1 </td> 1287 <td style="text-align:right;"> 2 </td> 1288 <td style="text-align:right;"> 0 </td> 1289 <td style="text-align:right;"> 6 </td> 1290 <td style="text-align:right;"> 2 </td> 1291 <td style="text-align:right;"> 3 </td> 1292 <td style="text-align:right;"> 1 </td> 1293 <td style="text-align:right;"> NA </td> 1294 <td style="text-align:right;"> 1 </td> 1295 <td style="text-align:right;"> NA </td> 1296 <td style="text-align:right;"> 5 </td> 1297 <td style="text-align:right;"> 1 </td> 1298 <td style="text-align:right;"> 3 </td> 1299 <td style="text-align:right;"> 0 </td> 1300 </tr> 1301 <tr> 1302 <td style="text-align:left;"> TQRMNOPPTHMMLMCDEGIBJ00712052 </td> 1303 <td style="text-align:right;"> 2022 </td> 1304 <td style="text-align:right;"> 3 </td> 1305 <td style="text-align:right;"> 1 </td> 1306 <td style="text-align:right;"> 3 </td> 1307 <td style="text-align:right;"> 0 </td> 1308 <td style="text-align:right;"> 41 </td> 1309 <td style="text-align:left;"> N </td> 1310 <td style="text-align:right;"> 12 </td> 1311 <td style="text-align:right;"> 333 </td> 1312 <td style="text-align:right;"> 3 </td> 1313 <td style="text-align:right;"> 2 </td> 1314 <td style="text-align:left;"> 28/11/2014 </td> 1315 <td style="text-align:right;"> 7 </td> 1316 <td style="text-align:right;"> 5 </td> 1317 <td style="text-align:right;"> 1 </td> 1318 <td style="text-align:right;"> 1 </td> 1319 <td style="text-align:right;"> 1 </td> 1320 <td style="text-align:right;"> 1 </td> 1321 <td style="text-align:right;"> 2 </td> 1322 <td style="text-align:right;"> 2 </td> 1323 <td style="text-align:right;"> 1 </td> 1324 <td style="text-align:right;"> 1 </td> 1325 <td style="text-align:right;"> NA </td> 1326 <td style="text-align:right;"> 1 </td> 1327 <td style="text-align:right;"> NA </td> 1328 <td style="text-align:right;"> 1 </td> 1329 <td style="text-align:right;"> 4 </td> 1330 <td style="text-align:right;"> 0 </td> 1331 <td style="text-align:right;"> 3 </td> 1332 </tr> 1333</tbody> 1334</table></div> 1335 1336.foonote[(aquà mostramos solo las primeras 50 filas y 30 columnas)] 1337 1338--- 1339 1340## Manipular datos 1341 1342Ahora trabajemos sobre los datos que cargamos. 1343 1344-- 1345 1346Apliquemos lo que aprendimos y filtremos la base, dejando solo los individuos del aglomerado 18 (Resistencia - Chaco), que no tengan ingreso missing y que sean mujeres 1347 1348-- 1349 1350 1351```r 1352eph_ind[eph_ind$AGLOMERADO==18 & !is.na(eph_ind$IPCF) & eph_ind$CH04==2,] 1353``` 1354 1355--- 1356 1357## Manipular datos 1358 1359Si hacemos esto mismo pero llamndo solo las columnas que nos interesan esas columnas deberÃan tener los valores de la condición que definen este subgrupo. 1360 1361 1362 1363```r 1364eph_ind[eph_ind$AGLOMERADO==18 & !is.na(eph_ind$IPCF) & eph_ind$CH04==2, c("AGLOMERADO",
1364"IPCF", "CH04")] 1365``` 1366 1367 1368 1369``` 1370## AGLOMERADO IPCF CH04 1371## 21 18 26666.67 2 1372## 119 18 20500.00 2 1373## 125 18 31540.00 2 1374## 126 18 31540.00 2 1375## 128 18 31540.00 2 1376## 146 18 39357.14 2 1377## 147 18 39357.14 2 1378## 151 18 39357.14 2 1379## 291 18 11300.00 2 1380## 292 18 11300.00 2 1381## 294 18 11300.00 2 1382## 440 18 11666.67 2 1383## 441 18 11666.67 2 1384## 444 18 11666.67 2 1385## 464 18 29083.33 2 1386## 466 18 29083.33 2 1387## 468 18 29083.33 2 1388## 469 18 29083.33 2 1389## 983 18 8850.00 2 1390## 985 18 8850.00 2 1391## 986 18 8850.00 2 1392## 997 18 31583.33 2 1393## 999 18 31583.33 2 1394## 1000 18 31583.33 2 1395## 1487 18 35900.00 2 1396## 1492 18 35900.00 2 1397## 1493 18 35900.00 2 1398## 1549 18 35900.00 2 1399## 1630 18 45000.00 2 1400## 1766 18 64700.00 2 1401## 1977 18 35000.00 2 1402## 2138 18 14750.00 2 1403## 2139 18 110000.00 2 1404## 2145 18 25000.00 2 1405## 2147 18 25000.00 2 1406## 2360 18 0.00 2 1407## 2379 18 30000.00 2 1408## 2420 18 24250.00 2 1409## 2506 18 23333.33 2 1410## 2508 18 23333.33 2 1411## 2957 18 19258.33 2 1412## 2959 18 19258.33 2 1413## 2960 18 19258.33 2 1414## 2961 18 19258.33 2 1415## 3037 18 9400.00 2 1416## 3074 18 100833.33 2 1417## 3077 18 30140.00 2 1418## 3079 18 30140.00 2 1419## 3080 18 30140.00 2 1420## 3081 18 27200.00 2 1421## 3137 18 27200.00 2 1422## 3138 18 27200.00 2 1423## 3169 18 57500.00 2 1424## 3660 18 24900.00 2 1425## 3703 18 27600.00 2 1426## 3704 18 27600.00 2 1427## 3705 18 27600.00 2 1428## 3735 18 76000.00 2 1429## 3736 18 76000.00 2 1430## 4248 18 20050.00 2 1431## 4249 18 20050.00 2 1432## 4256 18 33566.67 2 1433## 4258 18 33566.67 2 1434## 4260 18 17600.00 2 1435## 4261 18 17600.00 2 1436## 4314 18 17600.00 2 1437## 4315 18 17600.00 2 1438## 4418 18 43250.00 2 1439## 4419 18 43250.00 2 1440## 4421 18 43250.00 2 1441## 4477 18 20225.00 2 1442## 4633 18 26666.67 2 1443## 4634 18 26666.67 2 1444## 4635 18 26666.67 2 1445## 4804 18 102000.00 2 1446## 4899 18 38625.00 2 1447## 4900 18 38625.00 2 1448## 4955 18 38625.00 2 1449## 4962 18 37833.33 2 1450## 4963 18 37833.33 2 1451## 4964 18 37833.33 2 1452## 4965 18 37833.33 2 1453## 5035 18 80000.00 2 1454## 5526 18 77000.00 2 1455## 5567 18 24454.55 2 1456## 5615 18 70000.00 2 1457## 5622 18 24325.00 2 1458## 5626 18 24454.55 2 1459## 5627 18 24454.55 2 1460## 5668 18 55375.00 2 1461## 5670 18 55375.00 2 1462## 5677 18 24325.00 2 1463## 5739 18 36750.00 2 1464## 5740 18 36750.00 2 1465## 5741 18 36750.00 2 1466## 5753 18 83333.33 2 1467## 5754 18 83333.33 2 1468## 6022 18 28000.00 2 1469## 6024 18 28000.00 2 1470## 6026 18 28000.00 2 1471## 6509 18 22750.00 2 1472## 6620 18 64666.67 2 1473## 6634 18 20000.00 2 1474## 6701 18 57500.00 2 1475## 6830 18 0.00 2 1476## 6831 18 0.00 2 1477## 6832 18 0.00 2 1478## 6836 18 0.00 2 1479## 6837 18 0.00 2 1480## 7178 18 52500.00 2 1481## 7188 18 25900.00 2 1482## 7189 18 25900.00 2 1483## 7190 18 25900.00 2 1484## 7205 18 100000.00 2 1485## 7318 18 20000.00 2 1486## 7320 18 20000.00 2 1487## 7345 18 17750.00 2 1488## 7346 18 17750.00 2 1489## 7605 18 23975.00 2 1490## 7608 18 23975.00 2 1491## 7610 18 108000.00 2 1492## 7611 18 108000.00 2 1493## 7746 18 30000.00 2 1494## 7747 18 30000.00 2 1495## 7748 18 30000.00 2 1496## 7765 18 52500.00 2 1497## 7884 18 108000.00 2 1498## 7886 18 23750.00 2 1499## 7887 18 23750.00 2 1500## 7967 18 52500.00 2 1501## 7969 18 52500.00 2 1502## 8245 18 35666.67 2 1503## 8493 18 27000.00 2 1504## 8537 18 30000.00 2 1505## 8538 18 30000.00 2 1506## 8826 18 38000.00 2 1507## 8832 18 26000.00 2 1508## 8834 18 26000.00 2 1509## 8841 18 82500.00 2 1510## 8845 18 20050.00 2 1511## 8937 18 12250.00 2 1512## 8938 18 12250.00 2
1513## 9125 18 21000.00 2 1514## 9127 18 21000.00 2 1515## 9221 18 28333.33 2 1516## 9222 18 28333.33 2 1517## 9227 18 20000.00 2 1518## 9229 18 20000.00 2 1519## 9231 18 20000.00 2 1520## 9233 18 28000.00 2 1521## 9235 18 28000.00 2 1522## 10109 18 14950.00 2 1523## 10110 18 14950.00 2 1524## 10215 18 32300.00 2 1525## 10435 18 26333.33 2 1526## 10436 18 26333.33 2 1527## 10635 18 90000.00 2 1528## 10661 18 15000.00 2 1529## 10800 18 29400.00 2 1530## 10819 18 29900.00 2 1531## 10822 18 29900.00 2 1532## 10823 18 29900.00 2 1533## 11029 18 90000.00 2 1534## 11116 18 90000.00 2 1535## 11117 18 90000.00 2 1536## 11141 18 10833.33 2 1537## 11144 18 10833.33 2 1538## 11145 18 10833.33 2 1539## 11146 18 10833.33 2 1540## 11224 18 39375.00 2 1541## 11315 18 39375.00 2 1542## 11406 18 137500.00 2 1543## 11407 18 137500.00 2 1544## 11463 18 31866.67 2 1545## 11603 18 43125.00 2 1546## 11604 18 43125.00 2 1547## 11834 18 55000.00 2 1548## 11853 18 33750.00 2 1549## 12157 18 60375.00 2 1550## 12159 18 60375.00 2 1551## 12277 18 49500.00 2 1552## 12310 18 96000.00 2 1553## 12366 18 25571.43 2 1554## 12370 18 25571.43 2 1555## 12371 18 25571.43 2 1556## 12372 18 25571.43 2 1557## 12699 18 30750.00 2 1558## 12722 18 9500.00 2 1559## 12723 18 9500.00 2 1560## 12725 18 9500.00 2 1561## 12903 18 23625.00 2 1562## 12904 18 23625.00 2 1563## 12905 18 23625.00 2 1564## 13039 18 22112.50 2 1565## 13041 18 22112.50 2 1566## 13042 18 22112.50 2 1567## 13064 18 83500.00 2 1568## 13173 18 70000.00 2 1569## 13174 18 70000.00 2 1570## 13236 18 21600.00 2 1571## 13238 18 21600.00 2 1572## 13308 18 150000.00 2 1573## 13401 18 3400.00 2 1574## 13461 18 18690.00 2 1575## 13463 18 18690.00 2 1576## 13516 18 35500.00 2 1577## 13518 18 35500.00 2 1578## 13734 18 18690.00 2 1579## 13737 18 18690.00 2 1580## 13850 18 27500.00 2 1581## 13851 18 27500.00 2 1582## 13852 18 27500.00 2 1583## 13916 18 0.00 2 1584## 13917 18 0.00 2 1585## 13918 18 0.00 2 1586## 13919 18 0.00 2 1587## 14127 18 61875.00 2 1588## 14129 18 61875.00 2 1589## 14186 18 61666.67 2 1590## 14188 18 61666.67 2 1591## 14236 18 37750.00 2 1592## 14265 18 52500.00 2 1593## 14287 18 26166.67 2 1594## 14289 18 26166.67 2 1595## 14291 18 26166.67 2 1596## 14346 18 58125.00 2 1597## 14348 18 58125.00 2 1598## 14574 18 234166.67 2 1599## 14649 18 16400.00 2 1600## 14650 18 16400.00 2 1601## 14651 18 16400.00 2 1602## 14652 18 16400.00 2 1603## 14653 18 16400.00 2 1604## 14744 18 54500.00 2 1605## 14745 18 54500.00 2 1606## 14746 18 54500.00 2 1607## 14821 18 47600.00 2 1608## 14904 18 30000.00 2 1609## 14905 18 30000.00 2 1610## 14906 18 30000.00 2 1611## 15075 18 47875.00 2 1612## 15076 18 47875.00 2 1613## 15078 18 47875.00 2 1614## 15086 18 117500.00 2 1615## 15172 18 89000.00 2 1616## 15316 18 16250.00 2 1617## 15445 18 21425.00 2 1618## 15447 18 21425.00 2 1619## 15585 18 16250.00 2 1620## 15951 18 14833.33 2 1621## 15952 18 14833.33 2 1622## 15953 18 14833.33 2 1623## 16112 18 24666.67 2 1624## 16228 18 13583.33 2 1625## 16230 18 13583.33 2 1626## 16231 18 13583.33 2 1627## 16232 18 13583.33 2 1628## 16234 18 49500.00 2 1629## 16499 18 36750.00 2 1630## 16501 18 36750.00 2 1631## 16502 18 82416.67 2 1632## 16551 18 17833.33 2 1633## 16552 18 17833.33 2 1634## 16553 18 17833.33 2 1635## 16555 18 65000.00 2 1636## 16565 18 33666.67 2 1637## 16854 18 34900.00 2 1638## 16856 18 34900.00 2 1639## 16858 18 34900.00 2 1640## 16860 18 12000.00 2 1641## 16861 18 12000.00 2 1642## 16862 18 12000.00 2 1643## 16863 18 12000.00 2 1644## 17045 18 63000.00 2 1645## 17083 18 37950.00 2 1646## 17084 18 37950.00 2 1647## 17112 18 41000.00 2 1648## 17289 18 17333.33 2 1649## 17291 18 17333.33 2 1650## 17327 18 24825.00 2 1651## 17328 18 24825.00 2 1652## 17531 18 34000.00 2 1653## 17532 18 34000.00 2 1654## 17533 18 34000.00 2 1655## 17534 18 34000.00 2 1656## 17548 18 31983.33 2 1657## 17549 18 31983.33 2 1658## 17553 18 31983.33 2 1659## 17601 18 22750.00 2 1660## 17642 18 79000.00 2 1661## 17643 18 79000.00 2 1662## 17648 18 55500.00 2 1663## 17771 18 17000.00 2 1664## 17773 18 17000.00 2 1665## 17789 18 70583.33 2 1666## 17790 18 70583.33 2 1667## 17929 18 26833.33 2 1668## 18036 18 33833.33 2 1669## 18037 18 33833.33 2 1670## 18082 18 48750.00 2 1671## 18135 18 26000.00 2 1672## 18149 18 41666.67 2 1673## 18204 18 30000.00 2 1674## 18205 18 30000.00 2 1675## 18223 18 0.00 2 1676## 18227 18 11625.00 2 1677## 18404 18 26000.00 2 1678## 18405 18 26000.00 2 1679## 18413 18 38333.33 2 1680## 18633 18 44166.67 2 1681## 18634 18 44166.67 2 1682## 18645 18 46500.00 2 1683## 18646 18 46500.00 2 1684## 18648 18 46500.00 2 1685## 18797 18 60000.00 2 1686## 18798 18 60000.00 2 1687## 18840 18 27500.00 2 1688## 18843 18 27500.00 2 1689## 19064 18 33800.00 2 1690## 19065 18 33800.00 2 1691## 19071 18 45833.33 2 1692## 19074 18 45833.33 2 1693## 19128 18 75000.00 2 1694## 19317 18 18000.00 2 1695## 19320 18 18000.00 2 1696## 19321 18 18000.00 2 1697## 19322 18 18000.00 2 1698## 19481 18 120000.00 2 1699## 19503 18 45000.00 2 1700## 19504 18 45000.00 2 1701## 19707 18 72500.00 2 1702## 20016 18 17875.00 2 1703## 20017 18 17875.00 2 1704## 20077 18 17300.00 2 1705## 20151 18 41250.00 2 1706## 20152 18 41250.00 2 1707## 20303 18 31250.00 2 1708## 20306 18 31250.00 2 1709## 20308 18 31250.00 2 1710## 20309 18 31250.00 2 1711## 20347 18 17300.00 2 1712## 20348 18 17300.00 2 1713## 20353 18 36500.00 2 1714## 20361 18 55500.00 2 1715## 20756 18 112333.33 2 1716## 20770 18 131000.00 2 1717## 20779 18 17850.00 2 1718## 20781 18 17850.00 2 1719## 20784 18 17850.00 2 1720## 20785 18 17850.00 2 1721## 20787 18 17850.00 2 1722## 21176 18 6900.00 2 1723## 21179 18 6900.00 2 1724## 21180 18 6900.00 2 1725## 21439 18 33500.00 2 1726## 21440 18 33500.00 2 1727## 21441 18 33500.00 2 1728## 21524 18 25000.00 2 1729## 21525 18 25000.00 2 1730## 21791 18 40000.00 2 1731## 21793 18 52333.33 2 1732## 21926 18 97500.00 2 1733## 21947 18 35000.00 2 1734## 21948 18 35000.00 2 1735## 22098 18 18280.00 2 1736## 22099 18 18280.00 2 1737## 22100 18 18280.00 2 1738## 22101 18 18280.00 2 1739## 22676 18 17333.33 2 1740## 22761 18 30000.00 2 1741## 23630 18 26333.33 2 1742## 23631 18 26333.33 2 1743## 23775 18 0.00 2 1744## 23777 18 0.00 2 1745## 24205 18 13983.33 2 1746## 24206 18 13983.33 2 1747## 24209 18 13983.33 2 1748## 24210 18 13983.33 2 1749## 24321 18 37333.33 2 1750## 24322 18 37333.33 2 1751## 24323 18 37333.33 2 1752## 24579 18 68500.00 2 1753## 24635 18 19000.00 2 1754## 24636 18 19000.00 2 1755## 24638 18 19000.00 2 1756## 24753 18 36000.00 2 1757## 24924 18 14000.00 2 1758## 24980 18 70000.00 2 1759## 25030 18 44000.00 2 1760## 25167 18 24333.33 2 1761## 25169 18 24333.33 2 1762## 25387 18 11500.00 2 1763## 25389 18 11500.00 2 1764## 25407 18 27812.50 2 1765## 25409 18 27812.50 2
1766## 25498 18 187500.00 2 1767## 25684 18 27812.50 2 1768## 25794 18 15000.00 2 1769## 25796 18 11800.00 2 1770## 25797 18 11800.00 2 1771## 25798 18 11800.00 2 1772## 25799 18 11800.00 2 1773## 25926 18 19166.67 2 1774## 25929 18 19166.67 2 1775## 26042 18 43750.00 2 1776## 26043 18 43750.00 2 1777## 26044 18 43750.00 2 1778## 26051 18 20000.00 2 1779## 26286 18 15000.00 2 1780## 26288 18 15000.00 2 1781## 26289 18 15000.00 2 1782## 26317 18 92000.00 2 1783## 26324 18 16250.00 2 1784## 26601 18 39000.00 2 1785## 26603 18 39000.00 2 1786## 26614 18 62900.00 2 1787## 26720 18 35000.00 2 1788## 26722 18 35000.00 2 1789## 26747 18 26583.33 2 1790## 26750 18 26583.33 2 1791## 26759 18 21600.00 2 1792## 26855 18 11877.78 2 1793## 26857 18 11877.78 2 1794## 26859 18 11877.78 2 1795## 26861 18 11877.78 2 1796## 26862 18 11877.78 2 1797## 27013 18 23928.57 2 1798## 27016 18 23928.57 2 1799## 27147 18 50150.00 2 1800## 27149 18 50150.00 2 1801## 27160 18 56900.00 2 1802## 27162 18 56900.00 2 1803## 27163 18 56900.00 2 1804## 27169 18 26750.00 2 1805## 27248 18 16800.00 2 1806## 27249 18 16800.00 2 1807## 27250 18 16800.00 2 1808## 27251 18 16800.00 2 1809## 27264 18 20666.67 2 1810## 27265 18 20666.67 2 1811## 27435 18 26750.00 2 1812## 27542 18 11900.00 2 1813## 27543 18 11900.00 2 1814## 27545 18 11900.00 2 1815## 27579 18 17500.00 2 1816## 27580 18 17500.00 2 1817## 27581 18 17500.00 2 1818## 27582 18 17500.00 2 1819## 27583 18 17500.00 2 1820## 27893 18 20000.00 2 1821## 27894 18 20000.00 2 1822## 27919 18 11666.67 2 1823## 27920 18 11666.67 2 1824## 27922 18 11666.67 2 1825## 28158 18 33333.33 2 1826## 28163 18 0.00 2 1827## 28199 18 56500.00 2 1828## 28200 18 56500.00 2 1829## 28316 18 17750.00 2 1830## 28317 18 17750.00 2 1831## 28318 18 17750.00 2 1832## 28433 18 0.00 2 1833## 28565 18 17400.00 2 1834## 28581 18 21100.00 2 1835## 28583 18 21100.00 2 1836## 28585 18 21100.00 2 1837## 28658 18 12500.00 2 1838## 28659 18 12500.00 2 1839## 28696 18 11600.00 2 1840## 28698 18 11600.00 2 1841## 28699 18 11600.00 2 1842## 28816 18 39000.00 2 1843## 29052 18 65000.00 2 1844## 29053 18 65000.00 2 1845## 29219 18 20000.00 2 1846## 29221 18 20000.00 2 1847## 29222 18 20000.00 2 1848## 29285 18 27750.00 2 1849## 29366 18 25125.00 2 1850## 29367 18 25125.00 2 1851## 29481 18 12900.00 2 1852## 29484 18 12900.00 2 1853## 29511 18 17833.33 2 1854## 29544 18 48500.00 2 1855## 29549 18 23060.00 2 1856## 29550 18 23060.00 2 1857## 29553 18 23060.00 2 1858## 29606 18 0.00 2 1859## 29638 18 25125.00 2 1860## 29679 18 45000.00 2 1861## 29690 18 23333.33 2 1862## 29785 18 17833.33 2 1863## 29786 18 17833.33 2 1864## 29787 18 12262.50 2 1865## 29792 18 12262.50 2 1866## 29796 18 60000.00 2 1867## 29993 18 151000.00 2 1868## 30059 18 35000.00 2 1869## 30060 18 35000.00 2 1870## 30143 18 40000.00 2 1871## 30144 18 40000.00 2 1872## 30184 18 13250.00 2 1873## 30185 18 13250.00 2 1874## 30204 18 22100.00 2 1875## 30205 18 22100.00 2 1876## 30207 18 22100.00 2 1877## 30215 18 40333.33 2 1878## 30216 18 40333.33 2 1879## 30470 18 17420.00 2 1880## 30473 18 17420.00 2 1881## 30544 18 19100.00 2 1882## 30545 18 19100.00 2 1883## 30546 18 19100.00 2 1884## 30604 18 19100.00 2 1885## 30607 18 19100.00 2 1886## 30613 18 33000.00 2 1887## 30614 18 33000.00 2 1888## 30633 18 35625.00 2 1889## 30789 18 68050.00 2 1890## 30790 18 68050.00 2 1891## 30791 18 68050.00 2 1892## 31007 18 16666.67 2 1893## 31210 18 36000.00 2 1894## 31212 18 25450.00 2 1895## 31232 18 13666.67 2 1896## 31233 18 13666.67 2 1897## 31234 18 13666.67 2 1898## 31243 18 16200.00 2 1899## 31245 18 16200.00 2 1900## 31458 18 9750.00 2 1901## 31459 18 9750.00 2 1902## 31461 18 9750.00 2 1903## 31485 18 13000.00 2 1904## 31487 18 13000.00 2 1905## 31492 18 35750.00 2 1906## 31615 18 45966.67 2 1907## 32001 18 17000.00 2 1908## 32270 18 17000.00 2 1909## 32420 18 13214.29 2 1910## 32425 18 13214.29 2 1911## 32426 18 13214.29 2 1912## 32529 18 24325.00 2 1913## 32531 18 24325.00 2 1914## 32532 18 24325.00 2 1915## 32703 18 25333.33 2 1916## 32717 18 24125.00 2 1917## 32718 18 24125.00 2 1918## 32894 18 4875.00 2 1919## 32895 18 4875.00 2 1920## 32896 18 4875.00 2 1921## 32897 18 4875.00 2 1922## 32992 18 11200.00 2 1923## 32994 18 11200.00 2 1924## 32996 18 11200.00 2 1925## 33271 18 13400.00 2 1926## 33272 18 13400.00 2 1927## 33542 18 13400.00 2 1928## 33544 18 13400.00 2 1929## 33708 18 36250.00 2 1930## 33709 18 36250.00 2 1931## 33710 18 36250.00 2 1932## 33714 18 34000.00 2 1933## 33716 18 34000.00 2 1934## 33717 18 43000.00 2 1935## 33820 18 75000.00 2 1936## 33821 18 75000.00 2 1937## 33864 18 35250.00 2 1938## 33865 18 35250.00 2 1939## 33867 18 35250.00 2 1940## 33987 18 43000.00 2 1941## 34163 18 13333.33 2 1942## 34199 18 138333.33 2 1943## 34220 18 14833.33 2 1944## 34234 18 19875.00 2 1945## 34235 18 35000.00 2 1946## 34238 18 97500.00 2 1947## 34302 18 30966.67 2 1948## 34436 18 42500.00 2 1949## 34438 18 42500.00 2 1950## 34501 18 19875.00 2 1951## 34573 18 50000.00 2 1952## 34717 18 20166.67 2 1953## 34718 18 20166.67 2 1954## 34720 18 20166.67 2 1955## 34721 18 20166.67 2 1956## 34770 18 42666.67 2 1957## 34771 18 42666.67 2 1958## 34772 18 42666.67 2 1959## 34823 18 41000.00 2 1960## 34824 18 41000.00 2 1961## 34871 18 51000.00 2 1962## 34993 18 22000.00 2 1963## 34996 18 22000.00 2 1964## 34997 18 22000.00 2 1965## 35474 18 52000.00 2 1966## 35475 18 52000.00 2 1967## 35556 18 36746.67 2 1968## 35557 18 36746.67 2 1969## 35566 18 98000.00 2 1970## 35624 18 22500.00 2 1971## 35625 18 22500.00 2 1972## 35788 18 31500.00 2 1973## 35806 18 28000.00 2 1974## 35877 18 33000.00 2 1975## 35878 18 33000.00 2 1976## 35879 18 33000.00 2 1977## 35891 18 90000.00 2 1978## 35901 18 45000.00 2 1979## 36010 18 26133.33 2 1980## 36015 18 26133.33 2 1981## 36016 18 26133.33 2 1982## 36020 18 42675.00 2 1983## 36058 18 31500.00 2 1984## 36075 18 28000.00 2 1985## 36286 18 42675.00 2 1986## 36336 18 17600.00 2 1987## 36338 18 17600.00 2 1988## 36352 18 137000.00 2 1989## 36496 18 23900.00 2 1990## 36512 18 21333.33 2 1991## 36594 18 27700.00 2 1992## 36596 18 27700.00 2 1993## 36598 18 27700.00 2 1994## 36608 18 17600.00 2 1995## 36676 18 18250.00 2 1996## 36683 18 35000.00 2 1997## 36684 18 35000.00 2 1998## 36901 18 25333.33 2 1999## 36913 18 31666.67 2 2000## 36914 18 31666.67 2 2001## 36920 18 30000.00 2 2002## 36946 18 18250.00 2 2003## 36998 18 37800.00 2 2004## 37054 18 21000.00 2 2005## 37055 18 21000.00 2 2006## 37165 18 30500.00 2 2007## 37168 18 30500.00 2 2008## 37251 18 11833.33 2 2009## 37254 18 45625.00 2 2010## 37255 18 45625.00 2 2011## 37411 18 14250.00 2 2012## 37413 18 14250.00 2 2013## 37422 18 13642.86 2 2014## 37432 18 17250.00 2 2015## 37433 18 17250.00 2 2016## 37434 18 17250.00 2 2017## 37439 18 10166.67 2 2018## 37441 18 10166.67 2 2019## 37442 18 10166.67 2 2020## 37444 18 10166.67 2 2021## 37445 18 10166.67 2 2022## 37465 18 34700.00 2 2023## 37488 18 30000.00 2 2024## 37578 18 35833.33 2 2025## 37579 18 35833.33 2 2026## 37606 18 20720.00 2 2027## 37607 18 20720.00 2 2028## 37609 18 20720.00 2 2029## 37696 18 80000.00 2 2030## 37698 18 80000.00 2 2031## 37711 18 10166.67 2 2032## 37712 18 10166.67 2 2033## 37944 18 85000.00 2 2034## 38026 18 23875.00 2 2035## 38027 18 23875.00 2 2036## 38029 18 23875.00 2 2037## 38216 18 20000.00 2 2038## 38217 18 20000.00 2 2039## 38225 18 58000.00 2 2040## 38303 18 13750.00 2 2041## 38305 18 13750.00 2 2042## 38306 18 13750.00 2 2043## 38499 18 40000.00 2 2044## 38502 18 53000.00 2 2045## 38597 18 62500.00 2 2046## 38655 18 18333.33 2 2047## 38718 18 21360.00 2 2048## 38719 18 21360.00 2 2049## 38721 18 21360.00 2 2050## 38819 18 36000.00 2 2051## 38821 18 36000.00 2 2052## 39006 18 31850.00 2 2053## 39036 18 24516.67 2 2054## 39038 18 24516.67 2 2055## 39039 18 24516.67 2 2056## 39040 18 24516.67 2 2057## 39041 18 24516.67 2 2058## 39172 18 112500.00 2 2059## 39313 18 47500.00 2 2060## 39527 18 66250.00 2 2061## 39529 18 66250.00 2
2062## 39644 18 20083.33 2 2063## 39645 18 20083.33 2 2064## 39648 18 20083.33 2 2065## 39682 18 35000.00 2 2066## 39901 18 22500.00 2 2067## 39903 18 22500.00 2 2068## 39904 18 22500.00 2 2069## 39980 18 44333.33 2 2070## 40052 18 52350.00 2 2071## 40149 18 18500.00 2 2072## 40150 18 18500.00 2 2073## 40151 18 18500.00 2 2074## 40152 18 18500.00 2 2075## 40294 18 40000.00 2 2076## 40296 18 40000.00 2 2077## 40298 18 33766.67 2 2078## 40300 18 33766.67 2 2079## 40302 18 33766.67 2 2080## 40429 18 14666.67 2 2081## 40580 18 26320.00 2 2082## 40581 18 26320.00 2 2083## 40695 18 14666.67 2 2084## 40700 18 29400.00 2 2085## 40702 18 29400.00 2 2086## 40703 18 29400.00 2 2087## 40811 18 16000.00 2 2088## 40892 18 17750.00 2 2089## 40893 18 17750.00 2 2090## 40894 18 17750.00 2 2091## 40895 18 17750.00 2 2092## 41099 18 35000.00 2 2093## 41101 18 35000.00 2 2094## 41440 18 71500.00 2 2095## 41493 18 47500.00 2 2096## 41494 18 47500.00 2 2097## 41495 18 47500.00 2 2098## 41718 18 25250.00 2 2099## 42116 18 36666.67 2 2100## 42117 18 36666.67 2 2101## 42146 18 120000.00 2 2102## 42151 18 22500.00 2 2103## 42157 18 49000.00 2 2104## 42407 18 32500.00 2 2105## 42427 18 49000.00 2 2106## 42491 18 33500.00 2 2107## 42520 18 46375.00 2 2108## 42527 18 25175.00 2 2109## 42530 18 25175.00 2 2110## 42772 18 57900.00 2 2111## 42773 18 57900.00 2 2112## 42827 18 92700.00 2 2113## 43105 18 21880.00 2 2114## 43107 18 21880.00 2 2115## 43211 18 32250.00 2 2116## 43212 18 32250.00 2 2117## 43408 18 17000.00 2 2118## 43409 18 17000.00 2 2119## 43411 18 17000.00 2 2120## 43488 18 16071.43 2 2121## 43489 18 16071.43 2 2122## 43490 18 16071.43 2 2123## 43492 18 16071.43 2 2124## 43493 18 16071.43 2 2125## 43578 18 23333.33 2 2126## 43785 18 13777.78 2 2127## 43789 18 13777.78 2 2128## 43795 18 31000.00 2 2129## 43798 18 31000.00 2 2130## 43823 18 42900.00 2 2131## 43877 18 17520.00 2 2132## 43878 18 17520.00 2 2133## 43909 18 90000.00 2 2134## 44048 18 75000.00 2 2135## 44050 18 75000.00 2 2136## 44058 18 13777.78 2 2137## 44147 18 17520.00 2 2138## 44148 18 17520.00 2 2139## 44157 18 46666.67 2 2140## 44160 18 15000.00 2 2141## 44161 18 15000.00 2 2142## 44237 18 72750.00 2 2143## 44242 18 21425.00 2 2144## 44243 18 21425.00 2 2145## 44244 18 21425.00 2 2146## 44425 18 9233.33 2 2147## 44426 18 9233.33 2 2148## 44428 18 9233.33 2 2149## 44441 18 20833.33 2 2150## 44443 18 20833.33 2 2151## 45115 18 25666.67 2 2152## 45117 18 25666.67 2 2153## 45119 18 25666.67 2 2154## 45123 18 62000.00 2 2155## 45170 18 30580.00 2 2156## 45171 18 30580.00 2 2157## 45173 18 30580.00 2 2158## 45180 18 23000.00 2 2159## 45405 18 45200.00 2 2160## 45407 18 45200.00 2 2161## 45411 18 21250.00 2 2162## 45413 18 21250.00 2 2163## 45414 18 15400.00 2 2164## 45684 18 15400.00 2 2165## 45685 18 15400.00 2 2166## 45755 18 32800.00 2 2167## 45767 18 24500.00 2 2168## 45769 18 24500.00 2 2169## 45914 18 18000.00 2 2170## 45915 18 18000.00 2 2171## 45916 18 18000.00 2 2172## 45957 18 20833.33 2 2173## 45958 18 20833.33 2 2174## 46052 18 24333.33 2 2175## 46053 18 24333.33 2 2176## 46099 18 11000.00 2 2177## 46101 18 11000.00 2 2178## 46243 18 54400.00 2 2179## 46244 18 54400.00 2 2180## 46673 18 15450.00 2 2181## 46675 18 27500.00 2 2182## 46676 18 27500.00 2 2183## 46791 18 36500.00 2 2184## 47032 18 23300.00 2 2185## 47226 18 14400.00 2 2186## 47227 18 14400.00 2 2187## 47229 18 14400.00 2 2188## 47230 18 14400.00 2 2189## 47301 18 23300.00 2 2190## 47515 18 31500.00 2 2191## 47688 18 48000.00 2 2192## 47818 18 46666.67 2 2193## 47843 18 47000.00 2 2194## 47884 18 10000.00 2 2195## 47887 18 10000.00 2 2196## 47888 18 10000.00 2
2197## 48006 18 24450.00 2 2198## 48007 18 24450.00 2 2199## 48066 18 36000.00 2 2200## 48093 18 14600.00 2 2201## 48106 18 68950.00 2 2202## 48116 18 10425.00 2 2203## 48117 18 10425.00 2 2204## 48119 18 10425.00 2 2205## 48120 18 10425.00 2 2206## 48346 18 24775.00 2 2207## 48347 18 24775.00 2 2208## 48360 18 14600.00 2 2209## 48390 18 8924.00 2 2210## 48393 18 8924.00 2 2211## 48394 18 8924.00 2 2212## 48395 18 8924.00 2 2213## 48590 18 38950.00 2 2214## 48592 18 38950.00 2 2215## 48665 18 8924.00 2 2216## 48666 18 8924.00 2 2217## 48732 18 25750.00 2 2218## 48734 18 25750.00 2 2219## 48735 18 25750.00 2 2220## 48833 18 36000.00 2 2221## 48879 18 14400.00 2 2222## 48881 18 14400.00 2 2223## 49000 18 25750.00 2 2224## 49004 18 25750.00 2 2225## 49116 18 26000.00 2 2226## 49118 18 26000.00 2 2227## 49221 18 27200.00 2 2228## 49222 18 27200.00 2 2229``` 2230 2231 2232De esta forma podemos chequear que filtramos correctamente 2233 2234--- 2235 2236## Manipular datos 2237 2238Ahora calculemos el promedio ponderado de edad **para este subgrupo** con la función `weighted.mean()` 2239 2240 2241```r 2242weighted.mean(eph_ind$CH06[eph_ind$AGLOMERADO==18 & !is.na(eph_ind$IPCF) & eph_ind$CH04==2], na.rm = TRUE) 2243``` 2244 2245``` 2246## [1] 34 2247``` 2248 2249Hicimos un calculo muy simple y ya vemos cómo el código se pone engorroso... 2250 2251-- 2252 2253Qué pasarÃa si quisiéramos agregar mas condiciones, o si necesitamos realizar un calculo por grupo (por hogares por ejemplo) o si a continuación sobre este mismo grupo queremos aplicar otra operación 2254 2255-- 2256 2257Acá es donde entran las funciones, para facilitarnos las cosas 2258 2259 2260--- 2261 2262## Manipular datos 2263 2264Para manipular los datos empleamos la familia de funciones `Tidyverse`, que vendrÃa a ser como una colección de paquetes que tienen en común que nos permiten realizar de manera eficiente un un amplio rango de operaciones. 2265 2266-- 2267 2268Entre los paquetes principales que usaremos están: 2269 2270- `dplry`: funciones con comandos claros para manipular bases 2271 2272- `tidyr`: limpieza y orden de los datos 2273 2274- `stringr`: trabajar sobre strings con múltiples operaciones posibles 2275 2276- `ggplot2`: graficar 2277 2278 2279--- 2280 2281## Manipular datos 2282 2283Como todo paquete para utilizarlo primero hay que instalarlo y luego cargarlo: 2284 2285 2286```r 2287#install.packages("tidyverse") 2288library(tidyverse) 2289``` 2290 2291-- 2292 2293Listo! Veamos ahora ya tenemos disponibles muchas de las principales funciones para trabajar con datos 2294 2295-- 2296 2297Solo nos falta una cosa, conocer cómo se usa y para qué sirve el elemento mas popular de esta librerÃa... 2298-- 2299 **el operador "pipe" ` %>% `** 2300 2301 2302--- 2303 2304## Operador pipe 2305 2306El pipe es fundamental en R. 2307 2308-- 2309 2310¿Por qué? 2311 2312-- 2313 2314Porque permite unir acciones, es decir **aplicar diversas funciones de forma secuencial** sin tener que llamar siempre al dataframe 2315 2316-- 2317 2318El operador pipe tiene la siguiente lógica: 2319 2320-- 2321 2322 - Toma lo que esté a su izquierda 2323-- 2324 2325 - A ese objeto le aplica la función a su derecha 2326 2327-- 2328 2329<p>&nbsp;</p> 2330 2331En la función ya **está implÃcito el df** sobre el que queremos realizar las transformaciones 2332 2333-- 2334 2335Veamos cómo funciona el pipe cuando empezamos a usar las funciones básicas y esenciales para trabajar con datos 2336 2337--- 2338 2339 2340## EL ABC de dplyr 2341 2342En esta clase veremos las funciones básicas y fundamentales del paquete `dplyr` que compone la familia de `Tidyverse`. Estas funciones son como el ABC para el procesamiento de datos 2343 2344- `filter()` 2345 2346- `select()` 2347 2348- `rename()` 2349 2350- `mutate()` 2351 2352- `summarise()` 2353 2354- `group_by()` 2355 2356- `distinct()` 2357 2358- `arrange()` 2359 2360 2361--- 2362 2363## EL ABC de dplyr 2364 2365¿Qué quiero hacer? --> ¿Qué funcion necesito? 2366 2367-- 2368 2369| __Función__ | __Tarea__ | 2370| :-------------| :--------:| 2371| `filter()` | *selecciona filas en base a una condición*| 2372| `select()` | *selecciona columnas (las mantiene o elimina) y también las ordena*| 2373| `mutate()` | *crea columnas nuevas y/o modifica las existentes*| 2374| `rename()` | *renombra las columnas*| 2375| `summarise()` | *convierte al dataframe una tabla resumen en base a distintos cálculos o estimaciones*| 2376| `group_by()` | *agrupa los datos según los valores que puede tomar una columna*| 2377 2378--- 2379 2380## EL ABC de dplyr 2381 2382Veamos paso a paso cada una, y luego veamos cómo concatenar cada una mediante el pipe 2383 2384-- 2385 2386Empecemos: 2387 2388-- 2389 2390- **`filter()`** 2391 2392- `select()` 2393 2394- `rename()` 2395 2396- `mutate()` 2397 2398- `summarise()` 2399 2400- `group_by()` 2401 2402- `distinct()` 2403 2404- `arrange()` 2405 2406 2407 2408--- 2409 2410## Filter() 2411 2412Usemos la opción `filter()` que como su nombre lo indica permite **filtrar las filas** de los datos en base a una condición 2413 2414Esta función me pide dos **argumentos** básicos: 2415- dataframe a transformar 2416- condición a aplicar 2417 2418 2419```r 2420rcia <- filter(eph_ind, AGLOMERADO==18) 2421``` 2422 2423Estamos filtrando filas, quedándonos con observaciones que pertenezcan del aglomerado 18 (Resistencia - Chaco), y guardando ese subconjunto con un nuevo dataframe llamado *"rcia"* 2424 2425--- 2426 2427Para estar seguros de que aplicamos correctamente el filtro podemos generar un tabulado de esa columna con `table()` y ver si hay valores distintos del buscado 2428 2429 2430```r 2431table(rcia$AGLOMERADO) 2432``` 2433 2434``` 2435## 2436## 18 2437## 1640 2438``` 2439 2440 2441-- 2442 2443DeberÃa coincidir con el numero total de filas 2444 2445 2446```r 2447nrow(rcia) 2448``` 2449 2450``` 2451## [1] 1640 2452``` 2453 2454 2455-- 2456 2457Aplicamos correctamente nuestro filtro! 2458 2459 2460--- 2461 2462## Filter() 2463 2464Ahora usemos el pipe: 2465 2466-- 2467 2468 2469```r 2470rcia <- eph_ind %>% 2471 filter(AGLOMERADO==18) 2472``` 2473 2474-- 2475 2476El pipe ` %>% ` toma el **dataframe a la izquierda** y le aplica la **función a la derecha** 2477 2478-- 2479 2480Chequeemos que obtenemos el mismo resultado 2481 2482 2483```r 2484 2485table(rcia$AGLOMERADO) 2486## 2487## 18 2488## 1640 2489nrow(rcia) 2490## [1] 1640 2491``` 2492 2493 2494 2495--- 2496 2497## Filter() 2498 2499Por supuesto que podemos pasarle mas condiciones al filtro 2500 2501Retomemos nuestro ejemplo anterior, dejando solo los individuos del aglomerado 18 y que **además** que no tengan ingreso missing y que sean mujeres 2502 2503-- 2504 2505 2506```r 2507rcia <- eph_ind %>% filter(AGLOMERADO==18 & !is.na(IPCF) & CH04==2) 2508``` 2509 2510-- 2511 2512Notar la diferencia con 2513 2514 2515```r 2516rcia <- eph_ind[eph_ind$AGLOMERADO==18 & !is.na(eph_ind$IPCF) & eph_ind$CH04==2,] 2517``` 2518 2519-- 2520 2521Ya no es necesario llamar al dataframe antes llamar a la columna, el trabajo del pipe es ese, **considerar el dataframe de la izquierda como implÃcito en la operación** 2522 2523 2524--- 2525 2526## Filter() 2527 2528El sÃmbolo *&* implica que ambas condiciones deben cumplirse. Asà como este existen otros que nos permiten escribir las condiciones que necesitemos según el caso: 2529 2530-- 2531 2532| __SÃmbolo__ | __Condición__ | 2533| :------------:| :--------:| 2534| == | *es igual a*| 2535| != | *es distinto a*| 2536| < | *es menor*| 2537| <= | *es menor igual*| 2538| > | *es menor* 2539| >= | *es menor igual* 2540| %in% | *se encuentra en o entre los valores*| 2541| & | *se cumpla una condición y la otra*| 2542| &#124; | *se cumple una condición o la otra*| 2543 2544--- 2545 2546## Filter() 2547 2548Por ejemplo si a las condiciones anteriores quisiéramos agregar que sean personas jóvenes entre 18 y 30 años, escribirÃamos 2549 2550-- 2551 2552 2553```r 2554rcia <- eph_ind %>% 2555 filter(AGLOMERADO==18 & !is.na(IPCF) & CH04==2 & CH06 %in% (18:25)) 2556``` 2557 2558--- 2559 2560Pasemos a otra función 2561 2562 2563- `filter()` 2564 2565- **`select()`** 2566 2567- `rename()` 2568 2569- `mutate()` 2570 2571- `summarise()` 2572 2573- `group_by()` 2574 2575- `distinct()` 2576 2577- `arrange()` 2578 2579--- 2580 2581## Select() 2582 2583Permite seleccionar las columnas de un dataframe y también ordenarlas 2584 2585-- 2586 2587La eph tiene muchas columnas, solo trabajaremos con algunas. Quedemosnos con las siguientes que usaremos 2588 2589 2590```r 2591eph_short <- eph_ind %>% select(CODUSU, NRO_HOGAR, AGLOMERADO, IPCF, CH04) 2592``` 2593 2594-- 2595 2596Ahora solo debemos tener estos nombres en la base 2597 2598 2599 2600```r 2601names(eph_short ) 2602``` 2603 2604``` 2605## [1] "CODUSU" "NRO_HOGAR" "AGLOMERADO" "IPCF" "CH04" 2606``` 2607 2608<p>&nbsp;</p> 2609 2610-- 2611 2612Como hemos visto, también podemos aplicar la función sin el pipe 2613 2614 2615 2616```r 2617eph_short <- select(eph_ind, CODUSU, NRO_HOGAR, AGLOMERADO, IPCF, CH04) 2618``` 2619 2620--- 2621 2622Pero...¿cómo harÃamos si quisiéramos aplicar el `filter()` anterior junto con este `select()`? 2623 2624-- 2625 2626Armemos un data frame que: 2627- contenga las filas que cumplÃan con la condición anterior
2628- que tenga solo las columnas seleccionadas 2629 2630-- 2631 2632 2633```r 2634rcia_short <- eph_ind %>% 2635* filter(AGLOMERADO==18 & !is.na(IPCF) & CH04==2) %>% 2636* select(CODUSU, NRO_HOGAR, AGLOMERADO, IPCF, CH04) 2637``` 2638 2639-- 2640 2641El pipe me permite vincular operaciones generando un flujo donde el punto de partida y llegada es claro, y donde puedo leer fácilmente las operaciones aplicadas en el medio 2642 2643<p>&nbsp;</p> 2644 2645-- 2646 2647 2648```r 2649dim(rcia_short) 2650``` 2651 2652``` 2653## [1] 858 5 2654``` 2655 2656 2657--- 2658 2659Si al principio no resulta tan intuitivo entender las operaciones unidas por el pipe, podemos **cortarlo en partes mas pequeñas** e ir visualizando cada output hasta llegar al final, entendiendo cada paso intermedio 2660 2661-- 2662 2663Luego de varias veces iremos ganando gimnasia en esto. 2664 2665-- 2666 2667Para visualizar más fácilmente lo que ocurre con los datos en este caso, intercambiemos el orden seleccionando primero las columnas con `select()` y luego las filas mediante las condiciones del `filter()` 2668 2669-- 2670 2671Visualicemos **cada paso** del código 2672 2673 2674 2675```r 2676rcia_short <- eph_ind %>% 2677 select(CODUSU, NRO_HOGAR, AGLOMERADO, IPCF, CH04) %>% 2678 filter(AGLOMERADO==18 & !is.na(IPCF) & CH04==2) 2679``` 2680 2681--- 2682 2683.panelset[ 2684 2685.panel[.panel-name[Linea inicial] 2686 2687Empezamos llamando al data frame *eph_ind* que tiene todas las filas y columnas 2688 2689 2690 2691```r 2692*rcia_short <- eph_ind 2693``` 2694 2695<div style="border: 1px solid #ddd; padding: 0px; overflow-y: scroll; height:400px; overflow-x: scroll; width:100%; "><table class="table" style="font-size: 13px; margin-left: auto; margin-right: auto;"> 2696 <thead> 2697 <tr> 2698 <th style="text-align:left;position: sticky; top:0; background-color: #FFFFFF;"> CODUSU </th> 2699 <th style="text-align:right;position: sticky; top:0; background-color: #FFFFFF;"> ANO4 </th> 2700 <th style="text-align:right;position: sticky; top:0; background-color: #FFFFFF;"> TRIMESTRE </th> 2701 <th style="text-align:right;position: sticky; top:0; background-color: #FFFFFF;"> NRO_HOGAR </th> 2702 <th style="text-align:right;position: sticky; top:0; background-color: #FFFFFF;"> COMPONENTE </th> 2703 <th style="text-align:right;position: sticky; top:0; background-color: #FFFFFF;"> H15 </th> 2704 <th style="text-align:right;position: sticky; top:0; background-color: #FFFFFF;"> REGION </th> 2705 <th style="text-align:left;position: sticky; top:0; background-color: #FFFFFF;"> MAS_500 </th> 2706 <th style="text-align:right;position: sticky; top:0; background-color: #FFFFFF;"> AGLOMERADO </th> 2707 <th style="text-align:right;position: sticky; top:0; background-color: #FFFFFF;"> PONDERA </th> 2708 <th style="text-align:right;position: sticky; top:0; background-color: #FFFFFF;"> CH03 </th> 2709 <th style="text-align:right;position: sticky; top:0; background-color: #FFFFFF;"> CH04 </th> 2710 <th style="text-align:left;position: sticky; top:0; background-color: #FFFFFF;"> CH05 </th> 2711 <th style="text-align:right;position: sticky; top:0; background-color: #FFFFFF;"> CH06 </th> 2712 <th style="text-align:right;position: sticky; top:0; background-color: #FFFFFF;"> CH07 </th> 2713 </tr> 2714 </thead> 2715<tbody> 2716 <tr> 2717 <td style="text-align:left;"> TQRMNORVQHJNLTCDEGGFB00788741 </td> 2718 <td style="text-align:right;"> 2022 </td> 2719 <td style="text-align:right;"> 3 </td> 2720 <td style="text-align:right;"> 1 </td> 2721 <td style="text-align:right;"> 1 </td> 2722 <td style="text-align:right;"> 1 </td> 2723 <td style="text-align:right;"> 42 </td> 2724 <td style="text-align:left;"> S </td> 2725 <td style="text-align:right;"> 10 </td> 2726 <td style="text-align:right;"> 537 </td> 2727 <td style="text-align:right;"> 1 </td> 2728 <td style="text-align:right;"> 1 </td> 2729 <td style="text-align:left;"> 10/04/1961 </td> 2730 <td style="text-align:right;"> 61 </td> 2731 <td style="text-align:right;"> 5 </td> 2732 </tr> 2733 <tr> 2734 <td style="text-align:left;"> TQRMNOQSWHKNKRCDEGJBF00789123 </td> 2735 <td style="text-align:right;"> 2022 </td> 2736 <td style="text-align:right;"> 3 </td> 2737 <td style="text-align:right;"> 1 </td> 2738 <td style="text-align:right;"> 1 </td> 2739 <td style="text-align:right;"> 1 </td> 2740 <td style="text-align:right;"> 43 </td> 2741 <td style="text-align:left;"> S </td> 2742 <td style="text-align:right;"> 13 </td> 2743 <td style="text-align:right;"> 543 </td> 2744 <td style="text-align:right;"> 1 </td> 2745 <td style="text-align:right;"> 1 </td> 2746 <td style="text-align:left;"> 06/10/1953 </td> 2747 <td style="text-align:right;"> 68 </td> 2748 <td style="text-align:right;"> 2 </td> 2749 </tr> 2750 <tr> 2751 <td style="text-align:left;"> TQRMNOQSWHKNKRCDEGJBF00789123 </td> 2752 <td style="text-align:right;"> 2022 </td> 2753 <td style="text-align:right;"> 3 </td> 2754 <td style="text-align:right;"> 1 </td> 2755 <td style="text-align:right;"> 2 </td> 2756 <td style="text-align:right;"> 1 </td> 2757 <td style="text-align:right;"> 43 </td> 2758 <td style="text-align:left;"> S </td> 2759 <td style="text-align:right;"> 13 </td> 2760 <td style="text-align:right;"> 543 </td> 2761 <td style="text-align:right;"> 2 </td> 2762 <td style="text-align:right;"> 2 </td> 2763 <td style="text-align:left;"> 28/08/1955 </td> 2764 <td style="text-align:right;"> 66 </td> 2765 <td style="text-align:right;"> 2 </td> 2766 </tr> 2767 <tr> 2768 <td style="text-align:left;"> TQRMNOTSQHLLMLCDEIIAD00703213 </td> 2769 <td style="text-align:right;"> 2022 </td> 2770 <td style="text-align:right;"> 3 </td> 2771 <td style="text-align:right;"> 1 </td> 2772 <td style="text-align:right;"> 1 </td> 2773 <td style="text-align:right;"> 1 </td> 2774 <td style="text-align:right;"> 1 </td> 2775 <td style="text-align:left;"> S </td> 2776 <td style="text-align:right;"> 32 </td> 2777 <td style="text-align:right;"> 894 </td> 2778 <td style="text-align:right;"> 1 </td> 2779 <td style="text-align:right;"> 1 </td> 2780 <td style="text-align:left;"> 10/03/1957 </td> 2781 <td style="text-align:right;"> 65 </td> 2782 <td style="text-align:right;"> 2 </td> 2783 </tr> 2784 <tr> 2785 <td style="text-align:left;"> TQRMNOTSQHLLMLCDEIIAD00703213 </td> 2786 <td style="text-align:right;"> 2022 </td> 2787 <td style="text-align:right;"> 3 </td> 2788 <td style="text-align:right;"> 1 </td> 2789 <td style="text-align:right;"> 2 </td> 2790 <td style="text-align:right;"> 1 </td> 2791 <td style="text-align:right;"> 1 </td> 2792 <td style="text-align:left;"> S </td> 2793 <td style="text-align:right;"> 32 </td> 2794 <td style="text-align:right;"> 894 </td> 2795 <td style="text-align:right;"> 2 </td> 2796 <td style="text-align:right;"> 2 </td> 2797 <td style="text-align:left;"> 07/01/1958 </td> 2798 <td style="text-align:right;"> 64 </td> 2799 <td style="text-align:right;"> 2 </td> 2800 </tr> 2801 <tr> 2802 <td style="text-align:left;"> TQRMNOSWVHKMKOCDEHPJB00790947 </td> 2803 <td style="text-align:right;"> 2022 </td> 2804 <td style="text-align:right;"> 3 </td> 2805 <td style="text-align:right;"> 1 </td> 2806 <td style="text-align:right;"> 1 </td> 2807 <td style="text-align:right;"> 1 </td> 2808 <td style="text-align:right;"> 40 </td> 2809 <td style="text-align:left;"> S </td> 2810 <td style="text-align:right;"> 29 </td> 2811 <td style="text-align:right;"> 345 </td> 2812 <td style="text-align:right;"> 1 </td> 2813 <td style="text-align:right;"> 2 </td> 2814 <td style="text-align:left;"> 18/09/1977 </td> 2815 <td style="text-align:right;"> 44 </td> 2816 <td style="text-align:right;"> 5 </td> 2817 </tr> 2818 <tr> 2819 <td style="text-align:left;"> TQRMNOSWVHKMKOCDEHPJB00790947 </td> 2820 <td style="text-align:right;"> 2022 </td> 2821 <td style="text-align:right;"> 3 </td> 2822 <td style="text-align:right;"> 1 </td> 2823 <td style="text-align:right;"> 2 </td> 2824 <td style="text-align:right;"> 1 </td> 2825 <td style="text-align:right;"> 40 </td> 2826 <td style="text-align:left;"> S </td> 2827 <td style="text-align:right;"> 29 </td> 2828 <td style="text-align:right;"> 345 </td> 2829 <td style="text-align:right;"> 3 </td> 2830 <td style="text-align:right;"> 1 </td> 2831 <td style="text-align:left;">
2831 13/05/2003 </td> 2832 <td style="text-align:right;"> 19 </td> 2833 <td style="text-align:right;"> 1 </td> 2834 </tr> 2835 <tr> 2836 <td style="text-align:left;"> TQRMNOSWVHKMKOCDEHPJB00790947 </td> 2837 <td style="text-align:right;"> 2022 </td> 2838 <td style="text-align:right;"> 3 </td> 2839 <td style="text-align:right;"> 1 </td> 2840 <td style="text-align:right;"> 3 </td> 2841 <td style="text-align:right;"> 1 </td> 2842 <td style="text-align:right;"> 40 </td> 2843 <td style="text-align:left;"> S </td> 2844 <td style="text-align:right;"> 29 </td> 2845 <td style="text-align:right;"> 345 </td> 2846 <td style="text-align:right;"> 3 </td> 2847 <td style="text-align:right;"> 1 </td> 2848 <td style="text-align:left;"> 30/03/2010 </td> 2849 <td style="text-align:right;"> 12 </td> 2850 <td style="text-align:right;"> 5 </td> 2851 </tr> 2852 <tr> 2853 <td style="text-align:left;"> TQRMNOSWVHKMKOCDEHPJB00790947 </td> 2854 <td style="text-align:right;"> 2022 </td> 2855 <td style="text-align:right;"> 3 </td> 2856 <td style="text-align:right;"> 1 </td> 2857 <td style="text-align:right;"> 4 </td> 2858 <td style="text-align:right;"> 0 </td> 2859 <td style="text-align:right;"> 40 </td> 2860 <td style="text-align:left;"> S </td> 2861 <td style="text-align:right;"> 29 </td> 2862 <td style="text-align:right;"> 345 </td> 2863 <td style="text-align:right;"> 3 </td> 2864 <td style="text-align:right;"> 1 </td> 2865 <td style="text-align:left;"> 06/03/2015 </td> 2866 <td style="text-align:right;"> 7 </td> 2867 <td style="text-align:right;"> 5 </td> 2868 </tr> 2869 <tr> 2870 <td style="text-align:left;"> TQRMNOSWVHKMKOCDEHPJB00790947 </td> 2871 <td style="text-align:right;"> 2022 </td> 2872 <td style="text-align:right;"> 3 </td> 2873 <td style="text-align:right;"> 1 </td> 2874 <td style="text-align:right;"> 5 </td> 2875 <td style="text-align:right;"> 1 </td> 2876 <td style="text-align:right;"> 40 </td> 2877 <td style="text-align:left;"> S </td> 2878 <td style="text-align:right;"> 29 </td> 2879 <td style="text-align:right;"> 345 </td> 2880 <td style="text-align:right;"> 4 </td> 2881 <td style="text-align:right;"> 2 </td> 2882 <td style="text-align:left;"> 30/04/2005 </td> 2883 <td style="text-align:right;"> 17 </td> 2884 <td style="text-align:right;"> 1 </td> 2885 </tr> 2886 <tr> 2887 <td style="text-align:left;"> TQRMNORRTHMMLLCDEOHCH00710640 </td> 2888 <td style="text-align:right;"> 2022 </td> 2889 <td style="text-align:right;"> 3 </td> 2890 <td style="text-align:right;"> 1 </td> 2891 <td style="text-align:right;"> 1 </td> 2892 <td style="text-align:right;"> 1 </td> 2893 <td style="text-align:right;"> 44 </td> 2894 <td style="text-align:left;"> N </td> 2895 <td style="text-align:right;"> 91 </td> 2896 <td style="text-align:right;"> 141 </td> 2897 <td style="text-align:right;"> 1 </td> 2898 <td style="text-align:right;"> 1 </td> 2899 <td style="text-align:left;"> 17/08/1970 </td> 2900 <td style="text-align:right;"> 52 </td> 2901 <td style="text-align:right;"> 2 </td> 2902 </tr> 2903 <tr> 2904 <td style="text-align:left;"> TQRMNORRTHMMLLCDEOHCH00710640 </td> 2905 <td style="text-align:right;"> 2022 </td> 2906 <td style="text-align:right;"> 3 </td> 2907 <td style="text-align:right;"> 1 </td> 2908 <td style="text-align:right;"> 2 </td> 2909 <td style="text-align:right;"> 1 </td> 2910 <td style="text-align:right;"> 44 </td> 2911 <td style="text-align:left;"> N </td> 2912 <td style="text-align:right;"> 91 </td> 2913 <td style="text-align:right;"> 141 </td> 2914 <td style="text-align:right;"> 2 </td> 2915 <td style="text-align:right;"> 2 </td> 2916 <td style="text-align:left;"> 03/07/1974 </td> 2917 <td style="text-align:right;"> 48 </td> 2918 <td style="text-align:right;"> 2 </td> 2919 </tr> 2920 <tr> 2921 <td style="text-align:left;"> TQRMNORRTHMMLLCDEOHCH00710640 </td> 2922 <td style="text-align:right;"> 2022 </td> 2923 <td style="text-align:right;"> 3 </td> 2924 <td style="text-align:right;"> 1 </td> 2925 <td style="text-align:right;"> 3 </td> 2926 <td style="text-align:right;"> 1 </td> 2927 <td style="text-align:right;"> 44 </td> 2928 <td style="text-align:left;"> N </td> 2929 <td style="text-align:right;"> 91 </td> 2930 <td style="text-align:right;"> 141 </td> 2931 <td style="text-align:right;"> 3 </td> 2932 <td style="text-align:right;"> 1 </td> 2933 <td style="text-align:left;"> 16/08/2007 </td> 2934 <td style="text-align:right;"> 15 </td> 2935 <td style="text-align:right;"> 5 </td> 2936 </tr> 2937 <tr> 2938 <td style="text-align:left;"> TQRMNORRTHMMLLCDEOHCH00710640 </td> 2939 <td style="text-align:right;"> 2022 </td> 2940 <td style="text-align:right;"> 3 </td> 2941 <td style="text-align:right;"> 1 </td> 2942 <td style="text-align:right;"> 4 </td> 2943 <td style="text-align:right;"> 1 </td> 2944 <td style="text-align:right;"> 44 </td> 2945 <td style="text-align:left;"> N </td> 2946 <td style="text-align:right;"> 91 </td> 2947 <td style="text-align:right;"> 141 </td> 2948 <td style="text-align:right;"> 3 </td> 2949 <td style="text-align:right;"> 1 </td> 2950 <td style="text-align:left;"> 17/09/2010 </td> 2951 <td style="text-align:right;"> 11 </td> 2952 <td style="text-align:right;"> 5 </td> 2953 </tr> 2954 <tr> 2955 <td style="text-align:left;"> TQRMNOQVXHMOKUCDEFNFF00710948 </td> 2956 <td style="text-align:right;"> 2022 </td> 2957 <td style="text-align:right;"> 3 </td> 2958 <td style="text-align:right;"> 1 </td> 2959 <td style="text-align:right;"> 1 </td> 2960 <td style="text-align:right;"> 1 </td> 2961 <td style="text-align:right;"> 41 </td> 2962 <td style="text-align:left;"> N </td> 2963 <td style="text-align:right;"> 7 </td> 2964 <td style="text-align:right;"> 303 </td> 2965 <td style="text-align:right;"> 1 </td> 2966 <td style="text-align:right;"> 1 </td> 2967 <td style="text-align:left;"> 19/08/1968 </td> 2968 <td style="text-align:right;"> 54 </td> 2969 <td style="text-align:right;"> 1 </td> 2970 </tr> 2971 <tr> 2972 <td style="text-align:left;"> TQRMNOQVXHMOKUCDEFNFF00710948 </td> 2973 <td style="text-align:right;"> 2022 </td> 2974 <td style="text-align:right;"> 3 </td> 2975 <td style="text-align:right;"> 1 </td> 2976 <td style="text-align:right;"> 2 </td> 2977 <td style="text-align:right;"> 1 </td> 2978 <td style="text-align:right;"> 41 </td> 2979 <td style="text-align:left;"> N </td> 2980 <td style="text-align:right;"> 7 </td> 2981 <td style="text-align:right;"> 303 </td> 2982 <td style="text-align:right;"> 2 </td> 2983 <td style="text-align:right;"> 2 </td> 2984 <td style="text-align:left;"> 28/05/1970 </td> 2985 <td style="text-align:right;"> 52 </td> 2986 <td style="text-align:right;"> 1 </td> 2987 </tr> 2988 <tr> 2989 <td style="text-align:left;"> TQRMNOQVXHMOKUCDEFNFF00710948 </td> 2990 <td style="text-align:right;"> 2022 </td> 2991 <td style="text-align:right;"> 3 </td> 2992 <td style="text-align:right;"> 1 </td> 2993 <td style="text-align:right;"> 3 </td> 2994 <td style="text-align:right;"> 1 </td> 2995 <td style="text-align:right;"> 41 </td> 2996 <td style="text-align:left;"> N </td> 2997 <td style="text-align:right;"> 7 </td> 2998 <td style="text-align:right;"> 303 </td> 2999 <td style="text-align:right;"> 3 </td> 3000 <td style="text-align:right;"> 2 </td> 3001 <td style="text-align:left;"> 09/01/1997 </td> 3002 <td style="text-align:right;"> 25 </td> 3003 <td style="text-align:right;"> 5 </td> 3004 </tr> 3005 <tr> 3006 <td style="text-align:left;"> TQRMNOQVXHMOKUCDEFNFF00710948 </td> 3007 <td style="text-align:right;"> 2022 </td> 3008 <td style="text-align:right;"> 3 </td> 3009 <td style="text-align:right;"> 1 </td> 3010 <td style="text-align:right;"> 4 </td> 3011 <td style="text-align:right;"> 1 </td> 3012 <td style="text-align:right;"> 41 </td> 3013 <td style="text-align:left;"> N </td> 3014 <td style="text-align:right;"> 7 </td> 3015 <td style="text-align:right;"> 303 </td> 3016 <td style="text-align:right;"> 3 </td> 3017 <td style="text-align:right;"> 2 </td> 3018 <td style="text-align:left;"> 08/11/2003 </td> 3019 <td style="text-align:right;"> 18 </td> 3020 <td style="text-align:right;"> 5 </td> 3021 </tr> 3022 <tr> 3023 <td style="text-align:left;"> TQRMNOQVXHMOKUCDEFNFF00710948 </td> 3024 <td style="text-align:right;"> 2022 </td> 3025 <td style="text-align:right;"> 3 </td> 3026 <td style="text-align:right;"> 1 </td> 3027 <td style="text-align:right;"> 5 </td> 3028 <td style="text-align:right;"> 0 </td> 3029 <td style="text-align:right;"> 41 </td> 3030 <td style="text-align:left;"> N </td> 3031 <td style="text-align:right;"> 7 </td> 3032 <td style="text-align:right;"> 303 </td> 3033 <td style="text-align:right;"> 5 </td> 3034 <td style="text-align:right;"> 1 </td> 3035 <td style="text-align:left;"> 12/05/2014 </td> 3036 <td style="text-align:right;"> 8 </td> 3037 <td style="text-align:right;"> 5 </td> 3038 </tr> 3039 <tr> 3040 <td style="text-align:left;"> TQRMNOPXUHLMKUCDEGOIH00706727 </td> 3041 <td style="text-align:right;"> 2022 </td> 3042 <td style="text-align:right;"> 3 </td> 3043 <td style="text-align:right;"> 1 </td> 3044 <td style="text-align:right;"> 1 </td> 3045 <td style="text-align:right;"> 1 </td> 3046 <td style="text-align:right;"> 40 </td> 3047 <td style="text-align:left;"> N </td> 3048 <td style="text-align:right;"> 18 </td> 3049 <td style="text-align:right;"> 275 </td> 3050 <td style="text-align:right;"> 1 </td> 3051 <td style="text-align:right;"> 1 </td> 3052 <td style="text-align:left;"> 03/03/1983 </td> 3053 <td style="text-align:right;"> 39 </td> 3054 <td style="text-align:right;"> 2 </td> 3055 </tr> 3056 <tr> 3057 <td style="text-align:left;"> TQRMNOPXUHLMKUCDEGOIH00706727 </td> 3058 <td style="text-align:right;"> 2022 </td> 3059 <td style="text-align:right;"> 3 </td> 3060 <td style="text-align:right;"> 1 </td> 3061 <td style="text-align:right;"> 2 </td> 3062 <td style="text-align:right;"> 1 </td> 3063 <td style="text-align:right;"> 40 </td> 3064 <td style="text-align:left;"> N </td> 3065 <td style="text-align:right;"> 18 </td> 3066 <td style="text-align:right;"> 275 </td> 3067 <td style="text-align:right;"> 2 </td> 3068 <td style="text-align:right;"> 2 </td> 3069 <td style="text-align:left;"> 26/08/1985 </td> 3070 <td style="text-align:right;"> 37 </td> 3071 <td style="text-align:right;"> 2 </td> 3072 </tr> 3073 <tr> 3074 <td style="text-align:left;"> TQRMNOPXUHLMKUCDEGOIH00706727 </td> 3075 <td style="text-align:right;"> 2022 </td> 3076 <td style="text-align:right;"> 3 </td> 3077 <td style="text-align:right;"> 1 </td> 3078 <td style="text-align:right;"> 3 </td> 3079 <td style="text-align:right;"> 1 </td> 3080 <td style="text-align:right;"> 40 </td> 3081 <td style="text-align:left;"> N </td> 3082 <td style="text-align:right;"> 18 </td> 3083 <td style="text-align:right;"> 275 </td> 3084 <td style="text-align:right;"> 3 </td> 3085 <td style="text-align:right;"> 1 </td> 3086 <td style="text-align:left;"> 04/02/2012 </td> 3087 <td style="text-align:right;"> 10 </td> 3088 <td style="text-align:right;"> 5 </td> 3089 </tr> 3090 <tr> 3091 <td style="text-align:left;"> TQRMNOPPTHMMLMCDEGIBJ00712052 </td> 3092 <td style="text-align:right;"> 2022 </td> 3093 <td style="text-align:right;"> 3 </td> 3094 <td style="text-align:right;"> 1 </td> 3095 <td style="text-align:right;"> 1 </td> 3096 <td style="text-align:right;"> 1 </td> 3097 <td style="text-align:right;"> 41 </td> 3098 <td style="text-align:left;"> N </td> 3099 <td style="text-align:right;"> 12 </td> 3100 <td style="text-align:right;"> 333 </td> 3101 <td style="text-align:right;"> 1 </td> 3102 <td style="text-align:right;"> 1 </td> 3103 <td style="text-align:left;"> 20/12/1994 </td> 3104 <td style="text-align:right;"> 27 </td> 3105 <td style="text-align:right;"> 1 </td> 3106 </tr> 3107 <tr> 3108 <td style="text-align:left;"> TQRMNOPPTHMMLMCDEGIBJ00712052 </td> 3109 <td style="text-align:right;"> 2022 </td> 3110 <td style="text-align:right;"> 3 </td> 3111 <td style="text-align:right;"> 1 </td> 3112 <td style="text-align:right;"> 2 </td> 3113 <td style="text-align:right;"> 1 </td> 3114 <td style="text-align:right;"> 41 </td> 3115 <td style="text-align:left;"> N </td> 3116 <td style="text-align:right;"> 12 </td> 3117 <td style="text-align:right;"> 333 </td> 3118 <td style="text-align:right;"> 2 </td> 3119 <td style="text-align:right;"> 2 </td> 3120 <td style="text-align:left;"> 29/11/1993 </td> 3121 <td style="text-align:right;"> 28 </td> 3122 <td style="text-align:right;"> 1 </td> 3123 </tr> 3124 <tr> 3125 <td style="text-align:left;"> TQRMNOPPTHMMLMCDEGIBJ00712052 </td> 3126 <td style="text-align:right;"> 2022 </td> 3127 <td style="text-align:right;"> 3 </td> 3128 <td style="text-align:right;"> 1 </td> 3129 <td style="text-align:right;"> 3 </td> 3130 <td style="text-align:right;"> 0 </td> 3131 <td style="text-align:right;"> 41 </td> 3132 <td style="text-align:left;"> N </td> 3133 <td style="text-align:right;"> 12 </td> 3134 <td style="text-align:right;"> 333 </td> 3135 <td style="text-align:right;"> 3 </td> 3136 <td style="text-align:right;"> 2 </td> 3137 <td style="text-align:left;"> 28/11/2014 </td> 3138 <td style="text-align:right;"> 7 </td> 3139 <td style="text-align:right;"> 5 </td> 3140 </tr> 3141 <tr> 3142 <td style="text-align:left;"> TQRMNOPPTHMMLMCDEGIBJ00712052 </td> 3143 <td style="
3143text-align:right;"> 2022 </td> 3144 <td style="text-align:right;"> 3 </td> 3145 <td style="text-align:right;"> 1 </td> 3146 <td style="text-align:right;"> 4 </td> 3147 <td style="text-align:right;"> 0 </td> 3148 <td style="text-align:right;"> 41 </td> 3149 <td style="text-align:left;"> N </td> 3150 <td style="text-align:right;"> 12 </td> 3151 <td style="text-align:right;"> 333 </td> 3152 <td style="text-align:right;"> 3 </td> 3153 <td style="text-align:right;"> 2 </td> 3154 <td style="text-align:left;"> 29/08/2012 </td> 3155 <td style="text-align:right;"> 9 </td> 3156 <td style="text-align:right;"> 5 </td> 3157 </tr> 3158 <tr> 3159 <td style="text-align:left;"> TQRMNOQSUHMLKTCDEHIBB00717071 </td> 3160 <td style="text-align:right;"> 2022 </td> 3161 <td style="text-align:right;"> 3 </td> 3162 <td style="text-align:right;"> 1 </td> 3163 <td style="text-align:right;"> 1 </td> 3164 <td style="text-align:right;"> 1 </td> 3165 <td style="text-align:right;"> 40 </td> 3166 <td style="text-align:left;"> N </td> 3167 <td style="text-align:right;"> 22 </td> 3168 <td style="text-align:right;"> 108 </td> 3169 <td style="text-align:right;"> 1 </td> 3170 <td style="text-align:right;"> 2 </td> 3171 <td style="text-align:left;"> 01/05/1988 </td> 3172 <td style="text-align:right;"> 34 </td> 3173 <td style="text-align:right;"> 1 </td> 3174 </tr> 3175 <tr> 3176 <td style="text-align:left;"> TQRMNOQSUHMLKTCDEHIBB00717071 </td> 3177 <td style="text-align:right;"> 2022 </td> 3178 <td style="text-align:right;"> 3 </td> 3179 <td style="text-align:right;"> 1 </td> 3180 <td style="text-align:right;"> 2 </td> 3181 <td style="text-align:right;"> 1 </td> 3182 <td style="text-align:right;"> 40 </td> 3183 <td style="text-align:left;"> N </td> 3184 <td style="text-align:right;"> 22 </td> 3185 <td style="text-align:right;"> 108 </td> 3186 <td style="text-align:right;"> 2 </td> 3187 <td style="text-align:right;"> 1 </td> 3188 <td style="text-align:left;"> 19/02/1992 </td> 3189 <td style="text-align:right;"> 30 </td> 3190 <td style="text-align:right;"> 1 </td> 3191 </tr> 3192 <tr> 3193 <td style="text-align:left;"> TQRMNOQSQHMLKTCDEHIBB00709425 </td> 3194 <td style="text-align:right;"> 2022 </td> 3195 <td style="text-align:right;"> 3 </td> 3196 <td style="text-align:right;"> 1 </td> 3197 <td style="text-align:right;"> 1 </td> 3198 <td style="text-align:right;"> 1 </td> 3199 <td style="text-align:right;"> 40 </td> 3200 <td style="text-align:left;"> N </td> 3201 <td style="text-align:right;"> 22 </td> 3202 <td style="text-align:right;"> 143 </td> 3203 <td style="text-align:right;"> 1 </td> 3204 <td style="text-align:right;"> 2 </td> 3205 <td style="text-align:left;"> 01/11/1976 </td> 3206 <td style="text-align:right;"> 45 </td> 3207 <td style="text-align:right;"> 5 </td> 3208 </tr> 3209 <tr> 3210 <td style="text-align:left;"> TQRMNOQSQHMLKTCDEHIBB00709425 </td> 3211 <td style="text-align:right;"> 2022 </td> 3212 <td style="text-align:right;"> 3 </td> 3213 <td style="text-align:right;"> 1 </td> 3214 <td style="text-align:right;"> 2 </td> 3215 <td style="text-align:right;"> 1 </td> 3216 <td style="text-align:right;"> 40 </td> 3217 <td style="text-align:left;"> N </td> 3218 <td style="text-align:right;"> 22 </td> 3219 <td style="text-align:right;"> 143 </td> 3220 <td style="text-align:right;"> 3 </td> 3221 <td style="text-align:right;"> 1 </td> 3222 <td style="text-align:left;"> 27/10/1997 </td> 3223 <td style="text-align:right;"> 24 </td> 3224 <td style="text-align:right;"> 5 </td> 3225 </tr> 3226 <tr> 3227 <td style="text-align:left;"> TQRMNOQSQHMLKTCDEHIBB00709425 </td> 3228 <td style="text-align:right;"> 2022 </td> 3229 <td style="text-align:right;"> 3 </td> 3230 <td style="text-align:right;"> 1 </td> 3231 <td style="text-align:right;"> 3 </td> 3232 <td style="text-align:right;"> 1 </td> 3233 <td style="text-align:right;"> 40 </td> 3234 <td style="text-align:left;"> N </td> 3235 <td style="text-align:right;"> 22 </td> 3236 <td style="text-align:right;"> 143 </td> 3237 <td style="text-align:right;"> 3 </td> 3238 <td style="text-align:right;"> 1 </td> 3239 <td style="text-align:left;"> 27/10/1997 </td> 3240 <td style="text-align:right;"> 24 </td> 3241 <td style="text-align:right;"> 5 </td> 3242 </tr> 3243 <tr> 3244 <td style="text-align:left;"> TQRMNOQSQHMLKTCDEHIBB00709425 </td> 3245 <td style="text-align:right;"> 2022 </td> 3246 <td style="text-align:right;"> 3 </td> 3247 <td style="text-align:right;"> 1 </td> 3248 <td style="text-align:right;"> 4 </td> 3249 <td style="text-align:right;"> 1 </td> 3250 <td style="text-align:right;"> 40 </td> 3251 <td style="text-align:left;"> N </td> 3252 <td style="text-align:right;"> 22 </td> 3253 <td style="text-align:right;"> 143 </td> 3254 <td style="text-align:right;"> 3 </td> 3255 <td style="text-align:right;"> 2 </td> 3256 <td style="text-align:left;"> 11/08/1999 </td> 3257 <td style="text-align:right;"> 23 </td> 3258 <td style="text-align:right;"> 5 </td> 3259 </tr> 3260 <tr> 3261 <td style="text-align:left;"> TQRMNOQTVHJMKTCDEHIBB00784254 </td> 3262 <td style="text-align:right;"> 2022 </td> 3263 <td style="text-align:right;"> 3 </td> 3264 <td style="text-align:right;"> 1 </td> 3265 <td style="text-align:right;"> 1 </td> 3266 <td style="text-align:right;"> 1 </td> 3267 <td style="text-align:right;"> 40 </td> 3268 <td style="text-align:left;"> N </td> 3269 <td style="text-align:right;"> 22 </td> 3270 <td style="text-align:right;"> 118 </td> 3271 <td style="text-align:right;"> 1 </td> 3272 <td style="text-align:right;"> 2 </td> 3273 <td style="text-align:left;"> 21/09/1951 </td> 3274 <td style="text-align:right;"> 70 </td> 3275 <td style="text-align:right;"> 3 </td> 3276 </tr> 3277 <tr> 3278 <td style="text-align:left;"> TQRMNOQTVHJMKTCDEHIBB00784254 </td> 3279 <td style="text-align:right;"> 2022 </td> 3280 <td style="text-align:right;"> 3 </td> 3281 <td style="text-align:right;"> 1 </td> 3282 <td style="text-align:right;"> 2 </td> 3283 <td style="text-align:right;"> 1 </td> 3284 <td style="text-align:right;"> 40 </td> 3285 <td style="text-align:left;"> N </td> 3286 <td style="text-align:right;"> 22 </td> 3287 <td style="text-align:right;"> 118 </td> 3288 <td style="text-align:right;"> 3 </td> 3289 <td style="text-align:right;"> 1 </td> 3290 <td style="text-align:left;"> 05/09/1986 </td> 3291 <td style="text-align:right;"> 36 </td> 3292 <td style="text-align:right;"> 5 </td> 3293 </tr> 3294 <tr> 3295 <td style="text-align:left;"> TQRMNOQXUHLMRQCDEIJAH00706181 </td> 3296 <td style="text-align:right;"> 2022 </td> 3297 <td style="text-align:right;"> 3 </td> 3298 <td style="text-align:right;"> 1 </td> 3299 <td style="text-align:right;"> 1 </td> 3300 <td style="text-align:right;"> 1 </td> 3301 <td style="text-align:right;"> 1 </td> 3302 <td style="text-align:left;"> S </td> 3303 <td style="text-align:right;"> 33 </td> 3304 <td style="text-align:right;"> 1792 </td> 3305 <td style="text-align:right;"> 1 </td> 3306 <td style="text-align:right;"> 1 </td> 3307 <td style="text-align:left;"> 09/12/1962 </td> 3308 <td style="text-align:right;"> 59 </td> 3309 <td style="text-align:right;"> 1 </td> 3310 </tr> 3311 <tr> 3312 <td style="text-align:left;"> TQRMNOQXUHLMRQCDEIJAH00706181 </td> 3313 <td style="text-align:right;"> 2022 </td> 3314 <td style="text-align:right;"> 3 </td> 3315 <td style="text-align:right;"> 1 </td> 3316 <td style="text-align:right;"> 2 </td> 3317 <td style="text-align:right;"> 1 </td> 3318 <td style="text-align:right;"> 1 </td> 3319 <td style="text-align:left;"> S </td> 3320 <td style="text-align:right;"> 33 </td> 3321 <td style="text-align:right;"> 1792 </td> 3322 <td style="text-align:right;"> 2 </td> 3323 <td style="text-align:right;"> 2 </td> 3324 <td style="text-align:left;"> 13/04/1960 </td> 3325 <td style="text-align:right;"> 62 </td> 3326 <td style="text-align:right;"> 1 </td> 3327 </tr> 3328 <tr> 3329 <td style="text-align:left;"> TQRMNORPQHLMKSCDEHJGH00790306 </td> 3330 <td style="text-align:right;"> 2022 </td> 3331 <td style="text-align:right;"> 3 </td> 3332 <td style="text-align:right;"> 1 </td> 3333 <td style="text-align:right;"> 1 </td> 3334 <td style="text-align:right;"> 1 </td> 3335 <td style="text-align:right;"> 40 </td> 3336 <td style="text-align:left;"> S </td> 3337 <td style="text-align:right;"> 23 </td> 3338 <td style="text-align:right;"> 220 </td> 3339 <td style="text-align:right;"> 1 </td> 3340 <td style="text-align:right;"> 1 </td> 3341 <td style="text-align:left;"> 03/04/1950 </td> 3342 <td style="text-align:right;"> 72 </td> 3343 <td style="text-align:right;"> 2 </td> 3344 </tr> 3345 <tr> 3346 <td style="text-align:left;"> TQRMNORPQHLMKSCDEHJGH00790306 </td> 3347 <td style="text-align:right;"> 2022 </td> 3348 <td style="text-align:right;"> 3 </td> 3349 <td style="text-align:right;"> 1 </td> 3350 <td style="text-align:right;"> 2 </td> 3351 <td style="text-align:right;"> 1 </td> 3352 <td style="text-align:right;"> 40 </td> 3353 <td style="text-align:left;"> S </td> 3354 <td style="text-align:right;"> 23 </td> 3355 <td style="text-align:right;"> 220 </td> 3356 <td style="text-align:right;"> 2 </td> 3357 <td style="text-align:right;"> 2 </td> 3358 <td style="text-align:left;"> 26/03/1955 </td> 3359 <td style="text-align:right;"> 67 </td> 3360 <td style="text-align:right;"> 2 </td> 3361 </tr> 3362 <tr> 3363 <td style="text-align:left;"> TQRMNORPQHLMKSCDEHJGH00790306 </td> 3364 <td style="text-align:right;"> 2022 </td> 3365 <td style="text-align:right;"> 3 </td> 3366 <td style="text-align:right;"> 1 </td> 3367 <td style="text-align:right;"> 3 </td> 3368 <td style="text-align:right;"> 1 </td> 3369 <td style="text-align:right;"> 40 </td> 3370 <td style="text-align:left;"> S </td> 3371 <td style="text-align:right;"> 23 </td> 3372 <td style="text-align:right;"> 220 </td> 3373 <td style="text-align:right;"> 3 </td> 3374 <td style="text-align:right;"> 2 </td> 3375 <td style="text-align:left;"> 23/09/1983 </td> 3376 <td style="text-align:right;"> 38 </td> 3377 <td style="text-align:right;"> 5 </td> 3378 </tr> 3379 <tr> 3380 <td style="text-align:left;"> TQRMNORPQHLMKSCDEHJGH00790306 </td> 3381 <td style="text-align:right;"> 2022 </td> 3382 <td style="text-align:right;"> 3 </td> 3383 <td style="text-align:right;"> 1 </td> 3384 <td style="text-align:right;"> 4 </td> 3385 <td style="text-align:right;"> 1 </td> 3386 <td style="text-align:right;"> 40 </td> 3387 <td style="text-align:left;"> S </td> 3388 <td style="text-align:right;"> 23 </td> 3389 <td style="text-align:right;"> 220 </td> 3390 <td style="text-align:right;"> 3 </td> 3391 <td style="text-align:right;"> 2 </td> 3392 <td style="text-align:left;"> 05/06/1982 </td> 3393 <td style="text-align:right;"> 40 </td> 3394 <td style="text-align:right;"> 5 </td> 3395 </tr> 3396 <tr> 3397 <td style="text-align:left;"> TQRMNORPQHLMKSCDEHJGH00790306 </td> 3398 <td style="text-align:right;"> 2022 </td> 3399 <td style="text-align:right;"> 3 </td> 3400 <td style="text-align:right;"> 1 </td> 3401 <td style="text-align:right;"> 5 </td> 3402 <td style="text-align:right;"> 1 </td> 3403 <td style="text-align:right;"> 40 </td> 3404 <td style="text-align:left;"> S </td> 3405 <td style="text-align:right;"> 23 </td> 3406 <td style="text-align:right;"> 220 </td> 3407 <td style="text-align:right;"> 3 </td> 3408 <td style="text-align:right;"> 2 </td> 3409 <td style="text-align:left;"> 08/11/1987 </td> 3410 <td style="text-align:right;"> 34 </td> 3411 <td style="text-align:right;"> 5 </td> 3412 </tr> 3413 <tr> 3414 <td style="text-align:left;"> TQRMNORUPHJMKUCDEHGHJ00784183 </td> 3415 <td style="text-align:right;"> 2022 </td> 3416 <td style="text-align:right;"> 3 </td> 3417 <td style="text-align:right;"> 1 </td> 3418 <td style="text-align:right;"> 1 </td> 3419 <td style="text-align:right;"> 1 </td> 3420 <td style="text-align:right;"> 44 </td> 3421 <td style="text-align:left;"> N </td> 3422 <td style="text-align:right;"> 20 </td> 3423 <td style="text-align:right;"> 134 </td> 3424 <td style="text-align:right;"> 1 </td> 3425 <td style="text-align:right;"> 1 </td> 3426 <td style="text-align:left;"> 01/01/1900 </td> 3427 <td style="text-align:right;"> 73 </td> 3428 <td style="text-align:right;"> 2 </td> 3429 </tr> 3430 <tr> 3431 <td style="text-align:left;"> TQRMNORUPHJMKUCDEHGHJ00784183 </td> 3432 <td style="text-align:right;"> 2022 </td> 3433 <td style="text-align:right;"> 3 </td> 3434 <td style="text-align:right;"> 1 </td> 3435 <td style="text-align:right;"> 2 </td> 3436 <td style="text-align:right;"> 1 </td> 3437 <td style="text-align:right;"> 44 </td> 3438 <td style="text-align:left;"> N </td> 3439 <td style="text-align:right;"> 20 </td> 3440 <td style="text-align:right;"> 134 </td> 3441 <td style="text-align:right;"> 2 </td> 3442 <td style="text-align:right;"> 2 </td> 3443 <td style="text-align:left;"> 01/01/1900 </td> 3444 <td style="text-align:right;"> 76 </td> 3445 <td style="text-align:right;"> 2 </td> 3446 </tr> 3447 <tr> 3448 <td style="text-align:left;"> TQRMNOQXUHMLSNCDEIJAH00719506 </td> 3449 <td style="text-align:right;"> 2022 </td> 3450 <td style="text-align:right;"> 3 </td> 3451 <td style="text-align:right;"> 1 </td> 3452 <td style="text-align:right;"> 1 </td> 3453 <td style="text-align:right;"> 1 </td&g
3453t; 3454 <td style="text-align:right;"> 1 </td> 3455 <td style="text-align:left;"> S </td> 3456 <td style="text-align:right;"> 33 </td> 3457 <td style="text-align:right;"> 5562 </td> 3458 <td style="text-align:right;"> 1 </td> 3459 <td style="text-align:right;"> 2 </td> 3460 <td style="text-align:left;"> 03/07/1941 </td> 3461 <td style="text-align:right;"> 81 </td> 3462 <td style="text-align:right;"> 4 </td> 3463 </tr> 3464 <tr> 3465 <td style="text-align:left;"> TQRMNOQXUHMLSNCDEIJAH00719506 </td> 3466 <td style="text-align:right;"> 2022 </td> 3467 <td style="text-align:right;"> 3 </td> 3468 <td style="text-align:right;"> 1 </td> 3469 <td style="text-align:right;"> 2 </td> 3470 <td style="text-align:right;"> 1 </td> 3471 <td style="text-align:right;"> 1 </td> 3472 <td style="text-align:left;"> S </td> 3473 <td style="text-align:right;"> 33 </td> 3474 <td style="text-align:right;"> 5562 </td> 3475 <td style="text-align:right;"> 3 </td> 3476 <td style="text-align:right;"> 1 </td> 3477 <td style="text-align:left;"> 15/08/1966 </td> 3478 <td style="text-align:right;"> 56 </td> 3479 <td style="text-align:right;"> 5 </td> 3480 </tr> 3481 <tr> 3482 <td style="text-align:left;"> TQRMNOTXVHJOPSCDEIJAH00786237 </td> 3483 <td style="text-align:right;"> 2022 </td> 3484 <td style="text-align:right;"> 3 </td> 3485 <td style="text-align:right;"> 2 </td> 3486 <td style="text-align:right;"> 1 </td> 3487 <td style="text-align:right;"> 1 </td> 3488 <td style="text-align:right;"> 1 </td> 3489 <td style="text-align:left;"> S </td> 3490 <td style="text-align:right;"> 33 </td> 3491 <td style="text-align:right;"> 2433 </td> 3492 <td style="text-align:right;"> 1 </td> 3493 <td style="text-align:right;"> 1 </td> 3494 <td style="text-align:left;"> 01/07/1949 </td> 3495 <td style="text-align:right;"> 73 </td> 3496 <td style="text-align:right;"> 1 </td> 3497 </tr> 3498 <tr> 3499 <td style="text-align:left;"> TQRMNOTXVHJOPSCDEIJAH00786237 </td> 3500 <td style="text-align:right;"> 2022 </td> 3501 <td style="text-align:right;"> 3 </td> 3502 <td style="text-align:right;"> 2 </td> 3503 <td style="text-align:right;"> 2 </td> 3504 <td style="text-align:right;"> 1 </td> 3505 <td style="text-align:right;"> 1 </td> 3506 <td style="text-align:left;"> S </td> 3507 <td style="text-align:right;"> 33 </td> 3508 <td style="text-align:right;"> 2433 </td> 3509 <td style="text-align:right;"> 2 </td> 3510 <td style="text-align:right;"> 2 </td> 3511 <td style="text-align:left;"> 01/03/1953 </td> 3512 <td style="text-align:right;"> 69 </td> 3513 <td style="text-align:right;"> 1 </td> 3514 </tr> 3515 <tr> 3516 <td style="text-align:left;"> TQRMNOQYPHMOKRCDEGLDF00713344 </td> 3517 <td style="text-align:right;"> 2022 </td> 3518 <td style="text-align:right;"> 3 </td> 3519 <td style="text-align:right;"> 1 </td> 3520 <td style="text-align:right;"> 1 </td> 3521 <td style="text-align:right;"> 1 </td> 3522 <td style="text-align:right;"> 41 </td> 3523 <td style="text-align:left;"> N </td> 3524 <td style="text-align:right;"> 15 </td> 3525 <td style="text-align:right;"> 93 </td> 3526 <td style="text-align:right;"> 1 </td> 3527 <td style="text-align:right;"> 2 </td> 3528 <td style="text-align:left;"> 18/04/1953 </td> 3529 <td style="text-align:right;"> 69 </td> 3530 <td style="text-align:right;"> 4 </td> 3531 </tr> 3532 <tr> 3533 <td style="text-align:left;"> TQRMNOQYPHMOKRCDEGLDF00713344 </td> 3534 <td style="text-align:right;"> 2022 </td> 3535 <td style="text-align:right;"> 3 </td> 3536 <td style="text-align:right;"> 1 </td> 3537 <td style="text-align:right;"> 2 </td> 3538 <td style="text-align:right;"> 1 </td> 3539 <td style="text-align:right;"> 41 </td> 3540 <td style="text-align:left;"> N </td> 3541 <td style="text-align:right;"> 15 </td> 3542 <td style="text-align:right;"> 93 </td> 3543 <td style="text-align:right;"> 3 </td> 3544 <td style="text-align:right;"> 2 </td> 3545 <td style="text-align:left;"> 03/10/1982 </td> 3546 <td style="text-align:right;"> 39 </td> 3547 <td style="text-align:right;"> 5 </td> 3548 </tr> 3549 <tr> 3550 <td style="text-align:left;"> TQRMNORPUHJNOLCDEIIAD00785503 </td> 3551 <td style="text-align:right;"> 2022 </td> 3552 <td style="text-align:right;"> 3 </td> 3553 <td style="text-align:right;"> 1 </td> 3554 <td style="text-align:right;"> 1 </td> 3555 <td style="text-align:right;"> 1 </td> 3556 <td style="text-align:right;"> 1 </td> 3557 <td style="text-align:left;"> S </td> 3558 <td style="text-align:right;"> 32 </td> 3559 <td style="text-align:right;"> 2030 </td> 3560 <td style="text-align:right;"> 1 </td> 3561 <td style="text-align:right;"> 1 </td> 3562 <td style="text-align:left;"> 15/03/1991 </td> 3563 <td style="text-align:right;"> 31 </td> 3564 <td style="text-align:right;"> 5 </td> 3565 </tr> 3566</tbody> 3567</table></div> 3568 3569 3570(aquà imprimiremos a modo ilustrativo solo las primeras 50 filas y 15 columnas) 3571 3572 3573] 3574 3575 3576.panel[.panel-name[Paso 1] 3577 3578
3579Luego nos quedamos solo con algunas columnas, pero misma cantidad de filas 3580 3581 3582 3583```r 3584rcia_short <- eph_ind %>% 3585* select(CODUSU, NRO_HOGAR, AGLOMERADO, IPCF, CH04) 3586``` 3587 3588<div style="border: 1px solid #ddd; padding: 0px; overflow-y: scroll; height:400px; overflow-x: scroll; width:100%; "><table class="table" style="font-size: 13px; margin-left: auto; margin-right: auto;"> 3589 <thead> 3590 <tr> 3591 <th style="text-align:left;position: sticky; top:0; background-color: #FFFFFF;"> CODUSU </th> 3592 <th style="text-align:right;position: sticky; top:0; background-color: #FFFFFF;"> NRO_HOGAR </th> 3593 <th style="text-align:right;position: sticky; top:0; background-color: #FFFFFF;"> AGLOMERADO </th> 3594 <th style="text-align:right;position: sticky; top:0; background-color: #FFFFFF;"> IPCF </th> 3595 <th style="text-align:right;position: sticky; top:0; background-color: #FFFFFF;"> CH04 </th> 3596 </tr> 3597 </thead> 3598<tbody> 3599 <tr> 3600 <td style="text-align:left;"> TQRMNORVQHJNLTCDEGGFB00788741 </td> 3601 <td style="text-align:right;"> 1 </td> 3602 <td style="text-align:right;"> 10 </td> 3603 <td style="text-align:right;"> 46000.00 </td> 3604 <td style="text-align:right;"> 1 </td> 3605 </tr> 3606 <tr> 3607 <td style="text-align:left;"> TQRMNOQSWHKNKRCDEGJBF00789123 </td> 3608 <td style="text-align:right;"> 1 </td> 3609 <td style="text-align:right;"> 13 </td> 3610 <td style="text-align:right;"> 160200.00 </td> 3611 <td style="text-align:right;"> 1 </td> 3612 </tr> 3613 <tr> 3614 <td style="text-align:left;"> TQRMNOQSWHKNKRCDEGJBF00789123 </td> 3615 <td style="text-align:right;"> 1 </td> 3616 <td style="text-align:right;"> 13 </td> 3617 <td style="text-align:right;"> 160200.00 </td> 3618 <td style="text-align:right;"> 2 </td> 3619 </tr> 3620 <tr> 3621 <td style="text-align:left;"> TQRMNOTSQHLLMLCDEIIAD00703213 </td> 3622 <td style="text-align:right;"> 1 </td> 3623 <td style="text-align:right;"> 32 </td> 3624 <td style="text-align:right;"> 0.00 </td> 3625 <td style="text-align:right;"> 1 </td> 3626 </tr> 3627 <tr> 3628 <td style="text-align:left;"> TQRMNOTSQHLLMLCDEIIAD00703213 </td> 3629 <td style="text-align:right;"> 1 </td> 3630 <td style="text-align:right;"> 32 </td> 3631 <td style="text-align:right;"> 0.00 </td> 3632 <td style="text-align:right;"> 2 </td> 3633 </tr> 3634 <tr> 3635 <td style="text-align:left;"> TQRMNOSWVHKMKOCDEHPJB00790947 </td> 3636 <td style="text-align:right;"> 1 </td> 3637 <td style="text-align:right;"> 29 </td> 3638 <td style="text-align:right;"> 10360.00 </td> 3639 <td style="text-align:right;"> 2 </td> 3640 </tr> 3641 <tr> 3642 <td style="text-align:left;"> TQRMNOSWVHKMKOCDEHPJB00790947 </td> 3643 <td style="text-align:right;"> 1 </td> 3644 <td style="text-align:right;"> 29 </td> 3645 <td style="text-align:right;"> 10360.00 </td> 3646 <td style="text-align:right;"> 1 </td> 3647 </tr> 3648 <tr> 3649 <td style="text-align:left;"> TQRMNOSWVHKMKOCDEHPJB00790947 </td> 3650 <td style="text-align:right;"> 1 </td> 3651 <td style="text-align:right;"> 29 </td> 3652 <td style="text-align:right;"> 10360.00 </td> 3653 <td style="text-align:right;"> 1 </td> 3654 </tr> 3655 <tr> 3656 <td style="text-align:left;"> TQRMNOSWVHKMKOCDEHPJB00790947 </td> 3657 <td style="text-align:right;"> 1 </td> 3658 <td style="text-align:right;"> 29 </td> 3659 <td style="text-align:right;"> 10360.00 </td> 3660 <td style="text-align:right;"> 1 </td> 3661 </tr> 3662 <tr> 3663 <td style="text-align:left;"> TQRMNOSWVHKMKOCDEHPJB00790947 </td> 3664 <td style="text-align:right;"> 1 </td> 3665 <td style="text-align:right;"> 29 </td> 3666 <td style="text-align:right;"> 10360.00 </td> 3667 <td style="text-align:right;"> 2 </td> 3668 </tr> 3669 <tr> 3670 <td style="text-align:left;"> TQRMNORRTHMMLLCDEOHCH00710640 </td> 3671 <td style="text-align:right;"> 1 </td> 3672 <td style="text-align:right;"> 91 </td> 3673 <td style="text-align:right;"> 42000.00 </td> 3674 <td style="text-align:right;"> 1 </td> 3675 </tr> 3676 <tr> 3677 <td style="text-align:left;"> TQRMNORRTHMMLLCDEOHCH00710640 </td> 3678 <td style="text-align:right;"> 1 </td> 3679 <td style="text-align:right;"> 91 </td> 3680 <td style="text-align:right;"> 42000.00 </td> 3681 <td style="text-align:right;"> 2 </td> 3682 </tr> 3683 <tr> 3684 <td style="text-align:left;"> TQRMNORRTHMMLLCDEOHCH00710640 </td> 3685 <td style="text-align:right;"> 1 </td> 3686 <td style="text-align:right;"> 91 </td> 3687 <td style="text-align:right;"> 42000.00 </td> 3688 <td style="text-align:right;"> 1 </td> 3689 </tr> 3690 <tr> 3691 <td style="text-align:left;"> TQRMNORRTHMMLLCDEOHCH00710640 </td> 3692 <td style="text-align:right;"> 1 </td> 3693 <td style="text-align:right;"> 91 </td> 3694 <td style="text-align:right;"> 42000.00 </td> 3695 <td style="text-align:right;"> 1 </td> 3696 </tr> 3697 <tr> 3698 <td style="text-align:left;"> TQRMNOQVXHMOKUCDEFNFF00710948 </td> 3699 <td style="text-align:right;"> 1 </td> 3700 <td style="text-align:right;"> 7 </td> 3701 <td style="text-align:right;"> 23020.00 </td> 3702 <td style="text-align:right;"> 1 </td> 3703 </tr> 3704 <tr> 3705 <td style="text-align:left;"> TQRMNOQVXHMOKUCDEFNFF00710948 </td> 3706 <td style="text-align:right;"> 1 </td> 3707 <td style="text-align:right;"> 7 </td> 3708 <td style="text-align:right;"> 23020.00 </td> 3709 <td style="text-align:right;"> 2 </td> 3710 </tr> 3711 <tr> 3712 <td style="text-align:left;"> TQRMNOQVXHMOKUCDEFNFF00710948 </td> 3713 <td style="text-align:right;"> 1 </td> 3714 <td style="text-align:right;"> 7 </td> 3715 <td style="text-align:right;"> 23020.00 </td> 3716 <td style="text-align:right;"> 2 </td> 3717 </tr> 3718 <tr> 3719 <td style="text-align:left;"> TQRMNOQVXHMOKUCDEFNFF00710948 </td> 3720 <td style="text-align:right;"> 1 </td> 3721 <td style="text-align:right;"> 7 </td> 3722 <td style="text-align:right;"> 23020.00 </td> 3723 <td style="text-align:right;"> 2 </td> 3724 </tr> 3725 <tr> 3726 <td style="text-align:left;"> TQRMNOQVXHMOKUCDEFNFF00710948 </td> 3727 <td style="text-align:right;"> 1 </td> 3728 <td style="text-align:right;"> 7 </td> 3729 <td style="text-align:right;"> 23020.00 </td> 3730 <td style="text-align:right;"> 1 </td> 3731 </tr> 3732 <tr> 3733 <td style="text-align:left;"> TQRMNOPXUHLMKUCDEGOIH00706727 </td> 3734 <td style="text-align:right;"> 1 </td> 3735 <td style="text-align:right;"> 18 </td> 3736 <td style="text-align:right;"> 26666.67 </td> 3737 <td style="text-align:right;"> 1 </td> 3738 </tr> 3739 <tr> 3740 <td style="text-align:left;"> TQRMNOPXUHLMKUCDEGOIH00706727 </td> 3741 <td style="text-align:right;"> 1 </td> 3742 <td style="text-align:right;"> 18 </td> 3743 <td style="text-align:right;"> 26666.67 </td> 3744 <td style="text-align:right;"> 2 </td> 3745 </tr> 3746 <tr> 3747 <td style="text-align:left;"> TQRMNOPXUHLMKUCDEGOIH00706727 </td> 3748 <td style="text-align:right;"> 1 </td> 3749 <td style="text-align:right;"> 18 </td> 3750 <td style="text-align:right;"> 26666.67 </td> 3751 <td style="text-align:right;"> 1 </td> 3752 </tr> 3753 <tr> 3754 <td style="text-align:left;"> TQRMNOPPTHMMLMCDEGIBJ00712052 </td> 3755 <td style="text-align:right;"> 1 </td> 3756 <td style="text-align:right;"> 12 </td> 3757 <td style="text-align:right;"> 37950.00 </td> 3758 <td style="text-align:right;"> 1 </td> 3759 </tr> 3760 <tr> 3761 <td style="text-align:left;"> TQRMNOPPTHMMLMCDEGIBJ00712052 </td> 3762 <td style="text-align:right;"> 1 </td> 3763 <td style="text-align:right;"> 12 </td> 3764 <td style="text-align:right;"> 37950.00 </td> 3765 <td style="text-align:right;"> 2 </td> 3766 </tr> 3767 <tr> 3768 <td style="text-align:left;"> TQRMNOPPTHMMLMCDEGIBJ00712052 </td> 3769 <td style="text-align:right;"> 1 </td> 3770 <td style="text-align:right;"> 12 </td> 3771 <td style="text-align:right;"> 37950.00 </td> 3772 <td style="text-align:right;"> 2 </td> 3773 </tr> 3774 <tr> 3775 <td style="text-align:left;"> TQRMNOPPTHMMLMCDEGIBJ00712052 </td> 3776 <td style="text-align:right;"> 1 </td> 3777 <td style="text-align:right;"> 12 </td> 3778 <td style="text-align:right;"> 37950.00 </td> 3779 <td style="text-align:right;"> 2 </td> 3780 </tr> 3781 <tr> 3782 <td style="text-align:left;"> TQRMNOQSUHMLKTCDEHIBB00717071 </td> 3783 <td style="text-align:right;"> 1 </td> 3784 <td style="text-align:right;"> 22 </td> 3785 <td style="text-align:right;"> 97500.00 </td> 3786 <td style="text-align:right;"> 2 </td> 3787 </tr> 3788 <tr> 3789 <td style="text-align:left;"> TQRMNOQSUHMLKTCDEHIBB00717071 </td> 3790 <td style="text-align:right;"> 1 </td> 3791 <td style="text-align:right;"> 22 </td> 3792 <td style="text-align:right;"> 97500.00 </td> 3793 <td style="text-align:right;"> 1 </td> 3794 </tr> 3795 <tr> 3796 <td style="text-align:left;"> TQRMNOQSQHMLKTCDEHIBB00709425 </td> 3797 <td style="text-align:right;"> 1 </td> 3798 <td style="text-align:right;"> 22 </td> 3799 <td style="text-align:right;"> 31000.00 </td> 3800 <td style="text-align:right;"> 2 </td> 3801 </tr> 3802 <tr> 3803 <td style="text-align:left;"> TQRMNOQSQHMLKTCDEHIBB00709425 </td> 3804 <td style="text-align:right;"> 1 </td> 3805 <td style="text-align:right;"> 22 </td> 3806 <td style="text-align:right;"> 31000.00 </td> 3807 <td style="text-align:right;"> 1 </td> 3808 </tr> 3809 <tr> 3810 <td style="text-align:left;"> TQRMNOQSQHMLKTCDEHIBB00709425 </td> 3811 <td style="text-align:right;"> 1 </td> 3812 <td style="text-align:right;"> 22 </td> 3813 <td style="text-align:right;"> 31000.00 </td> 3814 <td style="text-align:right;"> 1 </td> 3815 </tr> 3816 <tr> 3817 <td style="text-align:left;"> TQRMNOQSQHMLKTCDEHIBB00709425 </td> 3818 <td style="text-align:right;"> 1 </td> 3819 <td style="text-align:right;"> 22 </td> 3820 <td style="text-align:right;"> 31000.00 </td> 3821 <td style="text-align:right;"> 2 </td> 3822 </tr> 3823 <tr> 3824 <td style="text-align:left;"> TQRMNOQTVHJMKTCDEHIBB00784254 </td> 3825 <td style="text-align:right;"> 1 </td> 3826 <td style="text-align:right;"> 22 </td> 3827 <td style="text-align:right;"> 62500.00 </td> 3828 <td style="text-align:right;"> 2 </td> 3829 </tr> 3830 <tr> 3831 <td style="text-align:left;"> TQRMNOQTVHJMKTCDEHIBB00784254 </td> 3832 <td style="text-align:right;"> 1 </td> 3833 <td style="text-align:right;"> 22 </td> 3834 <td style="text-align:right;"> 62500.00 </td> 3835 <td style="text-align:right;"> 1 </td> 3836 </tr> 3837 <tr> 3838 <td style="text-align:left;"> TQRMNOQXUHLMRQCDEIJAH00706181 </td> 3839 <td style="text-align:right;"> 1 </td> 3840 <td style="text-align:right;"> 33 </td> 3841 <td style="text-align:right;"> 39500.00 </td> 3842 <td style="text-align:right;"> 1 </td> 3843 </tr> 3844 <tr> 3845 <td style="text-align:left;"> TQRMNOQXUHLMRQCDEIJAH00706181 </td> 3846 <td style="text-align:right;"> 1 </td> 3847 <td style="text-align:right;"> 33 </td> 3848 <td style="text-align:right;"> 39500.00 </td> 3849 <td style="text-align:right;"> 2 </td> 3850 </tr> 3851 <tr> 3852 <td style="text-align:left;"> TQRMNORPQHLMKSCDEHJGH00790306 </td> 3853 <td style="text-align:right;"> 1 </td> 3854 <td style="text-align:right;"> 23 </td> 3855 <td style="text-align:right;"> 0.00 </td> 3856 <td style="text-align:right;"> 1 </td> 3857 </tr> 3858 <tr> 3859 <td style="text-align:left;"> TQRMNORPQHLMKSCDEHJGH00790306 </td> 3860 <td style="text-align:right;"> 1 </td> 3861 <td style="text-align:right;"> 23 </td> 3862 <td style="text-align:right;"> 0.00 </td> 3863 <td style="text-align:right;"> 2 </td> 3864 </tr> 3865 <tr> 3866 <td style="text-align:left;"> TQRMNORPQHLMKSCDEHJGH00790306 </td> 3867 <td style="text-align:right;"> 1 </td> 3868 <td style="text-align:right;"> 23 </td> 3869 <td style="text-align:right;"> 0.00 </td> 3870 <td style="text-align:right;"> 2 </td> 3871 </tr> 3872 <tr> 3873 <td style="text-align:left;"> TQRMNORPQHLMKSCDEHJGH00790306 </td> 3874 <td style="text-align:right;"> 1 </td> 3875 <td style="text-align:right;"> 23 </td> 3876 <td style="text-align:right;"> 0.00 </td> 3877 <td style="text-align:right;"> 2 </td> 3878 </tr> 3879 <tr> 3880 <td style="text-align:left;"> TQRMNORPQHLMKSCDEHJGH00790306 </td> 3881 <td style="text-align:right;"> 1 </td> 3882 <td style="text-align:right;"> 23 </td> 3883 <td style="text-align:right;"> 0.00 </td> 3884 <td style="text-align:right;"> 2 </td> 3885 </tr> 3886 <tr> 3887 <td style="text-align:left;"> TQRMNORUPHJMKUCDEHGHJ00784183 </td> 3888 <td style="text-align:right;"> 1 </td> 3889 <td style="text-align:right;"> 20 </td> 3890 <td style="text-align:right;"> 81000.00 </td> 3891 <td style="text-align:right;"> 1 </td> 3892 </tr> 3893 <tr> 3894 <td style="text-align:left;"> TQRMNORUPHJMKUCDEHGHJ00784183 </td> 3895 <td style="text-align:right;"> 1 </td> 3896 <td style="text-align:right;"> 20 </td> 3897 <td style="text-align:right;"> 81000.00 </td> 3898 <td style="text-align:right;"> 2 </td> 3899 </tr> 3900 <tr> 3901 <td style="text-align:left;"> TQRMNOQXUHMLSNCDEIJAH00719506 </td> 3902 <td style="text-align:right;"> 1 </td> 3903 <td style="text-align:right;"> 33 </td> 3904 <td style="text-align:right;"> 62500.00 </td> 3905 <td style="text-align:right;"> 2 </td> 3906 </tr> 3907 <tr> 3908 <td style="text-align:left;"> TQRMNOQXUHMLSNCDEIJAH00719506 </td> 3909 <td style="text-align:right;"> 1 </td> 3910 <td style="text-align:right;"> 33 </td> 3911 <td style="text-align:right;"> 62500.00 </td> 3912 <td style="text-align:right;"> 1 </td> 3913 </tr> 3914 <tr> 3915 <td style="text-align:left;"> TQRMNOTXVHJOPSCDEIJAH00786237 </td> 3916 <td style="
3916text-align:right;"> 2 </td> 3917 <td style="text-align:right;"> 33 </td> 3918 <td style="text-align:right;"> 32000.00 </td> 3919 <td style="text-align:right;"> 1 </td> 3920 </tr> 3921 <tr> 3922 <td style="text-align:left;"> TQRMNOTXVHJOPSCDEIJAH00786237 </td> 3923 <td style="text-align:right;"> 2 </td> 3924 <td style="text-align:right;"> 33 </td> 3925 <td style="text-align:right;"> 32000.00 </td> 3926 <td style="text-align:right;"> 2 </td> 3927 </tr> 3928 <tr> 3929 <td style="text-align:left;"> TQRMNOQYPHMOKRCDEGLDF00713344 </td> 3930 <td style="text-align:right;"> 1 </td> 3931 <td style="text-align:right;"> 15 </td> 3932 <td style="text-align:right;"> 27750.00 </td> 3933 <td style="text-align:right;"> 2 </td> 3934 </tr> 3935 <tr> 3936 <td style="text-align:left;"> TQRMNOQYPHMOKRCDEGLDF00713344 </td> 3937 <td style="text-align:right;"> 1 </td> 3938 <td style="text-align:right;"> 15 </td> 3939 <td style="text-align:right;"> 27750.00 </td> 3940 <td style="text-align:right;"> 2 </td> 3941 </tr> 3942 <tr> 3943 <td style="text-align:left;"> TQRMNORPUHJNOLCDEIIAD00785503 </td> 3944 <td style="text-align:right;"> 1 </td> 3945 <td style="text-align:right;"> 32 </td> 3946 <td style="text-align:right;"> 110000.00 </td> 3947 <td style="text-align:right;"> 1 </td> 3948 </tr> 3949</tbody> 3950</table></div> 3951 3952] 3953 3954.panel[.panel-name[Paso 2] 3955 3956Finalmente nos quedamos con las filas que cumplen las condiciones que impusimos 3957 3958 3959 3960```r 3961rcia_short <- eph_ind %>% 3962 select(CODUSU, NRO_HOGAR, AGLOMERADO, IPCF, CH04) %>% 3963* filter(AGLOMERADO==18 & !is.na(IPCF) & CH04==2) 3964``` 3965 3966<div style="border: 1px solid #ddd; padding: 0px; overflow-y: scroll; height:375px; overflow-x: scroll; width:100%; "><table class="table" style="font-size: 13px; margin-left: auto; margin-right: auto;"> 3967 <thead> 3968 <tr> 3969 <th style="text-align:left;position: sticky; top:0; background-color: #FFFFFF;"> CODUSU </th> 3970 <th style="text-align:right;position: sticky; top:0; background-color: #FFFFFF;"> NRO_HOGAR </th> 3971 <th style="text-align:right;position: sticky; top:0; background-color: #FFFFFF;"> AGLOMERADO </th> 3972 <th style="text-align:right;position: sticky; top:0; background-color: #FFFFFF;"> IPCF </th> 3973 <th style="text-align:right;position: sticky; top:0; background-color: #FFFFFF;"> CH04 </th> 3974 </tr> 3975 </thead> 3976<tbody> 3977 <tr> 3978 <td style="text-align:left;"> TQRMNOPXUHLMKUCDEGOIH00706727 </td> 3979 <td style="text-align:right;"> 1 </td> 3980 <td style="text-align:right;"> 18 </td> 3981 <td style="text-align:right;"> 26666.67 </td> 3982 <td style="text-align:right;"> 2 </td> 3983 </tr> 3984 <tr> 3985 <td style="text-align:left;"> TQRMNOQQWHKOKRCDEGOIH00789766 </td> 3986 <td style="text-align:right;"> 1 </td> 3987 <td style="text-align:right;"> 18 </td> 3988 <td style="text-align:right;"> 20500.00 </td> 3989 <td style="text-align:right;"> 2 </td> 3990 </tr> 3991 <tr> 3992 <td style="text-align:left;"> TQRMNOQUQHLOKSCDEGOIH00706615 </td> 3993 <td style="text-align:right;"> 1 </td> 3994 <td style="text-align:right;"> 18 </td> 3995 <td style="text-align:right;"> 31540.00 </td> 3996 <td style="text-align:right;"> 2 </td> 3997 </tr> 3998 <tr> 3999 <td style="text-align:left;"> TQRMNOQUQHLOKSCDEGOIH00706615 </td> 4000 <td style="text-align:right;"> 1 </td> 4001 <td style="text-align:right;"> 18 </td> 4002 <td style="text-align:right;"> 31540.00 </td> 4003 <td style="text-align:right;"> 2 </td> 4004 </tr> 4005 <tr> 4006 <td style="text-align:left;"> TQRMNOQUQHLOKSCDEGOIH00706615 </td> 4007 <td style="text-align:right;"> 1 </td> 4008 <td style="text-align:right;"> 18 </td> 4009 <td style="text-align:right;"> 31540.00 </td> 4010 <td style="text-align:right;"> 2 </td> 4011 </tr> 4012 <tr> 4013 <td style="text-align:left;"> TQRMNOQUTHMMKUCDEGOIH00714113 </td> 4014 <td style="text-align:right;"> 1 </td> 4015 <td style="text-align:right;"> 18 </td> 4016 <td style="text-align:right;"> 39357.14 </td> 4017 <td style="text-align:right;"> 2 </td> 4018 </tr> 4019 <tr> 4020 <td style="text-align:left;"> TQRMNOQUTHMMKUCDEGOIH00714113 </td> 4021 <td style="text-align:right;"> 1 </td> 4022 <td style="text-align:right;"> 18 </td> 4023 <td style="text-align:right;"> 39357.14 </td> 4024 <td style="text-align:right;"> 2 </td> 4025 </tr> 4026 <tr> 4027 <td style="text-align:left;"> TQRMNOQUTHMMKUCDEGOIH00714113 </td> 4028 <td style="text-align:right;"> 1 </td> 4029 <td style="text-align:right;"> 18 </td> 4030 <td style="text-align:right;"> 39357.14 </td> 4031 <td style="text-align:right;"> 2 </td> 4032 </tr> 4033 <tr> 4034 <td style="text-align:left;"> TQRMNOQTYHLOKSCDEGOIH00707817 </td> 4035 <td style="text-align:right;"> 1 </td> 4036 <td style="text-align:right;"> 18 </td> 4037 <td style="text-align:right;"> 11300.00 </td> 4038 <td style="text-align:right;"> 2 </td> 4039 </tr> 4040 <tr> 4041 <td style="text-align:left;"> TQRMNOQTYHLOKSCDEGOIH00707817 </td> 4042 <td style="text-align:right;"> 1 </td> 4043 <td style="text-align:right;"> 18 </td> 4044 <td style="text-align:right;"> 11300.00 </td> 4045 <td style="text-align:right;"> 2 </td> 4046 </tr> 4047 <tr> 4048 <td style="text-align:left;"> TQRMNOQTYHLOKSCDEGOIH00707817 </td> 4049 <td style="text-align:right;"> 1 </td> 4050 <td style="text-align:right;"> 18 </td> 4051 <td style="text-align:right;"> 11300.00 </td> 4052 <td style="text-align:right;"> 2 </td> 4053 </tr> 4054 <tr> 4055 <td style="text-align:left;"> TQRMNORUXHJOKMCDEGOIH00783893 </td> 4056 <td style="text-align:right;"> 1 </td> 4057 <td style="text-align:right;"> 18 </td> 4058 <td style="text-align:right;"> 11666.67 </td> 4059 <td style="text-align:right;"> 2 </td> 4060 </tr> 4061 <tr> 4062 <td style="text-align:left;"> TQRMNORUXHJOKMCDEGOIH00783893 </td> 4063 <td style="text-align:right;"> 1 </td> 4064 <td style="text-align:right;"> 18 </td> 4065 <td style="text-align:right;"> 11666.67 </td> 4066 <td style="text-align:right;"> 2 </td> 4067 </tr> 4068 <tr> 4069 <td style="text-align:left;"> TQRMNORUXHJOKMCDEGOIH00783893 </td> 4070 <td style="text-align:right;"> 1 </td> 4071 <td style="text-align:right;"> 18 </td> 4072 <td style="text-align:right;"> 11666.67 </td> 4073 <td style="text-align:right;"> 2 </td> 4074 </tr> 4075 <tr> 4076 <td style="text-align:left;"> TQRMNOQWRHMMLOCDEGOIH00710799 </td> 4077 <td style="text-align:right;"> 1 </td> 4078 <td style="text-align:right;"> 18 </td> 4079 <td style="text-align:right;"> 29083.33 </td> 4080 <td style="text-align:right;"> 2 </td> 4081 </tr> 4082 <tr> 4083 <td style="text-align:left;"> TQRMNOQWRHMMLOCDEGOIH00710799 </td> 4084 <td style="text-align:right;"> 1 </td> 4085 <td style="text-align:right;"> 18 </td> 4086 <td style="text-align:right;"> 29083.33 </td> 4087 <td style="text-align:right;"> 2 </td> 4088 </tr> 4089 <tr> 4090 <td style="text-align:left;"> TQRMNOQWRHMMLOCDEGOIH00710799 </td> 4091 <td style="text-align:right;"> 1 </td> 4092 <td style="text-align:right;"> 18 </td> 4093 <td style="text-align:right;"> 29083.33 </td> 4094 <td style="text-align:right;"> 2 </td> 4095 </tr> 4096 <tr> 4097 <td style="text-align:left;"> TQRMNOQWRHMMLOCDEGOIH00710799 </td> 4098 <td style="text-align:right;"> 1 </td> 4099 <td style="text-align:right;"> 18 </td> 4100 <td style="text-align:right;"> 29083.33 </td> 4101 <td style="text-align:right;"> 2 </td> 4102 </tr> 4103 <tr> 4104 <td style="text-align:left;"> TQRMNOSUUHKOKQCDEGOIH00789706 </td> 4105 <td style="text-align:right;"> 2 </td> 4106 <td style="text-align:right;"> 18 </td> 4107 <td style="text-align:right;"> 8850.00 </td> 4108 <td style="text-align:right;"> 2 </td> 4109 </tr> 4110 <tr> 4111 <td style="text-align:left;"> TQRMNOSUUHKOKQCDEGOIH00789706 </td> 4112 <td style="text-align:right;"> 2 </td> 4113 <td style="text-align:right;"> 18 </td> 4114 <td style="text-align:right;"> 8850.00 </td> 4115 <td style="text-align:right;"> 2 </td> 4116 </tr> 4117 <tr> 4118 <td style="text-align:left;"> TQRMNOSUUHKOKQCDEGOIH00789706 </td> 4119 <td style="text-align:right;"> 2 </td> 4120 <td style="text-align:right;"> 18 </td> 4121 <td style="text-align:right;"> 8850.00 </td> 4122 <td style="text-align:right;"> 2 </td> 4123 </tr> 4124 <tr> 4125 <td style="text-align:left;"> TQRMNOPWYHLOKMCDEGOIH00707843 </td> 4126 <td style="text-align:right;"> 1 </td> 4127 <td style="text-align:right;"> 18 </td> 4128 <td style="text-align:right;"> 31583.33 </td> 4129 <td style="text-align:right;"> 2 </td> 4130 </tr> 4131 <tr> 4132 <td style="text-align:left;"> TQRMNOPWYHLOKMCDEGOIH00707843 </td> 4133 <td style="text-align:right;"> 1 </td> 4134 <td style="text-align:right;"> 18 </td> 4135 <td style="text-align:right;"> 31583.33 </td> 4136 <td style="text-align:right;"> 2 </td> 4137 </tr> 4138 <tr> 4139 <td style="text-align:left;"> TQRMNOPWYHLOKMCDEGOIH00707843 </td> 4140 <td style="text-align:right;"> 1 </td> 4141 <td style="text-align:right;"> 18 </td> 4142 <td style="text-align:right;"> 31583.33 </td> 4143 <td style="text-align:right;"> 2 </td> 4144 </tr> 4145 <tr> 4146 <td style="text-align:left;"> TQRMNOQRVHLOLOCDEGOIH00706471 </td> 4147 <td style="text-align:right;"> 1 </td> 4148 <td style="text-align:right;"> 18 </td> 4149 <td style="text-align:right;"> 35900.00 </td> 4150 <td style="text-align:right;"> 2 </td> 4151 </tr> 4152 <tr> 4153 <td style="text-align:left;"> TQRMNOQRVHLOLOCDEGOIH00706471 </td> 4154 <td style="text-align:right;"> 1 </td> 4155 <td style="text-align:right;"> 18 </td> 4156 <td style="text-align:right;"> 35900.00 </td> 4157 <td style="text-align:right;"> 2 </td> 4158 </tr> 4159 <tr> 4160 <td style="text-align:left;"> TQRMNOQRVHLOLOCDEGOIH00706471 </td> 4161 <td style="text-align:right;"> 1 </td> 4162 <td style="text-align:right;"> 18 </td> 4163 <td style="text-align:right;"> 35900.00 </td> 4164 <td style="text-align:right;"> 2 </td> 4165 </tr> 4166 <tr> 4167 <td style="text-align:left;"> TQRMNOQRVHLOLOCDEGOIH00706471 </td> 4168 <td style="text-align:right;"> 1 </td> 4169 <td style="text-align:right;"> 18 </td> 4170 <td style="text-align:right;"> 35900.00 </td> 4171 <td style="text-align:right;"> 2 </td> 4172 </tr> 4173 <tr> 4174 <td style="text-align:left;"> TQRMNOPVQHLMLPCDEGOIH00706831 </td> 4175 <td style="text-align:right;"> 1 </td> 4176 <td style="text-align:right;"> 18 </td> 4177 <td style="text-align:right;"> 45000.00 </td> 4178 <td style="text-align:right;"> 2 </td> 4179 </tr> 4180 <tr> 4181 <td style="text-align:left;"> TQRMNORPQHMMLMCDEGOIH00711885 </td> 4182 <td style="text-align:right;"> 1 </td> 4183 <td style="text-align:right;"> 18 </td> 4184 <td style="text-align:right;"> 64700.00 </td> 4185 <td style="text-align:right;"> 2 </td> 4186 </tr> 4187 <tr> 4188 <td style="text-align:left;"> TQRMNORPYHMOLPCDEGOIH00714204 </td> 4189 <td style="text-align:right;"> 1 </td> 4190 <td style="text-align:right;"> 18 </td> 4191 <td style="text-align:right;"> 35000.00 </td> 4192 <td style="text-align:right;"> 2 </td> 4193 </tr> 4194 <tr> 4195 <td style="text-align:left;"> TQRMNOQRXHLOLOCDEGOIH00706675 </td> 4196 <td style="text-align:right;"> 1 </td> 4197 <td style="text-align:right;"> 18 </td> 4198 <td style="text-align:right;"> 14750.00 </td> 4199 <td style="text-align:right;"> 2 </td> 4200 </tr> 4201 <tr> 4202 <td style="text-align:left;"> TQRMNOSUUHLOKSCDEGOIH00783865 </td> 4203 <td style="text-align:right;"> 1 </td> 4204 <td style="text-align:right;"> 18 </td> 4205 <td style="text-align:right;"> 110000.00 </td> 4206 <td style="text-align:right;"> 2 </td> 4207 </tr> 4208 <tr> 4209 <td style="text-align:left;"> TQRMNOQPPHMOLPCDEGOIH00713798 </td> 4210 <td style="text-align:right;"> 1 </td> 4211 <td style="text-align:right;"> 18 </td> 4212 <td style="text-align:right;"> 25000.00 </td> 4213 <td style="text-align:right;"> 2 </td> 4214 </tr> 4215 <tr> 4216 <td style="text-align:left;"> TQRMNOQPPHMOLPCDEGOIH00713798 </td> 4217 <td style="text-align:right;"> 1 </td> 4218 <td style="text-align:right;"> 18 </td> 4219 <td style="text-align:right;"> 25000.00 </td> 4220 <td style="text-align:right;"> 2 </td> 4221 </tr> 4222 <tr> 4223 <td style="text-align:left;"> TQRMNOQXUHKLLQCDEGOIH00789760 </td> 4224 <td style="text-align:right;"> 1 </td> 4225 <td style="text-align:right;"> 18 </td> 4226 <td style="text-align:right;"> 0.00 </td> 4227 <td style="text-align:right;"> 2 </td> 4228 </tr> 4229 <tr> 4230 <td style="text-align:left;"> TQRMNOPXVHLLLQCDEGOIH00705672 </td> 4231 <td style="text-align:right;"> 1 </td> 4232 <td style="text-align:right;"> 18 </td> 4233 <td style="text-align:right;"> 30000.00 </td> 4234 <td style="text-align:right;"> 2 </td> 4235 </tr> 4236 <tr> 4237 <td style="text-align:left;"> TQRMNOQRWHLOLOCDEGOIH00706647 </td> 4238 <td style="text-align:right;"> 1 </td> 4239 <td style="text-align:right;"> 18 </td> 4240 <td style="text-align:right;"> 24250.00 </td> 4241 <td style="text-align:right;"> 2 </td> 4242 </tr> 4243 <tr> 4244 <td style="text-align:left;"> TQRMNOSRYHLLLQCDEGOIH00705677 </td> 4245 <td style="text-align:right;"> 1 </td> 4246 <td style="text-align:right;"> 18 </td> 4247 <td style="text-align:right;"> 23333.33 </td> 4248 <td style="text-align:right;"> 2 </td> 4249 </tr> 4250 <tr> 4251 <td style="text-align:left;"> TQRMNOSRYHLLLQCDEGOIH00705677 </td> 4252 <td style="text-align:right;"> 1 </td> 4253 <td style="text-align:right;"> 18 </td> 4254 <td style="text-align:right;"> 23333.33 </td> 4255 <td style="text-align:right;"> 2 </td> 4256 </tr> 4257 <tr> 4258 <td style="tex
4258t-align:left;"> TQRMNOVSPHKOKPCDEGOIH00789764 </td> 4259 <td style="text-align:right;"> 1 </td> 4260 <td style="text-align:right;"> 18 </td> 4261 <td style="text-align:right;"> 19258.33 </td> 4262 <td style="text-align:right;"> 2 </td> 4263 </tr> 4264 <tr> 4265 <td style="text-align:left;"> TQRMNOVSPHKOKPCDEGOIH00789764 </td> 4266 <td style="text-align:right;"> 1 </td> 4267 <td style="text-align:right;"> 18 </td> 4268 <td style="text-align:right;"> 19258.33 </td> 4269 <td style="text-align:right;"> 2 </td> 4270 </tr> 4271 <tr> 4272 <td style="text-align:left;"> TQRMNOVSPHKOKPCDEGOIH00789764 </td> 4273 <td style="text-align:right;"> 1 </td> 4274 <td style="text-align:right;"> 18 </td> 4275 <td style="text-align:right;"> 19258.33 </td> 4276 <td style="text-align:right;"> 2 </td> 4277 </tr> 4278 <tr> 4279 <td style="text-align:left;"> TQRMNOVSPHKOKPCDEGOIH00789764 </td> 4280 <td style="text-align:right;"> 1 </td> 4281 <td style="text-align:right;"> 18 </td> 4282 <td style="text-align:right;"> 19258.33 </td> 4283 <td style="text-align:right;"> 2 </td> 4284 </tr> 4285 <tr> 4286 <td style="text-align:left;"> TQRMNOVRYHKOKPCDEGOIH00789765 </td> 4287 <td style="text-align:right;"> 1 </td> 4288 <td style="text-align:right;"> 18 </td> 4289 <td style="text-align:right;"> 9400.00 </td> 4290 <td style="text-align:right;"> 2 </td> 4291 </tr> 4292 <tr> 4293 <td style="text-align:left;"> TQRMNORWTHJMKOCDEGOIH00783880 </td> 4294 <td style="text-align:right;"> 1 </td> 4295 <td style="text-align:right;"> 18 </td> 4296 <td style="text-align:right;"> 100833.33 </td> 4297 <td style="text-align:right;"> 2 </td> 4298 </tr> 4299 <tr> 4300 <td style="text-align:left;"> TQRMNOSUSHLOKSCDEGOIH00711215 </td> 4301 <td style="text-align:right;"> 1 </td> 4302 <td style="text-align:right;"> 18 </td> 4303 <td style="text-align:right;"> 30140.00 </td> 4304 <td style="text-align:right;"> 2 </td> 4305 </tr> 4306 <tr> 4307 <td style="text-align:left;"> TQRMNOSUSHLOKSCDEGOIH00711215 </td> 4308 <td style="text-align:right;"> 1 </td> 4309 <td style="text-align:right;"> 18 </td> 4310 <td style="text-align:right;"> 30140.00 </td> 4311 <td style="text-align:right;"> 2 </td> 4312 </tr> 4313 <tr> 4314 <td style="text-align:left;"> TQRMNOSUSHLOKSCDEGOIH00711215 </td> 4315 <td style="text-align:right;"> 1 </td> 4316 <td style="text-align:right;"> 18 </td> 4317 <td style="text-align:right;"> 30140.00 </td> 4318 <td style="text-align:right;"> 2 </td> 4319 </tr> 4320 <tr> 4321 <td style="text-align:left;"> TQRMNOQTXHLOKSCDEGOIH00706614 </td> 4322 <td style="text-align:right;"> 1 </td> 4323 <td style="text-align:right;"> 18 </td> 4324 <td style="text-align:right;"> 27200.00 </td> 4325 <td style="text-align:right;"> 2 </td> 4326 </tr> 4327</tbody> 4328</table></div> 4329 4330] 4331 4332] 4333 4334--- 4335 4336## Select() 4337 4338Esta misma función también me permite reordenar las filas 4339 4340-- 4341 4342Supongamos que quiero traer adelante las filas sobre las que voy a aplicar una operación y dejar atrás los id 4343 4344 4345 4346```r 4347eph_short <- eph_ind %>% select(AGLOMERADO, IPCF, CH04, CODUSU, NRO_HOGAR) 4348``` 4349 4350-- 4351 4352 4353```r 4354names(eph_short) 4355``` 4356 4357``` 4358## [1] "AGLOMERADO" "IPCF" "CH04" "CODUSU" "NRO_HOGAR" 4359``` 4360 4361--- 4362 4363Un atajo para no especificar todas las demás columnas es es la función `everything()` dentro del `select()` 4364 4365 4366```r 4367eph_short <- eph_ind %>% select(AGLOMERADO, IPCF, CH04, everything()) 4368``` 4369 4370-- 4371 4372 4373```r 4374names(eph_short) 4375``` 4376 4377``` 4378## [1] "AGLOMERADO" "IPCF" "CH04" "CODUSU" "ANO4" 4379## [6] "TRIMESTRE" "NRO_HOGAR" "COMPONENTE" "H15" "REGION" 4380## [11] "MAS_500" "PONDERA" "CH03" "CH05" "CH06" 4381## [16] "CH07" "CH08" "CH09" "CH10" "CH11" 4382## [21] "CH12" "CH13" "CH14" "CH15" "CH15_COD" 4383## [26] "CH16" "CH16_COD" "NIVEL_ED" "ESTADO" "CAT_OCUP" 4384## [31] "CAT_INAC" "IMPUTA" "PP02C1" "PP02C2" "PP02C3" 4385## [36] "PP02C4" "PP02C5" "PP02C6" "PP02C7" "PP02C8" 4386## [41] "PP02E" "PP02H" "PP02I" "PP03C" "PP03D" 4387## [46] "PP3E_TOT" "PP3F_TOT" "PP03G" "PP03H" "PP03I" 4388## [51] "PP03J" "INTENSI" "PP04A" "PP04B_COD" "PP04B1" 4389## [56] "PP04B2" "PP04B3_MES" "PP04B3_ANO" "PP04B3_DIA" "PP04C"
4390## [61] "PP04C99" "PP04D_COD" "PP04G" "PP05B2_MES" "PP05B2_ANO" 4391## [66] "PP05B2_DIA" "PP05C_1" "PP05C_2" "PP05C_3" "PP05E" 4392## [71] "PP05F" "PP05H" "PP06A" "PP06C" "PP06D" 4393## [76] "PP06E" "PP06H" "PP07A" "PP07C" "PP07D" 4394## [81] "PP07E" "PP07F1" "PP07F2" "PP07F3" "PP07F4" 4395## [86] "PP07F5" "PP07G1" "PP07G2" "PP07G3" "PP07G4" 4396## [91] "PP07G_59" "PP07H" "PP07I" "PP07J" "PP07K" 4397## [96] "PP08D1" "PP08D4" "PP08F1" "PP08F2" "PP08J1" 4398## [101] "PP08J2" "PP08J3" "PP09A" "PP09A_ESP" "PP09B" 4399## [106] "PP09C" "PP09C_ESP" "PP10A" "PP10C" "PP10D" 4400## [111] "PP10E" "PP11A" "PP11B_COD" "PP11B1" "PP11B2_MES" 4401## [116] "PP11B2_ANO" "PP11B2_DIA" "PP11C" "PP11C99" "PP11D_COD" 4402## [121] "PP11G_ANO" "PP11G_MES" "PP11G_DIA" "PP11L" "PP11L1" 4403## [126] "PP11M" "PP11N" "PP11O" "PP11P" "PP11Q" 4404## [131] "PP11R" "PP11S" "PP11T" "P21" "DECOCUR" 4405## [136] "IDECOCUR" "RDECOCUR" "GDECOCUR" "PDECOCUR" "ADECOCUR" 4406## [141] "PONDIIO" "TOT_P12" "P47T" "DECINDR" "IDECINDR" 4407## [146] "RDECINDR" "GDECINDR" "PDECINDR" "ADECINDR" "PONDII" 4408## [151] "V2_M" "V3_M" "V4_M" "V5_M" "V8_M" 4409## [156] "V9_M" "V10_M" "V11_M" "V12_M" "V18_M" 4410## [161] "V19_AM" "V21_M" "T_VI" "ITF" "DECIFR" 4411## [166] "IDECIFR" "RDECIFR" "GDECIFR" "PDECIFR" "ADECIFR" 4412## [171] "DECCFR" "IDECCFR" "RDECCFR" "GDECCFR" "PDECCFR" 4413## [176] "ADECCFR" "PONDIH" 4414``` 4415 4416--- 4417 4418También es posible usar los `:` para seleccionar un rango de columnas consecutivas 4419 4420 4421 4422```r 4423eph_short <- eph_ind %>% select(AGLOMERADO, IPCF, CH04, NIVEL_ED:CAT_INAC) 4424``` 4425 4426-- 4427 4428 4429```r 4430names(eph_short) 4431``` 4432 4433``` 4434## [1] "AGLOMERADO" "IPCF" "CH04" "NIVEL_ED" "ESTADO" 4435## [6] "CAT_OCUP" "CAT_INAC" 4436``` 4437 4438<p>&nbsp;</p> 4439 4440-- 4441 4442Incluso podemos hacer esto mismo indicando las columnas con subindices de números y usando : 4443 4444 4445```r 4446eph_short <- eph_ind %>% select(9, 170, 12, 27:31) 4447``` 4448 4449-- 4450 4451 4452```r 4453names(eph_short) 4454``` 4455 4456``` 4457## [1] "AGLOMERADO" "IPCF" "CH04" "NIVEL_ED" "ESTADO" 4458## [6] "CAT_OCUP" "CAT_INAC" "IMPUTA" 4459``` 4460 4461--- 4462 4463## Select() 4464 4465La misma función nos permite también borrar columnas, para ello solo anteponemos `-` 4466 4467-- 4468 4469Para borrar por ejemplo la columna AGLOMERADO, serÃa simplemente 4470 4471 4472```r 4473eph_short <- eph_short %>% select(-AGLOMERADO) 4474``` 4475 4476-- 4477 4478 4479``` 4480## [1] "IPCF" "CH04" "NIVEL_ED" "ESTADO" "CAT_OCUP" "CAT_INAC" "IMPUTA" 4481``` 4482 4483De la misma manera que antes podemos borrar un conjunto de columnas con `:` y `()` 4484 4485 4486 4487```r 4488eph_short <- eph_short %>% select(-(NIVEL_ED:CAT_INAC), -IPCF) 4489``` 4490 4491-- 4492 4493 4494``` 4495## [1] "CH04" "IMPUTA" 4496``` 4497 4498 4499(También es posible borrar usando los números de columnas) 4500 4501--- 4502 4503## Select() 4504 4505Asà como la función `everything()` existen otras que se combinan muy bien con `select()` para poder manipular los datos 4506 4507 4508<div class="figure" style="text-align: center"> 4509<img src="inputs/Clase2/select.jpg" alt="Fuente:https://rsanchezs.gitbooks.io/rprogramming/content/chapter9/select.html" width="75%" height="75%" /> 4510<p class="caption">Fuente:https://rsanchezs.gitbooks.io/rprogramming/content/chapter9/select.html</p> 4511</div> 4512 4513--- 4514 4515## Select() 4516 4517Veamos un ejemplo: en el diseño de registro del EPH todas las preguntas que empiezan con *"PP08"* refieren a la ocupación principal de los asalariados. 4518 4519-- 4520 4521Si estamos interesados en mantener solo este set de preguntas en nuestra base podemos lograrlo fácilmente 4522 4523-- 4524 4525 4526```r 4527eph_asal <- eph_ind %>% select(CODUSU, NRO_HOGAR, starts_with("PP08")) 4528``` 4529-- 4530 4531 4532```r 4533names(eph_short) 4534``` 4535 4536``` 4537## [1] "CH04" "IMPUTA" 4538``` 4539 4540 4541--- 4542 4543- `filter()` 4544 4545- `select()` 4546 4547- **`rename()`** 4548 4549- `mutate()` 4550 4551- `summarise()` 4552 4553- `group_by()` 4554 4555- `distinct()` 4556 4557- `arrange()` 4558 4559 4560--- 4561 4562## Rename() 4563 4564Como su nombre lo indica permite renombrar las variables
4565 4566-- 4567 4568TIP: Los nombres van al revés que en Stata, primero nombre (*new_name*), luego nombre a reemplazar (*old_name*) 4569 4570-- 4571 4572 4573```r 4574rcia_short <- eph_ind %>% 4575 filter(AGLOMERADO==18 & !is.na(IPCF) & CH04==2) %>% 4576 select(CODUSU, NRO_HOGAR, AGLOMERADO, IPCF, CH04, CH06) %>% 4577* rename(sexo = CH04, edad = CH06) 4578``` 4579 4580-- 4581 4582 4583``` 4584## CODUSU NRO_HOGAR AGLOMERADO IPCF sexo edad 4585## 1 TQRMNOPXUHLMKUCDEGOIH00706727 1 18 26666.67 2 37 4586## 2 TQRMNOQQWHKOKRCDEGOIH00789766 1 18 20500.00 2 26 4587## 3 TQRMNOQUQHLOKSCDEGOIH00706615 1 18 31540.00 2 65 4588## 4 TQRMNOQUQHLOKSCDEGOIH00706615 1 18 31540.00 2 32 4589## 5 TQRMNOQUQHLOKSCDEGOIH00706615 1 18 31540.00 2 44 4590``` 4591 4592 4593--- 4594 4595## Rename() 4596 4597Nos quedaron columnas en mayúsculas y en minúsculas 4598 4599Una extensión de esta función, `rename_with()` nos permite renombrar varias columnas a la vez 4600 4601 4602```r 4603rcia_short <- eph_ind %>% 4604 filter(AGLOMERADO==18 & !is.na(IPCF) & CH04==2) %>% 4605 select(CODUSU, NRO_HOGAR, AGLOMERADO, IPCF, CH04, CH06) %>% 4606 rename(sexo = CH04, edad = CH06) %>% 4607* rename_with(tolower) 4608``` 4609 4610-- 4611 4612 4613```r 4614names(rcia_short) 4615``` 4616 4617``` 4618## [1] "codusu" "nro_hogar" "aglomerado" "ipcf" "sexo" 4619## [6] "edad" 4620``` 4621 4622 4623--- 4624 4625## Rename() 4626 4627Podemos realizar incluso operaciones un poco mas complejas. Para eso es importante conocer qué argumentos debemos especificar 4628 4629 `rename_with(.data, .fn, .cols, ...)` 4630 4631-- 4632 4633Esto se lee como: 4634 4635- debo indicarle sobre qué dataframe operar: `.data` 4636- qué función aplicar: `.fn` 4637- sobre cuáles columnas: `.cols` 4638 4639-- 4640 4641Veamos un ejemplo, supongamos que antes de juntar la base de individuos con la de hogares, quiero identificar a las variables de cada base. 4642 4643-- 4644 4645Para ello buscamos agregar el sufijo *_ind* a todas las variables 4646 4647Cómo harÃamos? 4648 4649 4650--- 4651 4652Vamos por parte 4653 4654 4655 - `.data`: no debo especificar, de eso se encarga %>% 4656 - `.cols`: quiero hacerlo sobre todas, entonces puedo usar la función `everything()` 4657 - `.fn`: tengo que pensar una función que a lo que ya tengo le agregue un sufijo 4658 4659-- 4660 4661Para esto último nos ayuda la función `paste()` 4662 4663-- 4664 4665 4666```r 4667eph_ind <- eph_ind %>% rename_with( .cols = everything(), 4668 .fn=function(x){ paste0(x, "_ind") } ) 4669``` 4670 4671Hacia el final del curso podremos entender mejor como opera y cuando necesitamos funciones del tipo `function(x){ paste0(x, "_ind") }` 4672 4673--- 4674 4675Por ahora, elijan creer 4676 4677 4678```r 4679names(eph_ind) 4680``` 4681 4682``` 4683## [1] "CODUSU_ind" "ANO4_ind" "TRIMESTRE_ind" "NRO_HOGAR_ind" 4684## [5] "COMPONENTE_ind" "H15_ind" "REGION_ind" "MAS_500_ind" 4685## [9] "AGLOMERADO_ind" "PONDERA_ind" "CH03_ind" "CH04_ind" 4686## [13] "CH05_ind" "CH06_ind" "CH07_ind" "CH08_ind" 4687## [17] "CH09_ind" "CH10_ind" "CH11_ind" "CH12_ind" 4688## [21] "CH13_ind" "CH14_ind" "CH15_ind" "CH15_COD_ind" 4689## [25] "CH16_ind" "CH16_COD_ind" "NIVEL_ED_ind" "ESTADO_ind" 4690## [29] "CAT_OCUP_ind" "CAT_INAC_ind" "IMPUTA_ind" "PP02C1_ind" 4691## [33] "PP02C2_ind" "PP02C3_ind" "PP02C4_ind" "PP02C5_ind" 4692## [37] "PP02C6_ind" "PP02C7_ind" "PP02C8_ind" "PP02E_ind" 4693## [41] "PP02H_ind" "PP02I_ind" "PP03C_ind" "PP03D_ind" 4694## [45] "PP3E_TOT_ind" "PP3F_TOT_ind" "PP03G_ind" "PP03H_ind" 4695## [49] "PP03I_ind" "PP03J_ind" "INTENSI_ind" "PP04A_ind" 4696## [53] "PP04B_COD_ind" "PP04B1_ind" "PP04B2_ind" "PP04B3_MES_ind" 4697## [57] "PP04B3_ANO_ind" "PP04B3_DIA_ind" "PP04C_ind" "PP04C99_ind" 4698## [61] "PP04D_COD_ind" "PP04G_ind" "PP05B2_MES_ind" "PP05B2_ANO_ind" 4699## [65] "PP05B2_DIA_ind" "PP05C_1_ind" "PP05C_2_ind" "PP05C_3_ind"
4700## [69] "PP05E_ind" "PP05F_ind" "PP05H_ind" "PP06A_ind" 4701## [73] "PP06C_ind" "PP06D_ind" "PP06E_ind" "PP06H_ind" 4702## [77] "PP07A_ind" "PP07C_ind" "PP07D_ind" "PP07E_ind" 4703## [81] "PP07F1_ind" "PP07F2_ind" "PP07F3_ind" "PP07F4_ind" 4704## [85] "PP07F5_ind" "PP07G1_ind" "PP07G2_ind" "PP07G3_ind" 4705## [89] "PP07G4_ind" "PP07G_59_ind" "PP07H_ind" "PP07I_ind" 4706## [93] "PP07J_ind" "PP07K_ind" "PP08D1_ind" "PP08D4_ind" 4707## [97] "PP08F1_ind" "PP08F2_ind" "PP08J1_ind" "PP08J2_ind" 4708## [101] "PP08J3_ind" "PP09A_ind" "PP09A_ESP_ind" "PP09B_ind" 4709## [105] "PP09C_ind" "PP09C_ESP_ind" "PP10A_ind" "PP10C_ind" 4710## [109] "PP10D_ind" "PP10E_ind" "PP11A_ind" "PP11B_COD_ind" 4711## [113] "PP11B1_ind" "PP11B2_MES_ind" "PP11B2_ANO_ind" "PP11B2_DIA_ind" 4712## [117] "PP11C_ind" "PP11C99_ind" "PP11D_COD_ind" "PP11G_ANO_ind" 4713## [121] "PP11G_MES_ind" "PP11G_DIA_ind" "PP11L_ind" "PP11L1_ind" 4714## [125] "PP11M_ind" "PP11N_ind" "PP11O_ind" "PP11P_ind" 4715## [129] "PP11Q_ind" "PP11R_ind" "PP11S_ind" "PP11T_ind" 4716## [133] "P21_ind" "DECOCUR_ind" "IDECOCUR_ind" "RDECOCUR_ind" 4717## [137] "GDECOCUR_ind" "PDECOCUR_ind" "ADECOCUR_ind" "PONDIIO_ind" 4718## [141] "TOT_P12_ind" "P47T_ind" "DECINDR_ind" "IDECINDR_ind" 4719## [145] "RDECINDR_ind" "GDECINDR_ind" "PDECINDR_ind" "ADECINDR_ind" 4720## [149] "PONDII_ind" "V2_M_ind" "V3_M_ind" "V4_M_ind" 4721## [153] "V5_M_ind" "V8_M_ind" "V9_M_ind" "V10_M_ind" 4722## [157] "V11_M_ind" "V12_M_ind" "V18_M_ind" "V19_AM_ind" 4723## [161] "V21_M_ind" "T_VI_ind" "ITF_ind" "DECIFR_ind" 4724## [165] "IDECIFR_ind" "RDECIFR_ind" "GDECIFR_ind" "PDECIFR_ind" 4725## [169] "ADECIFR_ind" "IPCF_ind" "DECCFR_ind" "IDECCFR_ind" 4726## [173] "RDECCFR_ind" "GDECCFR_ind" "PDECCFR_ind" "ADECCFR_ind" 4727## [177] "PONDIH_ind" 4728``` 4729 4730-- 4731 4732<p>&nbsp;</p> 4733<p>&nbsp;</p> 4734 4735[o googleen...](https://stackoverflow.com/questions/33741357/how-do-i-add-a-prefix-to-several-variable-names-using-dplyr) 4736 4737 4738--- 4739 4740 4741- `filter()` 4742 4743- `select()` 4744 4745- `rename()` 4746 4747- **`mutate()`** 4748 4749- `summarise()` 4750 4751- `group_by()` 4752 4753- `distinct()` 4754 4755- `arrange()` 4756 4757 4758--- 4759 4760## Mutate () 4761 4762Mutate es la función que nos permite transformar las columnas, crear y modificarlas. En general, sin ser exhaustivos, podemos aplicar distintos tipos de transformaciones 4763 4764-- 4765 4766 - Operación aritmética sobre los valores numéricos 4767 - Manipular caracteres en columnas de texto 4768 - Una operación entre dos columnas 4769 - Aplicarle cualquier función a la columna 4770 4771-- 4772 4773En todos los casos podemos crear una columna nueva o modificar la que ya existe 4774 4775-- 4776 4777Por ejemplo, si quisiéramos crear una columna con el IPCF en dolares: 4778 4779 4780 4781 4782```r 4783eph_ind <- eph_ind %>% 4784 mutate(IPCF_USD = as.numeric(IPCF)/390) 4785``` 4786 4787-- 4788 4789Notar que aquà aplicamos dos transformaciones, primero `as.numeric()` y luego dividimos por el tipo de cambio 4790 4791--- 4792 4793## Mutate () 4794 4795 4796Si queremos sumar los distintos ingresos laborales que puede tener una persona: 4797 4798- Monto de ingreso de la ocupación principal (*P21*) 4799- Monto de ingreso de otras ocupaciones (*TOT_P12*) 4800 4801-- 4802 4803 4804```r 4805eph_ind <- eph_ind %>% 4806 mutate(ILA_TOT = P21 + TOT_P12) 4807``` 4808 4809-- 4810 4811Si queremos trabajar con el logaritmo del ingreso de la ocupación principal, debemos crear la columna mediante la función `log()` 4812 4813 4814```r 4815eph_ind <- eph_ind %>% 4816 mutate(log_w = log(P21)) 4817``` 4818 4819 4820--- 4821 4822## Mutate () 4823 4824 4825Para el análisis de datos, muchas veces necesitamos crear variables binarias a partir de otras variables en la base 4826 4827-- 4828 4829Por ejemplo, en la EPH tenemos la variable *MAS_500* que indica si el aglomerada tiene mas de 500.000 habitantes 4830 4831 4832```r 4833table(eph_ind$MAS_500) 4834``` 4835 4836``` 4837## 4838## N S 4839## 26120 23112 4840``` 4841 4842-- 4843 4844Parece ser que es del tipo character 4845 4846 4847```r 4848is.character(eph_ind$MAS_500) 4849``` 4850 4851``` 4852## [1] TRUE 4853``` 4854 4855--- 4856 4857## Mutate () 4858 4859Supongamos que con ese umbral de 500 mil, definiremos un aglomerado como urbano o no, y para eso debemos crear una variable nueva, llamada *URBANO* 4860 4861-- 4862 4863Necesitamos un función que contemple condiciones: 4864 4865 - si MAS_500=="N" ; URBANO=0 4866 - si MAS_500=="S" ; URBANO=1 4867 4868-- 4869 4870`ifelse()` hace perfectamente este trabajo 4871 4872 4873```r 4874eph_ind <- eph_ind %>%
4875 mutate(URBANO = ifelse(MAS_500=="S", 1, 0)) 4876``` 4877 4878--- 4879 4880Entonces ahora puedo saber qué proporción de los encuestados vive en lo que definimos como zona urbana 4881 4882 4883```r 4884mean(eph_ind$URBANO) 4885``` 4886 4887``` 4888## [1] 0.4694508 4889``` 4890-- 4891 4892 4893```r 4894x <- round( mean(eph_ind$URBANO), digits=2)*100 4895 4896print(paste("el ", x, "% de las personas viven en zona urbana", sep="")) 4897``` 4898 4899``` 4900## [1] "el 47% de las personas viven en zona urbana" 4901``` 4902 4903--- 4904 4905## Mutate () 4906 4907¿Qué ocurre en casos donde la cantidad de condiciones posibles son mas de 2? 4908 4909Por ejemplo, en el caso de la variable región 4910 4911 4912 4913```r 4914table(eph_ind$REGION) 4915``` 4916 4917``` 4918## 4919## 1 40 41 42 43 44 4920## 7344 10842 5153 5183 14732 5978 4921``` 4922 4923Aquà necesitamos de la función `case_when()`. Como su nombre lo indica, lo lógica es: si pasa esto, tal cosa, si pasa esto otro tal otra y asà las veces que necesitemos 4924 4925--- 4926 4927Creemos una nueva variable indicativa de la región pero que ahora sea character 4928 4929 4930```r 4931eph_ind <- eph_ind %>% 4932 mutate(REGION_CH = case_when(REGION==1 ~ "Gran Buenos Aires", 4933 REGION==40 ~ "Noroeste", 4934 REGION==41 ~ "Nordeste", 4935 REGION==42 ~ "Cuyo", 4936 REGION==43 ~ "Pampeana", 4937 REGION==44 ~ "Patagónica")) #DOBLE() 4938``` 4939 4940 4941-- 4942 4943 4944```r 4945table(eph_ind$REGION_CH) 4946``` 4947 4948``` 4949## 4950## Cuyo Gran Buenos Aires Nordeste Noroeste 4951## 5183 7344 5153 10842 4952## Pampeana Patagónica 4953## 14732 5978 4954``` 4955 4956-- 4957 4958Nuevamente, es bueno visualizar lo que ocurre en la base de datos para entender mejor las transformaciones que realizamos 4959 4960 4961--- 4962 4963.panelset[ 4964 4965.panel[.panel-name[Linea inicial, Paso 1 y 2] 4966 4967 4968Empezamos llamando al data frame *eph_ind*, seleccionamos columnas de interés y filtramos a los ocupados 4969 4970.mid[ 4971 4972```r 4973ejemplo <- eph_ind %>% 4974 select(CODUSU, AGLOMERADO, ESTADO, P21, REGION) %>% 4975 filter(ESTADO==1) 4976``` 4977] 4978 4979<div style="border: 1px solid #ddd; padding: 0px; overflow-y: scroll; height:350px; overflow-x: scroll; width:100%; "><table class="table" style="font-size: 13px; margin-left: auto; margin-right: auto;"> 4980 <thead> 4981 <tr> 4982 <th style="text-align:left;position: sticky; top:0; background-color: #FFFFFF;"> CODUSU </th> 4983 <th style="text-align:right;position: sticky; top:0; background-color: #FFFFFF;"> AGLOMERADO </th> 4984 <th style="text-align:right;position: sticky; top:0; background-color: #FFFFFF;"> ESTADO </th> 4985 <th style="text-align:right;position: sticky; top:0; background-color: #FFFFFF;"> P21 </th> 4986 <th style="text-align:right;position: sticky; top:0; background-color: #FFFFFF;"> REGION </th> 4987 </tr> 4988 </thead> 4989<tbody> 4990 <tr> 4991 <td style="text-align:left;"> TQRMNORVQHJNLTCDEGGFB00788741 </td> 4992 <td style="text-align:right;"> 10 </td> 4993 <td style="text-align:right;"> 1 </td> 4994 <td style="text-align:right;"> 20000 </td> 4995 <td style="text-align:right;"> 42 </td> 4996 </tr> 4997 <tr> 4998 <td style="text-align:left;"> TQRMNOSWVHKMKOCDEHPJB00790947 </td> 4999 <td style="text-align:right;"> 29 </td> 5000 <td style="text-align:right;"> 1 </td> 5001 <td style="text-align:right;"> 0 </td> 5002 <td style="text-align:right;"> 40 </td> 5003 </tr> 5004 <tr> 5005 <td style="text-align:left;"> TQRMNOSWVHKMKOCDEHPJB00790947 </td> 5006 <td style="text-align:right;"> 29 </td> 5007 <td style="text-align:right;"> 1 </td> 5008 <td style="text-align:right;"> 0 </td> 5009 <td style="text-align:right;"> 40 </td> 5010 </tr> 5011 <tr> 5012 <td style="text-align:left;"> TQRMNORRTHMMLLCDEOHCH00710640 </td> 5013 <td style="text-align:right;"> 91 </td> 5014 <td style="text-align:right;"> 1 </td> 5015 <td style="text-align:right;"> 168000 </td> 5016 <td style="text-align:right;"> 44 </td> 5017 </tr> 5018 <tr> 5019 <td style="text-align:left;"> TQRMNOQVXHMOKUCDEFNFF00710948 </td> 5020 <td style="text-align:right;"> 7 </td> 5021 <td style="text-align:right;"> 1 </td> 5022 <td style="text-align:right;"> 70000 </td> 5023 <td style="text-align:right;"> 41 </td> 5024 </tr> 5025 <tr> 5026 <td style="text-align:left;"> TQRMNOQVXHMOKUCDEFNFF00710948 </td> 5027 <td style="text-align:right;"> 7 </td> 5028 <td style="text-align:right;"> 1 </td> 5029 <td style="text-align:right;"> 30000 </td> 5030 <td style="text-align:right;"> 41 </td> 5031 </tr> 5032 <tr> 5033 <td style="text-align:left;"> TQRMNOPXUHLMKUCDEGOIH00706727 </td> 5034 <td style="text-align:right;"> 18 </td> 5035 <td style="text-align:right;"> 1 </td> 5036 <td style="text-align:right;"> 80000 </td> 5037 <td style="text-align:right;"> 40 </td> 5038 </tr> 5039 <tr> 5040 <td style="text-align:left;"> TQRMNOPPTHMMLMCDEGIBJ00712052 </td> 5041 <td style="text-align:right;"> 12 </td> 5042 <td style="text-align:right;"> 1 </td> 5043 <td style="text-align:right;"> 99000 </td> 5044 <td style="text-align:right;"> 41 </td> 5045 </tr> 5046 <tr> 5047 <td style="text-align:left;"> TQRMNOPPTHMMLMCDEGIBJ00712052 </td> 5048 <td style="text-align:right;"> 12 </td> 5049 <td style="text-align:right;"> 1 </td> 5050 <td style="text-align:right;"> 12000 </td> 5051 <td style="text-align:right;"> 41 </td> 5052 </tr> 5053 <tr> 5054 <td style="text-align:left;"> TQRMNOQSUHMLKTCDEHIBB00717071 </td> 5055 <td style="text-align:right;"> 22 </td> 5056 <td style="text-align:right;"> 1 </td> 5057 <td style="text-align:right;"> 80000 </td> 5058 <td style="text-align:right;"> 40 </td> 5059 </tr> 5060 <tr> 5061 <td style="text-align:left;"> TQRMNOQSUHMLKTCDEHIBB00717071 </td> 5062 <td style="text-align:right;"> 22 </td> 5063 <td style="text-align:right;"> 1 </td> 5064 <td style="text-align:right;"> 115000 </td> 5065 <td style="text-align:right;"> 40 </td> 5066 </tr> 5067 <tr> 5068 <td style="text-align:left;"> TQRMNOQSQHMLKTCDEHIBB00709425 </td> 5069 <td style="text-align:right;"> 22 </td> 5070 <td style="text-align:right;"> 1 </td> 5071 <td style="text-align:right;"> 96000 </td> 5072 <td style="text-align:right;"> 40 </td> 5073 </tr> 5074 <tr> 5075 <td style="text-align:left;"> TQRMNOQTVHJMKTCDEHIBB00784254 </td> 5076 <td style="text-align:right;"> 22 </td> 5077 <td style="text-align:right;"> 1 </td> 5078 <td style="text-align:right;"> 100000 </td> 5079 <td style="text-align:right;"> 40 </td> 5080 </tr> 5081 <tr> 5082 <td style="text-align:left;"> TQRMNOQTVHJMKTCDEHIBB00784254 </td> 5083 <td style="text-align:right;"> 22 </td> 5084 <td style="text-align:right;"> 1 </td> 5085 <td style="text-align:right;"> 25000 </td> 5086 <td style="text-align:right;"> 40 </td> 5087 </tr> 5088 <tr> 5089 <td style="text-align:left;"> TQRMNOQXUHLMRQCDEIJAH00706181 </td> 5090 <td style="text-align:right;"> 33 </td> 5091 <td style="text-align:right;"> 1 </td> 5092 <td style="text-align:right;"> 44000 </td> 5093 <td style="text-align:right;"> 1 </td> 5094 </tr> 5095 <tr> 5096 <td style="text-align:left;"> TQRMNORPQHLMKSCDEHJGH00790306 </td> 5097 <td style="text-align:right;"> 23 </td> 5098 <td style="text-align:right;"> 1 </td> 5099 <td style="text-align:right;"> -9 </td> 5100 <td style="text-align:right;"> 40 </td> 5101 </tr> 5102 <tr> 5103 <td style="text-align:left;"> TQRMNOQXUHMLSNCDEIJAH00719506 </td> 5104 <td style="text-align:right;"> 33 </td> 5105 <td style="text-align:right;"> 1 </td> 5106 <td style="text-align:right;"> 73000 </td> 5107 <td style="text-align:right;"> 1 </td> 5108 </tr> 5109 <tr> 5110 <td style="text-align:left;"> TQRMNORPUHJNOLCDEIIAD00785503 </td> 5111 <td style="text-align:right;"> 32 </td> 5112 <td style="text-align:right;"> 1 </td> 5113 <td style="text-align:right;"> 110000 </td> 5114 <td style="text-align:right;"> 1 </td> 5115 </tr> 5116 <tr> 5117 <td style="text-align:left;"> TQRMNORQRHJLKNCDEFMDB00782419 </td> 5118 <td style="text-align:right;"> 6 </td> 5119 <td style="text-align:right;"> 1 </td> 5120 <td style="text-align:right;"> 100000 </td> 5121 <td style="text-align:right;"> 43 </td> 5122 </tr> 5123 <tr> 5124 <td style="text-align:left;"> TQRMNOQWUHJMKUCDEHGHJ00784122 </td> 5125 <td style="text-align:right;"> 20 </td> 5126 <td style="text-align:right;"> 1 </td> 5127 <td style="text-align:right;"> 90000 </td> 5128 <td style="text-align:right;"> 44 </td> 5129 </tr> 5130 <tr> 5131 <td style="text-align:left;"> TQRMNOPVSHMNQMCDEIJAH00792376 </td> 5132 <td style="text-align:right;"> 33 </td> 5133 <td style="text-align:right;"> 1 </td> 5134 <td style="text-align:right;"> -9 </td> 5135 <td style="text-align:right;"> 1 </td> 5136 </tr> 5137 <tr> 5138 <td style="text-align:left;"> TQRMNOQUYHMNKPCDEIOAH00710452 </td> 5139 <td style="text-align:right;"> 38 </td> 5140 <td style="text-align:right;"> 1 </td> 5141 <td style="text-align:right;"> 100000 </td> 5142 <td style="text-align:right;"> 43 </td> 5143 </tr> 5144 <tr> 5145 <td style="text-align:left;"> TQRMNOQUYHMNKPCDEIOAH00710452 </td> 5146 <td style="text-align:right;"> 38 </td> 5147 <td style="text-align:right;"> 1 </td> 5148 <td style="text-align:right;"> 10000 </td> 5149 <td style="text-align:right;"> 43 </td> 5150 </tr> 5151 <tr> 5152 <td style="text-align:left;"> TQRMNOSUTHJMKTCDEHIBB00784269 </td> 5153 <td style="text-align:right;"> 22 </td> 5154 <td style="text-align:right;"> 1 </td> 5155 <td style="text-align:right;"> 65000 </td> 5156 <td style="text-align:right;"> 40 </td> 5157 </tr> 5158 <tr> 5159 <td style="text-align:left;"> TQRMNOSUTHJMKTCDEHIBB00784269 </td> 5160 <td style="text-align:right;"> 22 </td> 5161 <td style="text-align:right;"> 1 </td> 5162 <td style="text-align:right;"> 25000 </td> 5163 <td style="text-align:right;"> 40 </td> 5164 </tr> 5165 <tr> 5166 <td style="text-align:left;"> TQRMNORWQHLOLQCDEIIAD00791536 </td> 5167 <td style="text-align:right;"> 32 </td> 5168 <td style="text-align:right;"> 1 </td> 5169 <td style="text-align:right;"> 70000 </td> 5170 <td style="text-align:right;"> 1 </td> 5171 </tr> 5172 <tr> 5173 <td style="text-align:left;"> TQRMNOPPQHJLONCDEIIAD00785511 </td> 5174 <td style="text-align:right;"> 32 </td> 5175 <td style="text-align:right;"> 1 </td> 5176 <td style="text-align:right;"> -9 </td> 5177 <td style="text-align:right;"> 1 </td> 5178 </tr> 5179 <tr> 5180 <td style="text-align:left;"> TQRMNOPPQHJLONCDEIIAD00785511 </td> 5181 <td style="text-align:right;"> 32 </td> 5182 <td style="text-align:right;"> 1 </td> 5183 <td style="text-align:right;"> -9 </td> 5184 <td style="text-align:right;"> 1 </td> 5185 </tr> 5186 <tr> 5187 <td style="text-align:left;"> TQRMNORQTHLOSNCDEIJAH00711164 </td> 5188 <td style="text-align:right;"> 33 </td> 5189 <td style="text-align:right;"> 1 </td> 5190 <td style="text-align:right;"> 40000 </td> 5191 <td style="text-align:right;"> 1 </td> 5192 </tr> 5193 <tr> 5194 <td style="text-align:left;"> TQSMNOQUWHMLMNCDEGJBF00789124 </td> 5195 <td style="text-align:right;"> 13 </td> 5196 <td style="text-align:right;"> 1 </td> 5197 <td style="text-align:right;"> 36000 </td> 5198 <td style="text-align:right;"> 43 </td> 5199 </tr> 5200 <tr> 5201 <td style="text-align:left;"> TQRMNOPTTHJMLNCDEGGFB00783107 </td> 5202 <td style="text-align:right;"> 10 </td> 5203 <td style="text-align:right;"> 1 </td> 5204 <td style="text-align:right;"> -9 </td> 5205 <td style="text-align:right;"> 42 </td> 5206 </tr> 5207 <tr> 5208 <td style="text-align:left;"> TQRMNOPTQHKMKQCDEGPDJ00789889 </td> 5209 <td style="text-align:right;"> 19 </td> 5210 <td style="text-align:right;"> 1 </td> 5211 <td style="text-align:right;"> 18000 </td> 5212 <td style="text-align:right;"> 40 </td> 5213 </tr> 5214 <tr> 5215 <td style="text-align:left;"> TQRMNOSPXHKOLQCDEGNFJ00789612 </td> 5216 <td style="text-align:right;"> 17 </td> 5217 <td style="text-align:right;"> 1 </td> 5218 <td style="text-align:right;"> 12000 </td> 5219 <td style="text-align:right;"> 44 </td> 5220 </tr> 5221 <tr> 5222 <td style="text-align:left;"> TQRMNOUPYHKOLQCDEGNFJ00789613 </td> 5223 <td style="text-align:right;"> 17 </td> 5224 <td style="text-align:right;"> 1 </td> 5225 <td style="text-align:right;"> 0 </td> 5226 <td style="text-align:right;"> 44 </td> 5227 </tr> 5228 <tr> 5229 <td style="text-align:left;"> TQRMNOUPYHKOLQCDEGNFJ00789613 </td> 5230 <td style="text-align:right;"> 17 </td> 5231 <td style="text-align:right;"> 1 </td> 5232 <td style="text-align:right;"> 90000 </td> 5233 <td style="text-align:right;"> 44 </td> 5234 </tr> 5235 <tr> 5236 <td style="text-align:left;"> TQRMNOPQVHMOLPCDEFLID00715014 </td> 5237 <td style="text-align:right;"> 5 </td> 5238 <td style="text-align:right;"> 1 </td> 5239 <td style="text-align:right;"> -9 </td> 5240 <td style="text-align:right;"> 43 </td> 5241 </tr> 5242 <tr> 5243 <td style="text-align:left;"> TQRMNOVQTHJOPSCDEIJAH00792281 </td> 5244 <td style="text-align:right;"> 33 </td> 5245 <td style="text-align:right;"> 1 </td> 5246 <td style="text-align:right;"> 60000 </td> 5247 <td style="text-align:right;"> 1 </td> 5248 </tr> 5249 <tr> 5250 <td style="text-align:left;"> TQRMNOPQXHMOLPCDEFLID00710841 </td> 5251 <td style="text-align:right;"> 5 </td> 5252 <td style="text-align:right;"> 1 </td> 5253 <td style="text-align:right;"> 60000 </td> 5254 <td style="text-align:right;"> 43 </td> 5255 </tr> 5256 <tr> 5257 <td style="text-align:left;"> TQRMNOPQXHMOLPCDEFLID00710841 </td> 5258 <td style="text-align:right;"> 5 </td> 5259 <td style="text-align:right;"> 1 </td> 5260 <td style="text-align:right;"> 85000 </td> 5261 <td style="text-align:right;"> 43 </td> 5262 </tr> 5263 <tr> 5264 <td style="text-align:left;">
5264 TQRMNOSTPHLMLLCDEGKDB00705046 </td> 5265 <td style="text-align:right;"> 14 </td> 5266 <td style="text-align:right;"> 1 </td> 5267 <td style="text-align:right;"> 60000 </td> 5268 <td style="text-align:right;"> 43 </td> 5269 </tr> 5270 <tr> 5271 <td style="text-align:left;"> TQRMNOSTPHLMLLCDEGKDB00705046 </td> 5272 <td style="text-align:right;"> 14 </td> 5273 <td style="text-align:right;"> 1 </td> 5274 <td style="text-align:right;"> -9 </td> 5275 <td style="text-align:right;"> 43 </td> 5276 </tr> 5277 <tr> 5278 <td style="text-align:left;"> TQRMNOSTPHLMLLCDEGKDB00705046 </td> 5279 <td style="text-align:right;"> 14 </td> 5280 <td style="text-align:right;"> 1 </td> 5281 <td style="text-align:right;"> -9 </td> 5282 <td style="text-align:right;"> 43 </td> 5283 </tr> 5284 <tr> 5285 <td style="text-align:left;"> TQRMNOPYSHKOKQCDEFLID00787875 </td> 5286 <td style="text-align:right;"> 5 </td> 5287 <td style="text-align:right;"> 1 </td> 5288 <td style="text-align:right;"> 30000 </td> 5289 <td style="text-align:right;"> 43 </td> 5290 </tr> 5291 <tr> 5292 <td style="text-align:left;"> TQRMNORTPHKOKQCDEFLID00787876 </td> 5293 <td style="text-align:right;"> 5 </td> 5294 <td style="text-align:right;"> 1 </td> 5295 <td style="text-align:right;"> 40000 </td> 5296 <td style="text-align:right;"> 43 </td> 5297 </tr> 5298 <tr> 5299 <td style="text-align:left;"> TQRMNORSPHMMPMCDEIJAH00709078 </td> 5300 <td style="text-align:right;"> 33 </td> 5301 <td style="text-align:right;"> 1 </td> 5302 <td style="text-align:right;"> 70000 </td> 5303 <td style="text-align:right;"> 1 </td> 5304 </tr> 5305 <tr> 5306 <td style="text-align:left;"> TQRMNOQQWHKOKRCDEGOIH00789766 </td> 5307 <td style="text-align:right;"> 18 </td> 5308 <td style="text-align:right;"> 1 </td> 5309 <td style="text-align:right;"> 35000 </td> 5310 <td style="text-align:right;"> 40 </td> 5311 </tr> 5312 <tr> 5313 <td style="text-align:left;"> TQRMNOQQWHKOKRCDEGOIH00789766 </td> 5314 <td style="text-align:right;"> 18 </td> 5315 <td style="text-align:right;"> 1 </td> 5316 <td style="text-align:right;"> 12000 </td> 5317 <td style="text-align:right;"> 40 </td> 5318 </tr> 5319 <tr> 5320 <td style="text-align:left;"> TQRMNORRVHMOKRCDEOJAH00713918 </td> 5321 <td style="text-align:right;"> 93 </td> 5322 <td style="text-align:right;"> 1 </td> 5323 <td style="text-align:right;"> 110000 </td> 5324 <td style="text-align:right;"> 44 </td> 5325 </tr> 5326 <tr> 5327 <td style="text-align:left;"> TQRMNORRVHMOKRCDEOJAH00713918 </td> 5328 <td style="text-align:right;"> 93 </td> 5329 <td style="text-align:right;"> 1 </td> 5330 <td style="text-align:right;"> 85000 </td> 5331 <td style="text-align:right;"> 44 </td> 5332 </tr> 5333 <tr> 5334 <td style="text-align:left;"> TQRMNOQUQHLOKSCDEGOIH00706615 </td> 5335 <td style="text-align:right;"> 18 </td> 5336 <td style="text-align:right;"> 1 </td> 5337 <td style="text-align:right;"> 70000 </td> 5338 <td style="text-align:right;"> 40 </td> 5339 </tr> 5340</tbody> 5341</table></div> 5342 5343 5344(aquà imprimiremos a modo ilustrativo solo las primeras 50 filas) 5345 5346 5347] 5348 5349-- 5350 5351.panel[.panel-name[Paso 3 y 4] 5352 5353 5354Convertimos todo a minúscula y renombramos la variable P21 5355 5356.mid[ 5357 5358```r 5359ejemplo <- eph_ind %>% 5360 select(CODUSU, AGLOMERADO, ESTADO, P21, REGION) %>% 5361 filter(ESTADO==1) %>% 5362* rename_with(tolower) %>% 5363* rename(inglab = p21) 5364``` 5365] 5366 5367.mid[ 5368<div style="border: 1px solid #ddd; padding: 0px;
5368 overflow-y: scroll; height:350px; overflow-x: scroll; width:100%; "><table class="table" style="font-size: 13px; margin-left: auto; margin-right: auto;"> 5369 <thead> 5370 <tr> 5371 <th style="text-align:left;position: sticky; top:0; background-color: #FFFFFF;"> codusu </th> 5372 <th style="text-align:right;position: sticky; top:0; background-color: #FFFFFF;"> aglomerado </th> 5373 <th style="text-align:right;position: sticky; top:0; background-color: #FFFFFF;"> estado </th> 5374 <th style="text-align:right;position: sticky; top:0; background-color: #FFFFFF;"> inglab </th> 5375 <th style="text-align:right;position: sticky; top:0; background-color: #FFFFFF;"> region </th> 5376 </tr> 5377 </thead> 5378<tbody> 5379 <tr> 5380 <td style="text-align:left;"> TQRMNORVQHJNLTCDEGGFB00788741 </td> 5381 <td style="text-align:right;"> 10 </td> 5382 <td style="text-align:right;"> 1 </td> 5383 <td style="text-align:right;"> 20000 </td> 5384 <td style="text-align:right;"> 42 </td> 5385 </tr> 5386 <tr> 5387 <td style="text-align:left;"> TQRMNOSWVHKMKOCDEHPJB00790947 </td> 5388 <td style="text-align:right;"> 29 </td> 5389 <td style="text-align:right;"> 1 </td> 5390 <td style="text-align:right;"> 0 </td> 5391 <td style="text-align:right;"> 40 </td> 5392 </tr> 5393 <tr> 5394 <td style="text-align:left;"> TQRMNOSWVHKMKOCDEHPJB00790947 </td> 5395 <td style="text-align:right;"> 29 </td> 5396 <td style="text-align:right;"> 1 </td> 5397 <td style="text-align:right;"> 0 </td> 5398 <td style="text-align:right;"> 40 </td> 5399 </tr> 5400 <tr> 5401 <td style="text-align:left;"> TQRMNORRTHMMLLCDEOHCH00710640 </td> 5402 <td style="text-align:right;"> 91 </td> 5403 <td style="text-align:right;"> 1 </td> 5404 <td style="text-align:right;"> 168000 </td> 5405 <td style="text-align:right;"> 44 </td> 5406 </tr> 5407 <tr> 5408 <td style="text-align:left;"> TQRMNOQVXHMOKUCDEFNFF00710948 </td> 5409 <td style="text-align:right;"> 7 </td> 5410 <td style="text-align:right;"> 1 </td> 5411 <td style="text-align:right;"> 70000 </td> 5412 <td style="text-align:right;"> 41 </td> 5413 </tr> 5414 <tr> 5415 <td style="text-align:left;"> TQRMNOQVXHMOKUCDEFNFF00710948 </td> 5416 <td style="text-align:right;"> 7 </td> 5417 <td style="text-align:right;"> 1 </td> 5418 <td style="text-align:right;"> 30000 </td> 5419 <td style="text-align:right;"> 41 </td> 5420 </tr> 5421 <tr> 5422 <td style="text-align:left;"> TQRMNOPXUHLMKUCDEGOIH00706727 </td> 5423 <td style="text-align:right;"> 18 </td> 5424 <td style="text-align:right;"> 1 </td> 5425 <td style="text-align:right;"> 80000 </td> 5426 <td style="text-align:right;"> 40 </td> 5427 </tr> 5428 <tr> 5429 <td style="text-align:left;"> TQRMNOPPTHMMLMCDEGIBJ00712052 </td> 5430 <td style="text-align:right;"> 12 </td> 5431 <td style="text-align:right;"> 1 </td> 5432 <td style="text-align:right;"> 99000 </td> 5433 <td style="text-align:right;"> 41 </td> 5434 </tr> 5435 <tr> 5436 <td style="text-align:left;"> TQRMNOPPTHMMLMCDEGIBJ00712052 </td> 5437 <td style="text-align:right;"> 12 </td> 5438 <td style="text-align:right;"> 1 </td> 5439 <td style="text-align:right;"> 12000 </td> 5440 <td style="text-align:right;"> 41 </td> 5441 </tr> 5442 <tr> 5443 <td style="text-align:left;"> TQRMNOQSUHMLKTCDEHIBB00717071 </td> 5444 <td style="text-align:right;"> 22 </td> 5445 <td style="text-align:right;"> 1 </td> 5446 <td style="text-align:right;"> 80000 </td> 5447 <td style="text-align:right;"> 40 </td> 5448 </tr> 5449 <tr> 5450 <td style="text-align:left;"> TQRMNOQSUHMLKTCDEHIBB00717071 </td> 5451 <td style="text-align:right;"> 22 </td> 5452 <td style="text-align:right;"> 1 </td> 5453 <td style="text-align:right;"> 115000 </td> 5454 <td style="text-align:right;"> 40 </td> 5455 </tr> 5456 <tr> 5457 <td style="text-align:left;"> TQRMNOQSQHMLKTCDEHIBB00709425 </td> 5458 <td style="text-align:right;"> 22 </td> 5459 <td style="text-align:right;"> 1 </td> 5460 <td style="text-align:right;"> 96000 </td> 5461 <td style="text-align:right;"> 40 </td> 5462 </tr> 5463 <tr> 5464 <td style="text-align:left;"> TQRMNOQTVHJMKTCDEHIBB00784254 </td> 5465 <td style="text-align:right;"> 22 </td> 5466 <td style="text-align:right;"> 1 </td> 5467 <td style="text-align:right;"> 100000 </td> 5468 <td style="text-align:right;"> 40 </td> 5469 </tr> 5470 <tr> 5471 <td style="text-align:left;"> TQRMNOQTVHJMKTCDEHIBB00784254 </td> 5472 <td style="text-align:right;"> 22 </td> 5473 <td style="text-align:right;"> 1 </td> 5474 <td style="text-align:right;"> 25000 </td> 5475 <td style="text-align:right;"> 40 </td> 5476 </tr> 5477 <tr> 5478 <td style="text-align:left;"> TQRMNOQXUHLMRQCDEIJAH00706181 </td> 5479 <td style="text-align:right;"> 33 </td> 5480 <td style="text-align:right;"> 1 </td> 5481 <td style="text-align:right;"> 44000 </td> 5482 <td style="text-align:right;"> 1 </td> 5483 </tr> 5484 <tr> 5485 <td style="text-align:left;"> TQRMNORPQHLMKSCDEHJGH00790306 </td> 5486 <td style="text-align:right;"> 23 </td> 5487 <td style="text-align:right;"> 1 </td> 5488 <td style="text-align:right;"> -9 </td> 5489 <td style="text-align:right;"> 40 </td> 5490 </tr> 5491 <tr> 5492 <td style="text-align:left;"> TQRMNOQXUHMLSNCDEIJAH00719506 </td> 5493 <td style="text-align:right;"> 33 </td> 5494 <td style="text-align:right;"> 1 </td> 5495 <td style="text-align:right;"> 73000 </td> 5496 <td style="text-align:right;"> 1 </td> 5497 </tr> 5498 <tr> 5499 <td style="text-align:left;"> TQRMNORPUHJNOLCDEIIAD00785503 </td> 5500 <td style="text-align:right;"> 32 </td> 5501 <td style="text-align:right;"> 1 </td> 5502 <td style="text-align:right;"> 110000 </td> 5503 <td style="text-align:right;"> 1 </td> 5504 </tr> 5505 <tr> 5506 <td style="text-align:left;"> TQRMNORQRHJLKNCDEFMDB00782419 </td> 5507 <td style="text-align:right;"> 6 </td> 5508 <td style="text-align:right;"> 1 </td> 5509 <td style="text-align:right;"> 100000 </td> 5510 <td style="text-align:right;"> 43 </td> 5511 </tr> 5512 <tr> 5513 <td style="text-align:left;"> TQRMNOQWUHJMKUCDEHGHJ00784122 </td> 5514 <td style="text-align:right;"> 20 </td> 5515 <td style="text-align:right;"> 1 </td> 5516 <td style="text-align:right;"> 90000 </td> 5517 <td style="text-align:right;"> 44 </td> 5518 </tr> 5519 <tr> 5520 <td style="text-align:left;"> TQRMNOPVSHMNQMCDEIJAH00792376 </td> 5521 <td style="text-align:right;"> 33 </td> 5522 <td style="text-align:right;"> 1 </td> 5523 <td style="text-align:right;"> -9 </td> 5524 <td style="text-align:right;"> 1 </td> 5525 </tr> 5526 <tr> 5527 <td style="text-align:left;"> TQRMNOQUYHMNKPCDEIOAH00710452 </td> 5528 <td style="text-align:right;"> 38 </td> 5529 <td style="text-align:right;"> 1 </td> 5530 <td style="text-align:right;"> 100000 </td> 5531 <td style="text-align:right;"> 43 </td> 5532 </tr> 5533 <tr> 5534 <td style="text-align:left;"> TQRMNOQUYHMNKPCDEIOAH00710452 </td> 5535 <td style="text-align:right;"> 38 </td> 5536 <td style="text-align:right;"> 1 </td> 5537 <td style="text-align:right;"> 10000 </td> 5538 <td style="text-align:right;"> 43 </td> 5539 </tr> 5540 <tr> 5541 <td style="text-align:left;"> TQRMNOSUTHJMKTCDEHIBB00784269 </td> 5542 <td style="text-align:right;"> 22 </td> 5543 <td style="text-align:right;"> 1 </td> 5544 <td style="text-align:right;"> 65000 </td> 5545 <td style="text-align:right;"> 40 </td> 5546 </tr> 5547 <tr> 5548 <td style="text-align:left;"> TQRMNOSUTHJMKTCDEHIBB00784269 </td> 5549 <td style="text-align:right;"> 22 </td> 5550 <td style="text-align:right;"> 1 </td> 5551 <td style="text-align:right;"> 25000 </td> 5552 <td style="text-align:right;"> 40 </td> 5553 </tr> 5554 <tr> 5555 <td style="text-align:left;"> TQRMNORWQHLOLQCDEIIAD00791536 </td> 5556 <td style="text-align:right;"> 32 </td> 5557 <td style="text-align:right;"> 1 </td> 5558 <td style="text-align:right;"> 70000 </td> 5559 <td style="text-align:right;"> 1 </td> 5560 </tr> 5561 <tr> 5562 <td style="text-align:left;"> TQRMNOPPQHJLONCDEIIAD00785511 </td> 5563 <td style="text-align:right;"> 32 </td> 5564 <td style="text-align:right;"> 1 </td> 5565 <td style="text-align:right;"> -9 </td> 5566 <td style="text-align:right;"> 1 </td> 5567 </tr> 5568 <tr> 5569 <td style="text-align:left;"> TQRMNOPPQHJLONCDEIIAD00785511 </td> 5570 <td style="text-align:right;"> 32 </td> 5571 <td style="text-align:right;"> 1 </td> 5572 <td style="text-align:right;"> -9 </td> 5573 <td style="text-align:right;"> 1 </td> 5574 </tr> 5575 <tr> 5576 <td style="text-align:left;"> TQRMNORQTHLOSNCDEIJAH00711164 </td> 5577 <td style="text-align:right;"> 33 </td> 5578 <td style="text-align:right;"> 1 </td> 5579 <td style="text-align:right;"> 40000 </td> 5580 <td style="text-align:right;"> 1 </td> 5581 </tr> 5582 <tr> 5583 <td style="text-align:left;"> TQSMNOQUWHMLMNCDEGJBF00789124 </td> 5584 <td style="text-align:right;"> 13 </td> 5585 <td style="text-align:right;"> 1 </td> 5586 <td style="text-align:right;"> 36000 </td> 5587 <td style="text-align:right;"> 43 </td> 5588 </tr> 5589 <tr> 5590 <td style="text-align:left;"> TQRMNOPTTHJMLNCDEGGFB00783107 </td> 5591 <td style="text-align:right;"> 10 </td> 5592 <td style="text-align:right;"> 1 </td> 5593 <td style="text-align:right;"> -9 </td> 5594 <td style="text-align:right;"> 42 </td> 5595 </tr> 5596 <tr> 5597 <td style="text-align:left;"> TQRMNOPTQHKMKQCDEGPDJ00789889 </td> 5598 <td style="text-align:right;"> 19 </td> 5599 <td style="text-align:right;"> 1 </td> 5600 <td style="text-align:right;"> 18000 </td> 5601 <td style="text-align:right;"> 40 </td> 5602 </tr> 5603 <tr> 5604 <td style="text-align:left;"> TQRMNOSPXHKOLQCDEGNFJ00789612 </td> 5605 <td style="text-align:right;"> 17 </td> 5606 <td style="text-align:right;"> 1 </td> 5607 <td style="text-align:right;"> 12000 </td> 5608 <td style="text-align:right;"> 44 </td> 5609 </tr> 5610 <tr> 5611 <td style="text-align:left;"> TQRMNOUPYHKOLQCDEGNFJ00789613 </td> 5612 <td style="text-align:right;"> 17 </td> 5613 <td style="text-align:right;"> 1 </td> 5614 <td style="text-align:right;"> 0 </td> 5615 <td style="text-align:right;"> 44 </td> 5616 </tr> 5617 <tr> 5618 <td style="text-align:left;"> TQRMNOUPYHKOLQCDEGNFJ00789613 </td> 5619 <td style="text-align:right;"> 17 </td> 5620 <td style="text-align:right;"> 1 </td> 5621 <td style="text-align:right;"> 90000 </td> 5622 <td style="text-align:right;"> 44 </td> 5623 </tr> 5624 <tr> 5625 <td style="text-align:left;"> TQRMNOPQVHMOLPCDEFLID00715014 </td> 5626 <td style="text-align:right;"> 5 </td> 5627 <td style="text-align:right;"> 1 </td> 5628 <td style="text-align:right;"> -9 </td> 5629 <td style="text-align:right;"> 43 </td> 5630 </tr> 5631 <tr> 5632 <td style="text-align:left;"> TQRMNOVQTHJOPSCDEIJAH00792281 </td> 5633 <td style="text-align:right;"> 33 </td> 5634 <td style="text-align:right;"> 1 </td> 5635 <td style="text-align:right;"> 60000 </td> 5636 <td style="text-align:right;"> 1 </td> 5637 </tr> 5638 <tr> 5639 <td style="text-align:left;"> TQRMNOPQXHMOLPCDEFLID00710841 </td> 5640 <td style="text-align:right;"> 5 </td> 5641 <td style="text-align:right;"> 1 </td> 5642 <td style="text-align:right;"> 60000 </td> 5643 <td style="text-align:right;"> 43 </td> 5644 </tr> 5645 <tr> 5646 <td style="text-align:left;"> TQRMNOPQXHMOLPCDEFLID00710841 </td> 5647 <td style="text-align:right;"> 5 </td> 5648 <td style="text-align:right;"> 1 </td> 5649 <td style="text-align:right;"> 85000 </td> 5650 <td style="text-align:right;"> 43 </td> 5651 </tr> 5652 <tr> 5653 <td style="text-align:left;">
5653 TQRMNOSTPHLMLLCDEGKDB00705046 </td> 5654 <td style="text-align:right;"> 14 </td> 5655 <td style="text-align:right;"> 1 </td> 5656 <td style="text-align:right;"> 60000 </td> 5657 <td style="text-align:right;"> 43 </td> 5658 </tr> 5659 <tr> 5660 <td style="text-align:left;"> TQRMNOSTPHLMLLCDEGKDB00705046 </td> 5661 <td style="text-align:right;"> 14 </td> 5662 <td style="text-align:right;"> 1 </td> 5663 <td style="text-align:right;"> -9 </td> 5664 <td style="text-align:right;"> 43 </td> 5665 </tr> 5666 <tr> 5667 <td style="text-align:left;"> TQRMNOSTPHLMLLCDEGKDB00705046 </td> 5668 <td style="text-align:right;"> 14 </td> 5669 <td style="text-align:right;"> 1 </td> 5670 <td style="text-align:right;"> -9 </td> 5671 <td style="text-align:right;"> 43 </td> 5672 </tr> 5673 <tr> 5674 <td style="text-align:left;"> TQRMNOPYSHKOKQCDEFLID00787875 </td> 5675 <td style="text-align:right;"> 5 </td> 5676 <td style="text-align:right;"> 1 </td> 5677 <td style="text-align:right;"> 30000 </td> 5678 <td style="text-align:right;"> 43 </td> 5679 </tr> 5680 <tr> 5681 <td style="text-align:left;"> TQRMNORTPHKOKQCDEFLID00787876 </td> 5682 <td style="text-align:right;"> 5 </td> 5683 <td style="text-align:right;"> 1 </td> 5684 <td style="text-align:right;"> 40000 </td> 5685 <td style="text-align:right;"> 43 </td> 5686 </tr> 5687 <tr> 5688 <td style="text-align:left;"> TQRMNORSPHMMPMCDEIJAH00709078 </td> 5689 <td style="text-align:right;"> 33 </td> 5690 <td style="text-align:right;"> 1 </td> 5691 <td style="text-align:right;"> 70000 </td> 5692 <td style="text-align:right;"> 1 </td> 5693 </tr> 5694 <tr> 5695 <td style="text-align:left;"> TQRMNOQQWHKOKRCDEGOIH00789766 </td> 5696 <td style="text-align:right;"> 18 </td> 5697 <td style="text-align:right;"> 1 </td> 5698 <td style="text-align:right;"> 35000 </td> 5699 <td style="text-align:right;"> 40 </td> 5700 </tr> 5701 <tr> 5702 <td style="text-align:left;"> TQRMNOQQWHKOKRCDEGOIH00789766 </td> 5703 <td style="text-align:right;"> 18 </td> 5704 <td style="text-align:right;"> 1 </td> 5705 <td style="text-align:right;"> 12000 </td> 5706 <td style="text-align:right;"> 40 </td> 5707 </tr> 5708 <tr> 5709 <td style="text-align:left;"> TQRMNORRVHMOKRCDEOJAH00713918 </td> 5710 <td style="text-align:right;"> 93 </td> 5711 <td style="text-align:right;"> 1 </td> 5712 <td style="text-align:right;"> 110000 </td> 5713 <td style="text-align:right;"> 44 </td> 5714 </tr> 5715 <tr> 5716 <td style="text-align:left;"> TQRMNORRVHMOKRCDEOJAH00713918 </td> 5717 <td style="text-align:right;"> 93 </td> 5718 <td style="text-align:right;"> 1 </td> 5719 <td style="text-align:right;"> 85000 </td> 5720 <td style="text-align:right;"> 44 </td> 5721 </tr> 5722 <tr> 5723 <td style="text-align:left;"> TQRMNOQUQHLOKSCDEGOIH00706615 </td> 5724 <td style="text-align:right;"> 18 </td> 5725 <td style="text-align:right;"> 1 </td> 5726 <td style="text-align:right;"> 70000 </td> 5727 <td style="text-align:right;"> 40 </td> 5728 </tr> 5729</tbody> 5730</table></div> 5731] 5732 5733] 5734 5735.panel[.panel-name[Paso 5 y 6] 5736 5737Generamos una columna para el log del ingreso y un para región como *character* 5738 5739.mid[ 5740 5741```r 5742ejemplo <- eph_ind %>% 5743 select(CODUSU, AGLOMERADO, ESTADO, P21, REGION)%>% 5744 filter(ESTADO==1) %>% 5745 rename_with(tolower) %>% 5746 rename(inglab = p21) %>% 5747* mutate(log_inglab = log(inglab), 5748* region_ch = case_when(region==1 ~ "Gran Buenos Aires", 5749* region==40 ~ "Noroeste", 5750* region==41 ~ "Nordeste", 5751* region==42 ~ "Cuyo", 5752* region==43 ~ "Pampeana", 5753* region==44 ~ "Patagónica")) #DOBLE() 5754``` 5755] 5756 5757<div style="border: 1px solid #ddd; padding: 0px;
5757 overflow-y: scroll; height:250px; overflow-x: scroll; width:100%; "><table class="table" style="font-size: 13px; margin-left: auto; margin-right: auto;"> 5758 <thead> 5759 <tr> 5760 <th style="text-align:left;position: sticky; top:0; background-color: #FFFFFF;"> codusu </th> 5761 <th style="text-align:right;position: sticky; top:0; background-color: #FFFFFF;"> aglomerado </th> 5762 <th style="text-align:right;position: sticky; top:0; background-color: #FFFFFF;"> estado </th> 5763 <th style="text-align:right;position: sticky; top:0; background-color: #FFFFFF;"> inglab </th> 5764 <th style="text-align:right;position: sticky; top:0; background-color: #FFFFFF;"> region </th> 5765 <th style="text-align:right;position: sticky; top:0; background-color: #FFFFFF;"> log_inglab </th> 5766 <th style="text-align:left;position: sticky; top:0; background-color: #FFFFFF;"> region_ch </th> 5767 </tr> 5768 </thead> 5769<tbody> 5770 <tr> 5771 <td style="text-align:left;"> TQRMNORVQHJNLTCDEGGFB00788741 </td> 5772 <td style="text-align:right;"> 10 </td> 5773 <td style="text-align:right;"> 1 </td> 5774 <td style="text-align:right;"> 20000 </td> 5775 <td style="text-align:right;"> 42 </td> 5776 <td style="text-align:right;"> 9.903488 </td> 5777 <td style="text-align:left;"> Cuyo </td> 5778 </tr> 5779 <tr> 5780 <td style="text-align:left;"> TQRMNOSWVHKMKOCDEHPJB00790947 </td> 5781 <td style="text-align:right;"> 29 </td> 5782 <td style="text-align:right;"> 1 </td> 5783 <td style="text-align:right;"> 0 </td> 5784 <td style="text-align:right;"> 40 </td> 5785 <td style="text-align:right;"> -Inf </td> 5786 <td style="text-align:left;"> Noroeste </td> 5787 </tr> 5788 <tr> 5789 <td style="text-align:left;"> TQRMNOSWVHKMKOCDEHPJB00790947 </td> 5790 <td style="text-align:right;"> 29 </td> 5791 <td style="text-align:right;"> 1 </td> 5792 <td style="text-align:right;"> 0 </td> 5793 <td style="text-align:right;"> 40 </td> 5794 <td style="text-align:right;"> -Inf </td> 5795 <td style="text-align:left;"> Noroeste </td> 5796 </tr> 5797 <tr> 5798 <td style="text-align:left;"> TQRMNORRTHMMLLCDEOHCH00710640 </td> 5799 <td style="text-align:right;"> 91 </td> 5800 <td style="text-align:right;"> 1 </td> 5801 <td style="text-align:right;"> 168000 </td> 5802 <td style="text-align:right;"> 44 </td> 5803 <td style="text-align:right;"> 12.031719 </td> 5804 <td style="text-align:left;"> Patagónica </td> 5805 </tr> 5806 <tr> 5807 <td style="text-align:left;"> TQRMNOQVXHMOKUCDEFNFF00710948 </td> 5808 <td style="text-align:right;"> 7 </td> 5809 <td style="text-align:right;"> 1 </td> 5810 <td style="text-align:right;"> 70000 </td> 5811 <td style="text-align:right;"> 41 </td> 5812 <td style="text-align:right;"> 11.156251 </td> 5813 <td style="text-align:left;"> Nordeste </td> 5814 </tr> 5815 <tr> 5816 <td style="text-align:left;"> TQRMNOQVXHMOKUCDEFNFF00710948 </td> 5817 <td style="text-align:right;"> 7 </td> 5818 <td style="text-align:right;"> 1 </td> 5819 <td style="text-align:right;"> 30000 </td> 5820 <td style="text-align:right;"> 41 </td> 5821 <td style="text-align:right;"> 10.308953 </td> 5822 <td style="text-align:left;"> Nordeste </td> 5823 </tr> 5824 <tr> 5825 <td style="text-align:left;"> TQRMNOPXUHLMKUCDEGOIH00706727 </td> 5826 <td style="text-align:right;"> 18 </td> 5827 <td style="text-align:right;"> 1 </td> 5828 <td style="text-align:right;"> 80000 </td> 5829 <td style="text-align:right;"> 40 </td> 5830 <td style="text-align:right;"> 11.289782 </td> 5831 <td style="text-align:left;"> Noroeste </td> 5832 </tr> 5833 <tr> 5834 <td style="text-align:left;"> TQRMNOPPTHMMLMCDEGIBJ00712052 </td> 5835 <td style="text-align:right;"> 12 </td> 5836 <td style="text-align:right;"> 1 </td> 5837 <td style="text-align:right;"> 99000 </td> 5838 <td style="text-align:right;"> 41 </td> 5839 <td style="text-align:right;"> 11.502875 </td> 5840 <td style="text-align:left;"> Nordeste </td> 5841 </tr> 5842 <tr> 5843 <td style="text-align:left;"> TQRMNOPPTHMMLMCDEGIBJ00712052 </td> 5844 <td style="text-align:right;"> 12 </td> 5845 <td style="text-align:right;"> 1 </td> 5846 <td style="text-align:right;"> 12000 </td> 5847 <td style="text-align:right;"> 41 </td> 5848 <td style="text-align:right;"> 9.392662 </td> 5849 <td style="text-align:left;"> Nordeste </td> 5850 </tr> 5851 <tr> 5852 <td style="text-align:left;"> TQRMNOQSUHMLKTCDEHIBB00717071 </td> 5853 <td style="text-align:right;"> 22 </td> 5854 <td style="text-align:right;"> 1 </td> 5855 <td style="text-align:right;"> 80000 </td> 5856 <td style="text-align:right;"> 40 </td> 5857 <td style="text-align:right;"> 11.289782 </td> 5858 <td style="text-align:left;"> Noroeste </td> 5859 </tr> 5860 <tr> 5861 <td style="text-align:left;"> TQRMNOQSUHMLKTCDEHIBB00717071 </td> 5862 <td style="text-align:right;"> 22 </td> 5863 <td style="text-align:right;"> 1 </td> 5864 <td style="text-align:right;"> 115000 </td> 5865 <td style="text-align:right;"> 40 </td> 5866 <td style="text-align:right;"> 11.652687 </td> 5867 <td style="text-align:left;"> Noroeste </td> 5868 </tr> 5869 <tr> 5870 <td style="text-align:left;"> TQRMNOQSQHMLKTCDEHIBB00709425 </td> 5871 <td style="text-align:right;"> 22 </td> 5872 <td style="text-align:right;"> 1 </td> 5873 <td style="text-align:right;"> 96000 </td> 5874 <td style="text-align:right;"> 40 </td> 5875 <td style="text-align:right;"> 11.472103 </td> 5876 <td style="text-align:left;"> Noroeste </td> 5877 </tr> 5878 <tr> 5879 <td style="text-align:left;"> TQRMNOQTVHJMKTCDEHIBB00784254 </td> 5880 <td style="text-align:right;"> 22 </td> 5881 <td style="text-align:right;"> 1 </td> 5882 <td style="text-align:right;"> 100000 </td> 5883 <td style="text-align:right;"> 40 </td> 5884 <td style="text-align:right;"> 11.512925 </td> 5885 <td style="text-align:left;"> Noroeste </td> 5886 </tr> 5887 <tr> 5888 <td style="text-align:left;"> TQRMNOQTVHJMKTCDEHIBB00784254 </td> 5889 <td style="text-align:right;"> 22 </td> 5890 <td style="text-align:right;"> 1 </td> 5891 <td style="text-align:right;"> 25000 </td> 5892 <td style="text-align:right;"> 40 </td> 5893 <td style="text-align:right;"> 10.126631 </td> 5894 <td style="text-align:left;"> Noroeste </td> 5895 </tr> 5896 <tr> 5897 <td style="text-align:left;"> TQRMNOQXUHLMRQCDEIJAH00706181 </td> 5898 <td style="text-align:right;"> 33 </td> 5899 <td style="text-align:right;"> 1 </td> 5900 <td style="text-align:right;"> 44000 </td> 5901 <td style="text-align:right;"> 1 </td> 5902 <td style="text-align:right;"> 10.691945 </td> 5903 <td style="text-align:left;"> Gran Buenos Aires </td> 5904 </tr> 5905 <tr> 5906 <td style="text-align:left;"> TQRMNORPQHLMKSCDEHJGH00790306 </td> 5907 <td style="text-align:right;"> 23 </td> 5908 <td style="text-align:right;"> 1 </td> 5909 <td style="text-align:right;"> -9 </td> 5910 <td style="text-align:right;"> 40 </td> 5911 <td style="text-align:right;"> NaN </td> 5912 <td style="text-align:left;"> Noroeste </td> 5913 </tr> 5914 <tr> 5915 <td style="text-align:left;"> TQRMNOQXUHMLSNCDEIJAH00719506 </td> 5916 <td style="text-align:right;"> 33 </td> 5917 <td style="text-align:right;"> 1 </td> 5918 <td style="text-align:right;"> 73000 </td> 5919 <td style="text-align:right;"> 1 </td> 5920 <td style="text-align:right;"> 11.198215 </td> 5921 <td style="text-align:left;"> Gran Buenos Aires </td> 5922 </tr> 5923 <tr> 5924 <td style="text-align:left;"> TQRMNORPUHJNOLCDEIIAD00785503 </td> 5925 <td style="text-align:right;"> 32 </td> 5926 <td style="text-align:right;"> 1 </td> 5927 <td style="text-align:right;"> 110000 </td> 5928 <td style="text-align:right;"> 1 </td> 5929 <td style="text-align:right;"> 11.608236 </td> 5930 <td style="text-align:left;"> Gran Buenos Aires </td> 5931 </tr> 5932 <tr> 5933 <td style="text-align:left;"> TQRMNORQRHJLKNCDEFMDB00782419 </td> 5934 <td style="text-align:right;"> 6 </td> 5935 <td style="text-align:right;"> 1 </td> 5936 <td style="text-align:right;"> 100000 </td> 5937 <td style="text-align:right;"> 43 </td> 5938 <td style="text-align:right;"> 11.512925 </td> 5939 <td style="text-align:left;"> Pampeana </td> 5940 </tr> 5941 <tr> 5942 <td style="text-align:left;"> TQRMNOQWUHJMKUCDEHGHJ00784122 </td> 5943 <td style="text-align:right;"> 20 </td> 5944 <td style="text-align:right;"> 1 </td> 5945 <td style="text-align:right;"> 90000 </td> 5946 <td style="text-align:right;"> 44 </td> 5947 <td style="text-align:right;"> 11.407565 </td> 5948 <td style="text-align:left;"> Patagónica </td> 5949 </tr> 5950 <tr> 5951 <td style="text-align:left;"> TQRMNOPVSHMNQMCDEIJAH00792376 </td> 5952 <td style="text-align:right;"> 33 </td> 5953 <td style="text-align:right;"> 1 </td> 5954 <td style="text-align:right;"> -9 </td> 5955 <td style="text-align:right;"> 1 </td> 5956 <td style="text-align:right;"> NaN </td> 5957 <td style="text-align:left;"> Gran Buenos Aires </td> 5958 </tr> 5959 <tr> 5960 <td style="text-align:left;"> TQRMNOQUYHMNKPCDEIOAH00710452 </td> 5961 <td style="text-align:right;"> 38 </td> 5962 <td style="text-align:right;"> 1 </td> 5963 <td style="text-align:right;"> 100000 </td> 5964 <td style="text-align:right;"> 43 </td> 5965 <td style="text-align:right;"> 11.512925 </td> 5966 <td style="text-align:left;"> Pampeana </td> 5967 </tr> 5968 <tr> 5969 <td style="text-align:left;"> TQRMNOQUYHMNKPCDEIOAH00710452 </td> 5970 <td style="text-align:right;"> 38 </td> 5971 <td style="text-align:right;"> 1 </td> 5972 <td style="text-align:right;"> 10000 </td> 5973 <td style="text-align:right;"> 43 </td> 5974 <td style="text-align:right;"> 9.210340 </td> 5975 <td style="text-align:left;"> Pampeana </td> 5976 </tr> 5977 <tr> 5978 <td style="text-align:left;"> TQRMNOSUTHJMKTCDEHIBB00784269 </td> 5979 <td style="text-align:right;"> 22 </td> 5980 <td style="text-align:right;"> 1 </td> 5981 <td style="text-align:right;"> 65000 </td> 5982 <td style="text-align:right;"> 40 </td> 5983 <td style="text-align:right;"> 11.082142 </td> 5984 <td style="text-align:left;"> Noroeste </td> 5985 </tr> 5986 <tr> 5987 <td style="text-align:left;"> TQRMNOSUTHJMKTCDEHIBB00784269 </td> 5988 <td style="text-align:right;"> 22 </td> 5989 <td style="text-align:right;"> 1 </td> 5990 <td style="text-align:right;"> 25000 </td> 5991 <td style="text-align:right;"> 40 </td> 5992 <td style="text-align:right;"> 10.126631 </td> 5993 <td style="text-align:left;"> Noroeste </td> 5994 </tr> 5995 <tr> 5996 <td style="text-align:left;"> TQRMNORWQHLOLQCDEIIAD00791536 </td> 5997 <td style="text-align:right;"> 32 </td> 5998 <td style="text-align:right;"> 1 </td> 5999 <td style="text-align:right;"> 70000 </td> 6000 <td style="text-align:right;"> 1 </td> 6001 <td style="text-align:right;"> 11.156251 </td> 6002 <td style="text-align:left;"> Gran Buenos Aires </td> 6003 </tr> 6004 <tr> 6005 <td style="text-align:left;"> TQRMNOPPQHJLONCDEIIAD00785511 </td> 6006 <td style="text-align:right;"> 32 </td> 6007 <td style="text-align:right;"> 1 </td> 6008 <td style="text-align:right;"> -9 </td> 6009 <td style="text-align:right;"> 1 </td> 6010 <td style="text-align:right;"> NaN </td> 6011 <td style="text-align:left;"> Gran Buenos Aires </td> 6012 </tr> 6013 <tr> 6014 <td style="text-align:left;"> TQRMNOPPQHJLONCDEIIAD00785511 </td> 6015 <td style="text-align:right;"> 32 </td> 6016 <td style="text-align:right;"> 1 </td> 6017 <td style="text-align:right;"> -9 </td> 6018 <td style="text-align:right;"> 1 </td> 6019 <td style="text-align:right;"> NaN </td> 6020 <td style="text-align:left;"> Gran Buenos Aires </td> 6021 </tr> 6022 <tr> 6023 <td style="text-align:left;"> TQRMNORQTHLOSNCDEIJAH00711164 </td> 6024 <td style="text-align:right;"> 33 </td> 6025 <td style="text-align:right;"> 1 </td> 6026 <td style="text-align:right;"> 40000 </td> 6027 <td style="text-align:right;"> 1 </td> 6028 <td style="text-align:right;"> 10.596635 </td> 6029 <td style="text-align:left;"> Gran Buenos Aires </td> 6030 </tr> 6031 <tr> 6032 <td style="text-align:left;"> TQSMNOQUWHMLMNCDEGJBF00789124 </td> 6033 <td style="text-align:right;"> 13 </td> 6034 <td style="text-align:right;"> 1 </td> 6035 <td style="text-align:right;"> 36000 </td> 6036 <td style="text-align:right;"> 43 </td> 6037 <td style="text-align:right;"> 10.491274 </td> 6038 <td style="text-align:left;"> Pampeana </td> 6039 </tr> 6040 <tr> 6041 <td style="text-align:left;"> TQRMNOPTTHJMLNCDEGGFB00783107 </td> 6042 <td style="text-align:right;"> 10 </td> 6043 <td style="text-align:right;"> 1 </td> 6044 <td style="text-align:right;"> -9 </td> 6045 <td style="text-align:right;"> 42 </td> 6046 <td style="text-align:right;"> NaN </td> 6047 <td style="text-align:left;"> Cuyo </td> 6048 </tr> 6049 <tr> 6050 <td style="text-align:left;"> TQRMNOPTQHKMKQCDEGPDJ00789889 </td> 6051 <td style="text-align:right;"> 19 </td> 6052 <td style="text-align:right;"> 1 </td> 6053 <td style="text-align:right;"> 18000 </td> 6054 <td style="text-align:right;"> 40 </td> 6055 <td style="text-align:right;"> 9.798127 </td> 6056 <td style="text-align:left;"> Noroeste </td> 6057 </tr> 6058 <tr> 6059 <td style="text-align:left;"> TQRMNOSPXHKOLQCDEGNFJ00789612 </td> 6060 <td style="text-align:right;"> 17 </td> 6061 <td style="text-align:right;"> 1 </td> 6062 <td style="text-align:right;"> 12000 </td> 6063 <td style="text-align:right;"> 44 </td> 6064 <td style="text-align:right;"> 9.392662 </td> 6065 <td style="text-align:left;"> Patagónica </td> 6066 </tr> 6067 <tr> 6068 <td style="text-align:left;"> TQRMNOUPYHKOLQCDEGNFJ00789613 </td> 6069 <td style="text-align:right;"> 17 <
6069/td> 6070 <td style="text-align:right;"> 1 </td> 6071 <td style="text-align:right;"> 0 </td> 6072 <td style="text-align:right;"> 44 </td> 6073 <td style="text-align:right;"> -Inf </td> 6074 <td style="text-align:left;"> Patagónica </td> 6075 </tr> 6076 <tr> 6077 <td style="text-align:left;"> TQRMNOUPYHKOLQCDEGNFJ00789613 </td> 6078 <td style="text-align:right;"> 17 </td> 6079 <td style="text-align:right;"> 1 </td> 6080 <td style="text-align:right;"> 90000 </td> 6081 <td style="text-align:right;"> 44 </td> 6082 <td style="text-align:right;"> 11.407565 </td> 6083 <td style="text-align:left;"> Patagónica </td> 6084 </tr> 6085 <tr> 6086 <td style="text-align:left;"> TQRMNOPQVHMOLPCDEFLID00715014 </td> 6087 <td style="text-align:right;"> 5 </td> 6088 <td style="text-align:right;"> 1 </td> 6089 <td style="text-align:right;"> -9 </td> 6090 <td style="text-align:right;"> 43 </td> 6091 <td style="text-align:right;"> NaN </td> 6092 <td style="text-align:left;"> Pampeana </td> 6093 </tr> 6094 <tr> 6095 <td style="text-align:left;"> TQRMNOVQTHJOPSCDEIJAH00792281 </td> 6096 <td style="text-align:right;"> 33 </td> 6097 <td style="text-align:right;"> 1 </td> 6098 <td style="text-align:right;"> 60000 </td> 6099 <td style="text-align:right;"> 1 </td> 6100 <td style="text-align:right;"> 11.002100 </td> 6101 <td style="text-align:left;"> Gran Buenos Aires </td> 6102 </tr> 6103 <tr> 6104 <td style="text-align:left;"> TQRMNOPQXHMOLPCDEFLID00710841 </td> 6105 <td style="text-align:right;"> 5 </td> 6106 <td style="text-align:right;"> 1 </td> 6107 <td style="text-align:right;"> 60000 </td> 6108 <td style="text-align:right;"> 43 </td> 6109 <td style="text-align:right;"> 11.002100 </td> 6110 <td style="text-align:left;"> Pampeana </td> 6111 </tr> 6112 <tr> 6113 <td style="text-align:left;"> TQRMNOPQXHMOLPCDEFLID00710841 </td> 6114 <td style="text-align:right;"> 5 </td> 6115 <td style="text-align:right;"> 1 </td> 6116 <td style="text-align:right;"> 85000 </td> 6117 <td style="text-align:right;"> 43 </td> 6118 <td style="text-align:right;"> 11.350407 </td> 6119 <td style="text-align:left;"> Pampeana </td> 6120 </tr> 6121 <tr> 6122 <td style="text-align:left;"> TQRMNOSTPHLMLLCDEGKDB00705046 </td> 6123 <td style="text-align:right;"> 14 </td> 6124 <td style="text-align:right;"> 1 </td> 6125 <td style="text-align:right;"> 60000 </td> 6126 <td style="text-align:right;"> 43 </td> 6127 <td style="text-align:right;"> 11.002100 </td> 6128 <td style="text-align:left;"> Pampeana </td> 6129 </tr> 6130 <tr> 6131 <td style="text-align:left;"> TQRMNOSTPHLMLLCDEGKDB00705046 </td> 6132 <td style="text-align:right;"> 14 </td> 6133 <td style="text-align:right;"> 1 </td> 6134 <td style="text-align:right;"> -9 </td> 6135 <td style="text-align:right;"> 43 </td> 6136 <td style="text-align:right;"> NaN </td> 6137 <td style="text-align:left;"> Pampeana </td> 6138 </tr> 6139 <tr> 6140 <td style="text-align:left;"> TQRMNOSTPHLMLLCDEGKDB00705046 </td> 6141 <td style="text-align:right;"> 14 </td> 6142 <td style="text-align:right;"> 1 </td> 6143 <td style="text-align:right;"> -9 </td> 6144 <td style="text-align:right;"> 43 </td> 6145 <td style="text-align:right;"> NaN </td> 6146 <td style="text-align:left;"> Pampeana </td> 6147 </tr> 6148 <tr> 6149 <td style="text-align:left;"> TQRMNOPYSHKOKQCDEFLID00787875 </td> 6150 <td style="text-align:right;"> 5 </td> 6151 <td style="text-align:right;"> 1 </td> 6152 <td style="text-align:right;"> 30000 </td> 6153 <td style="text-align:right;"> 43 </td> 6154 <td style="text-align:right;"> 10.308953 </td> 6155 <td style="text-align:left;"> Pampeana </td> 6156 </tr> 6157 <tr> 6158 <td style="text-align:left;"> TQRMNORTPHKOKQCDEFLID00787876 </td> 6159 <td style="text-align:right;"> 5 </td> 6160 <td style="text-align:right;"> 1 </td> 6161 <td style="text-align:right;"> 40000 </td> 6162 <td style="text-align:right;"> 43 </td> 6163 <td style="text-align:right;"> 10.596635 </td> 6164 <td style="text-align:left;"> Pampeana </td> 6165 </tr> 6166 <tr> 6167 <td style="text-align:left;"> TQRMNORSPHMMPMCDEIJAH00709078 </td> 6168 <td style="text-align:right;"> 33 </td> 6169 <td style="text-align:right;"> 1 </td> 6170 <td style="text-align:right;"> 70000 </td> 6171 <td style="text-align:right;"> 1 </td> 6172 <td style="text-align:right;"> 11.156251 </td> 6173 <td style="text-align:left;"> Gran Buenos Aires </td> 6174 </tr> 6175 <tr> 6176 <td style="text-align:left;"> TQRMNOQQWHKOKRCDEGOIH00789766 </td> 6177 <td style="text-align:right;"> 18 </td> 6178 <td style="text-align:right;"> 1 </td> 6179 <td style="text-align:right;"> 35000 </td> 6180 <td style="text-align:right;"> 40 </td> 6181 <td style="text-align:right;"> 10.463103 </td> 6182 <td style="text-align:left;"> Noroeste </td> 6183 </tr> 6184 <tr> 6185 <td style="text-align:left;"> TQRMNOQQWHKOKRCDEGOIH00789766 </td> 6186 <td style="text-align:right;"> 18 </td> 6187 <td style="text-align:right;"> 1 </td> 6188 <td style="text-align:right;"> 12000 </td> 6189 <td style="text-align:right;"> 40 </td> 6190 <td style="text-align:right;"> 9.392662 </td> 6191 <td style="text-align:left;"> Noroeste </td> 6192 </tr> 6193 <tr> 6194 <td style="text-align:left;"> TQRMNORRVHMOKRCDEOJAH00713918 </td> 6195 <td style="text-align:right;"> 93 </td> 6196 <td style="text-align:right;"> 1 </td> 6197 <td style="text-align:right;"> 110000 </td> 6198 <td style="text-align:right;"> 44 </td> 6199 <td style="text-align:right;"> 11.608236 </td> 6200 <td style="text-align:left;"> Patagónica </td> 6201 </tr> 6202 <tr> 6203 <td style="text-align:left;"> TQRMNORRVHMOKRCDEOJAH00713918 </td> 6204 <td style="text-align:right;"> 93 </td> 6205 <td style="text-align:right;"> 1 </td> 6206 <td style="text-align:right;"> 85000 </td> 6207 <td style="text-align:right;"> 44 </td> 6208 <td style="text-align:right;"> 11.350407 </td> 6209 <td style="text-align:left;"> Patagónica </td> 6210 </tr> 6211 <tr> 6212 <td style="text-align:left;"> TQRMNOQUQHLOKSCDEGOIH00706615 </td> 6213 <td style="text-align:right;"> 18 </td> 6214 <td style="text-align:right;"> 1 </td> 6215 <td style="text-align:right;"> 70000 </td> 6216 <td style="text-align:right;"> 40 </td> 6217 <td style="text-align:right;"> 11.156251 </td> 6218 <td style="text-align:left;"> Noroeste </td> 6219 </tr> 6220</tbody> 6221</table></div> 6222 6223] 6224 6225 6226 6227] 6228 6229 6230--- 6231 6232 6233- `filter()` 6234 6235- `select()` 6236 6237- `rename()` 6238 6239- `mutate()` 6240 6241- **`summarise()`** 6242 6243- `group_by()` 6244 6245- `distinct()` 6246 6247- `arrange()` 6248 6249--- 6250 6251## Summarise() 6252 6253Función por excelencia para **generar medidas resúmenes** de las observaciones de datos. 6254 6255-- 6256 6257**Colapsa la base** a un valor o valores según la operación aplicada. 6258 6259-- 6260 6261Retomando nuestro ejemplo inicial, supongamos que quisiéramos obtener la media de edad y la mediana del ingreso a nivel paÃs 6262 6263 6264```r 6265resumen <- eph_ind %>% 6266 filter(!is.na(IPCF)) %>% 6267 rename(sexo = CH04, edad = CH06) %>% 6268 rename_with(tolower) %>% 6269 mutate(ipcf = as.numeric(ipcf)) %>% 6270* summarise(edad_mean = mean(edad, na.rm=TRUE), 6271* ipcf_median = median(ipcf, na.rm = TRUE)) 6272``` 6273 6274--- 6275 6276## Summarise() 6277 6278Notar que antes, como resultados obtenÃamos un dataframe, es decir filtramos las filas, nos quedábamos con menos columnas y las modificábamos, pero el resultado seguÃa siendo una base tabular. 6279 6280-- 6281
6282Ahora `summarise()` colapsa todos las observaciones a un único valor o valores 6283 6284-- 6285 6286 6287```r 6288resumen 6289``` 6290 6291``` 6292## edad_mean ipcf_median 6293## 1 36.00443 27500 6294``` 6295 6296-- 6297 6298Otro ejemplo, para los ocupados calculemos el promedio y el máximo de horas trabajadas en la ocupación principal (*PP3E_TOT*) 6299 6300 6301 6302```r 6303eph_ind %>% filter(ESTADO==1) %>% 6304* summarise(mean_hs = mean(PP3E_TOT), 6305* max_hs = max(PP3E_TOT)) 6306``` 6307 6308``` 6309## mean_hs max_hs 6310## 1 36.85635 999 6311``` 6312 6313--- 6314 6315## Summarise() vs Mutate() 6316 6317 6318Cuál es la diferencia entre estas dos funciones? Al parecer ambas sirven para generar nuevas columnas o reemplazarlas por nuevos valores 6319 6320-- 6321 - `mutate()` modifica una o varias columnas pero no altera la estructura de la base 6322 6323 6324<img src="inputs/Clase2/mutate.png" width="75%" height="75%" style="display: block; margin: auto;" /> 6325 6326-- 6327 6328Es del tipo *Window Function* que toma un vector de valores y **devuelve otro vector** de valores 6329 6330 6331<img src="inputs/Clase2/mutate2.png" width="45%" height="30%" style="display: block; margin: auto;" /> 6332 6333 6334--- 6335 6336## Summarise() vs Mutate() 6337 6338 - `summarise()` genera una columna o reemplaza una existente colapsando las base (cambia las dimensiones) 6339 6340 6341<img src="inputs/Clase2/sum.png" width="75%" height="75%" style="display: block; margin: auto;" /> 6342 6343-- 6344 6345Es del tipo *Summary Function* que toma un vector de valores y **devuelve un valor único** 6346 6347 6348<img src="inputs/Clase2/sum2.png" width="45%" height="30%" style="display: block; margin: auto;" /> 6349 6350 6351--- 6352 6353## Summarise() vs Mutate() 6354 6355El ejemplo anterior nos puede servir. Con el max de horas vimos que existen valores raros o imposibles, estos nos afectan el calculo del promedio, de la media, varianza, etc. 6356 6357-- 6358 6359Tenemos que corregir ese valor antes de generar medidas resúmenes. 6360 6361-- 6362 6363¿Se les ocurre cómo? 6364 6365--- 6366 6367## Summarise() vs Mutate() 6368 6369 6370```r 6371resumen <- eph_ind %>% filter(ESTADO==1) %>% 6372 mutate(PP3E_TOT = ifelse(PP3E_TOT==999, NA, PP3E_TOT)) 6373``` 6374 6375`mutate()` genera un cambio en la columna sin alterar la estructura de la base: 6376 6377-- 6378 6379```r 6380dim(resumen) 6381``` 6382 6383``` 6384## [1] 21364 182 6385``` 6386 6387-- 6388Ahora genero medida resumen 6389 6390 6391```r 6392resumen <- resumen %>% 6393 summarise(mean_hs = mean(PP3E_TOT), 6394 max_hs = max(PP3E_TOT)) 6395``` 6396 6397-- 6398 6399```r 6400dim(resumen) 6401``` 6402 6403``` 6404## [1] 1 2 6405``` 6406 6407`summarise()` colapsó la base original 6408 6409--- 6410 6411¿Cuál fue el resultado de esa operación? 6412 6413```r 6414resumen 6415``` 6416 6417``` 6418## mean_hs max_hs 6419## 1 NA NA 6420``` 6421 6422 6423Que pasó? 6424 6425-- 6426 6427Exacto! Ahora introdujimos `NA` en la columna y nos olvidamos de pedirle a la función que los ignore 6428 6429-- 6430 6431 6432```r 6433resumen <- eph_ind %>% filter(ESTADO==1) %>% 6434 mutate(PP3E_TOT = ifelse(PP3E_TOT==999, NA, PP3E_TOT)) %>% 6435 summarise(mean_hs = mean(PP3E_TOT, na.rm=TRUE), 6436 max_hs = max(PP3E_TOT, na.rm=TRUE)) 6437``` 6438 6439-- 6440 6441No solo cambió el calculo del máximo, al quitar los valores raros también cambia la estimación de la media 6442 6443 6444--- 6445 6446## Summarise() 6447 6448En nuestro ejemplo, solo empleamos la media, mediana y el máximo, pero la lista de funciones útiles para aplicar con `summarise()` es mucho mas extensa 6449 6450Veamos las más comunes 6451 6452- Center: `mean()`, `median()` 6453 6454- Spread: `sd()`, `IQR()`, `mad()` 6455 6456- Range: `min()`, `max()` 6457 6458- Position: `first()`, `last()`,` nth()` 6459 6460- Count: `n()`, `n_distinct()` 6461 6462- Logical: `any()`, `all()` 6463 6464 6465--- 6466 6467 6468- `filter()` 6469 6470- `select()` 6471 6472- `rename()` 6473 6474- `mutate()` 6475 6476- `summarise()` 6477 6478- **`group_by()`** 6479 6480- `distinct()` 6481 6482- `arrange()` 6483 6484--- 6485 6486## Group by() 6487 6488Aún nos queda por ver el uso más común que se le suele dar al `summarise()` 6489-- 6490Para ello tenemos que introducir antes a `group_by()` 6491 6492-- 6493 6494Rara vez reducimos todas las observaciones en una sola dimensión. En general en el análisis económico nos interesan las diferencias entre distintos grupos, buscamos agrupar las observaciones para compararlas, encontrar patrones que nos permitan hablar de heterogeneidades, etc. 6495 6496-- 6497 6498Cómo pueden sospechar, `group_by()` nos habilita este tipo de análisis.
6498Como función nos permite realizar una misma operación para un conjunto o grupos de observaciones. 6499 6500 6501--- 6502 6503 6504## Group by() + Summarise() 6505 6506 6507 6508<img src="inputs/Clase2/group_by_sum.png" width="100%" height="80%" style="display: block; margin: auto;" /> 6509 6510-- 6511 6512Al agrupar las observaciones por alguna o varias dimensiones en común, estaremos tratando a cada conjunto como una unidad aparte. 6513 6514--- 6515 6516 6517## Group by() + Summarise() 6518 6519Por ejemplo, si en nuestro ejemplo ahora quisiéramos ver cuál es la diferencia en la mediana del salario y en el promedio de horas trabajadas por género 6520 6521-- 6522 6523 6524```r 6525subset <- eph_ind %>% 6526 filter(!is.na(IPCF)) %>% 6527 rename(sexo = CH04, edad = CH06) %>% 6528 rename_with(tolower) %>% 6529 mutate(ipcf = as.numeric(ipcf), 6530 pp3e_tot = ifelse(pp3e_tot==999, NA, pp3e_tot)) 6531``` 6532 6533 6534```r 6535gender_diff <- subset %>% 6536* group_by(sexo) %>% 6537 summarise(mean_hs = mean(pp3e_tot, na.rm=TRUE), 6538 ipcf_median = median(ipcf, na.rm = TRUE)) 6539``` 6540 6541--- 6542 6543 6544```r 6545View(gender_diff) 6546``` 6547 6548-- 6549 6550 6551| sexo | mean_hs | ipcf_median | 6552|:----:|:--------:|:-----------:| 6553| 1 | 39.63996 | 27672.73 | 6554| 2 | 30.73663 | 27200.00 | 6555 6556-- 6557 6558Ahora la cantidad de filas resultantes son igual a la cantidad de grupos distintos que surgen del `group_by()` 6559 6560 6561--- 6562 6563## Group by() + Summarise() 6564 6565El agrupamiento puede ser por mas de una variable 6566 6567Por ejemplo, si queremos saber si la diferencia en medias salariales y en horas trabajadas es distintas en zonas urbanos y no urbanas, deberÃamos agrupar por ambas variables 6568 6569-- 6570 6571 6572```r 6573gender_diff_ur <- subset %>% 6574 mutate(URBANO = ifelse(mas_500=="S", 1, 0)) %>% 6575* group_by(sexo, urbano) %>% 6576 summarise(mean_hs = mean(pp3e_tot, na.rm=TRUE), 6577 ipcf_median = median(ipcf, na.rm = TRUE)) 6578``` 6579 6580-- 6581 6582 6583| sexo | urbano | mean_hs | ipcf_median | 6584|:----:|:------:|:--------:|:-----------:| 6585| 1 | 0 | 40.09855 | 29000.00 | 6586| 1 | 1 | 39.14594 | 26500.00 | 6587| 2 | 0 | 31.14342 | 28333.33 | 6588| 2 | 1 | 30.31133 | 25600.00 | 6589 6590 6591--- 6592 6593## Group by() + Mutate() 6594 6595Además de calcular estimaciones por grupos, el agrupamiento es útil cuando lo combinamos con la transformación de variables, antes de colapsar la base 6596 6597 6598<img src="inputs/Clase2/group_by_mutate.png" width="100%" height="80%" style="display: block; margin: auto;" /> 6599 6600--- 6601 6602## Group by() + Mutate() 6603 6604 6605 6606 6607Por ejemplo si quisiéramos saber la distribución de hogares según la edad del hijo menor, porque nos interesa conocer cuantos hogares serÃan alcanzados por una polÃtica focalizada en la nutrición de niños hasta 5 años 6608 6609-- 6610 6611Debemos filtrar por edad y condición de hijo, y luego **dentro de cada hogar** calcular la edad del hijo menor: 6612 6613 6614```r 6615aportes_ing <- eph_ind %>% 6616 select(codusu, nro_hogar, ch03, ch06) %>% 6617 filter(ch03==3 & ch06 %in% (0:17)) %>% #hijos menores 6618* group_by(codusu, nro_hogar) %>% 6619 mutate(edad_min = min(ch06)) 6620``` 6621 6622--- 6623 6624## Group by() + Mutate() + Summarise() 6625 6626Una vez calculada la edad del mas pequeño colapsamos la base de datos a un valor resumen. **Para cada edad** del hijo mas joven, calculamos la cantidad de hogares 6627 6628 6629 6630```r 6631aportes_ing <- eph_ind %>% 6632 select(codusu, nro_hogar, ch03, ch06) %>% 6633 filter(ch03==3 & ch06 %in% (0:17)) %>% #hijos menores 6634* group_by(codusu, nro_hogar) %>% 6635 mutate(edad_min = min(ch06)) %>% 6636* group_by(edad_min) %>% 6637 summarise(frecuency = n()) 6638``` 6639 6640--- 6641## Group by() + Mutate() + Summarise() 6642 6643Nuevamente, es bueno ir desmenuzando cada paso para visualizar lo que ocurre 6644-- 6645 6646Para ello podemos ir segmentando el código cada parte, una vez que comprendemos qué ocurre y cómo es el output, agregamos un paso nuevo 6647 6648-- 6649 6650Y asà sucesivamente, hasta entender el pipe completo de operaciones 6651 6652-- 6653 6654En la slide siguiente hacemos esto mismo 6655 6656 6657 6658--- 6659 6660 6661.panelset[ 6662 6663.panel[.panel-name[Paso incial, 1 y 2] 6664 6665 6666Estos pasos ya deben empezar a resultar familiares para el lector 6667 6668.mid[ 6669 6670```r 6671aportes_ing <- eph_ind %>% 6672 select(codusu, nro_hogar, ch03, ch06) %>% 6673 filter(ch03==3 & ch06 %in% (0:17)) 6674``` 6675] 6676 6677<div style="border: 1px solid #ddd; padding: 0px;
6677 overflow-y: scroll; height:360px; overflow-x: scroll; width:100%; "><table class="table" style="font-size: 13px; margin-left: auto; margin-right: auto;"> 6678 <thead> 6679 <tr> 6680 <th style="text-align:left;position: sticky; top:0; background-color: #FFFFFF;"> codusu </th> 6681 <th style="text-align:right;position: sticky; top:0; background-color: #FFFFFF;"> nro_hogar </th> 6682 <th style="text-align:right;position: sticky; top:0; background-color: #FFFFFF;"> ch03 </th> 6683 <th style="text-align:right;position: sticky; top:0; background-color: #FFFFFF;"> ch06 </th> 6684 </tr> 6685 </thead> 6686<tbody> 6687 <tr> 6688 <td style="text-align:left;"> TQRMNOSWVHKMKOCDEHPJB00790947 </td> 6689 <td style="text-align:right;"> 1 </td> 6690 <td style="text-align:right;"> 3 </td> 6691 <td style="text-align:right;"> 12 </td> 6692 </tr> 6693 <tr> 6694 <td style="text-align:left;"> TQRMNOSWVHKMKOCDEHPJB00790947 </td> 6695 <td style="text-align:right;"> 1 </td> 6696 <td style="text-align:right;"> 3 </td> 6697 <td style="text-align:right;"> 7 </td> 6698 </tr> 6699 <tr> 6700 <td style="text-align:left;"> TQRMNORRTHMMLLCDEOHCH00710640 </td> 6701 <td style="text-align:right;"> 1 </td> 6702 <td style="text-align:right;"> 3 </td> 6703 <td style="text-align:right;"> 15 </td> 6704 </tr> 6705 <tr> 6706 <td style="text-align:left;"> TQRMNORRTHMMLLCDEOHCH00710640 </td> 6707 <td style="text-align:right;"> 1 </td> 6708 <td style="text-align:right;"> 3 </td> 6709 <td style="text-align:right;"> 11 </td> 6710 </tr> 6711 <tr> 6712 <td style="text-align:left;"> TQRMNOPXUHLMKUCDEGOIH00706727 </td> 6713 <td style="text-align:right;"> 1 </td> 6714 <td style="text-align:right;"> 3 </td> 6715 <td style="text-align:right;"> 10 </td> 6716 </tr> 6717 <tr> 6718 <td style="text-align:left;"> TQRMNOPPTHMMLMCDEGIBJ00712052 </td> 6719 <td style="text-align:right;"> 1 </td> 6720 <td style="text-align:right;"> 3 </td> 6721 <td style="text-align:right;"> 7 </td> 6722 </tr> 6723 <tr> 6724 <td style="text-align:left;"> TQRMNOPPTHMMLMCDEGIBJ00712052 </td> 6725 <td style="text-align:right;"> 1 </td> 6726 <td style="text-align:right;"> 3 </td> 6727 <td style="text-align:right;"> 9 </td> 6728 </tr> 6729 <tr> 6730 <td style="text-align:left;"> TQRMNOSUTHJMKTCDEHIBB00784269 </td> 6731 <td style="text-align:right;"> 1 </td> 6732 <td style="text-align:right;"> 3 </td> 6733 <td style="text-align:right;"> 11 </td> 6734 </tr> 6735 <tr> 6736 <td style="text-align:left;"> TQRMNOPPQHJLONCDEIIAD00785511 </td> 6737 <td style="text-align:right;"> 1 </td> 6738 <td style="text-align:right;"> 3 </td> 6739 <td style="text-align:right;"> 8 </td> 6740 </tr> 6741 <tr> 6742 <td style="text-align:left;"> TQRMNORQTHLOSNCDEIJAH00711164 </td> 6743 <td style="text-align:right;"> 1 </td> 6744 <td style="text-align:right;"> 3 </td> 6745 <td style="text-align:right;"> 4 </td> 6746 </tr> 6747 <tr> 6748 <td style="text-align:left;"> TQRMNORQTHLOSNCDEIJAH00711164 </td> 6749 <td style="text-align:right;"> 1 </td> 6750 <td style="text-align:right;"> 3 </td> 6751 <td style="text-align:right;"> 14 </td> 6752 </tr> 6753 <tr> 6754 <td style="text-align:left;"> TQRMNORQTHLOSNCDEIJAH00711164 </td> 6755 <td style="text-align:right;"> 1 </td> 6756 <td style="text-align:right;"> 3 </td> 6757 <td style="text-align:right;"> 6 </td> 6758 </tr> 6759 <tr> 6760 <td style="text-align:left;"> TQRMNOUPYHKOLQCDEGNFJ00789613 </td> 6761 <td style="text-align:right;"> 1 </td> 6762 <td style="text-align:right;"> 3 </td> 6763 <td style="text-align:right;"> 8 </td> 6764 </tr> 6765 <tr> 6766 <td style="text-align:left;">
6766 TQRMNOSTPHLMLLCDEGKDB00705046 </td> 6767 <td style="text-align:right;"> 1 </td> 6768 <td style="text-align:right;"> 3 </td> 6769 <td style="text-align:right;"> 11 </td> 6770 </tr> 6771 <tr> 6772 <td style="text-align:left;"> TQRMNORSUHKOKQCDEFLID00787877 </td> 6773 <td style="text-align:right;"> 1 </td> 6774 <td style="text-align:right;"> 3 </td> 6775 <td style="text-align:right;"> 9 </td> 6776 </tr> 6777 <tr> 6778 <td style="text-align:left;"> TQRMNORSUHKOKQCDEFLID00787877 </td> 6779 <td style="text-align:right;"> 1 </td> 6780 <td style="text-align:right;"> 3 </td> 6781 <td style="text-align:right;"> 8 </td> 6782 </tr> 6783 <tr> 6784 <td style="text-align:left;"> TQRMNORSUHKOKQCDEFLID00787877 </td> 6785 <td style="text-align:right;"> 1 </td> 6786 <td style="text-align:right;"> 3 </td> 6787 <td style="text-align:right;"> 6 </td> 6788 </tr> 6789 <tr> 6790 <td style="text-align:left;"> TQRMNORSUHKOKQCDEFLID00787877 </td> 6791 <td style="text-align:right;"> 1 </td> 6792 <td style="text-align:right;"> 3 </td> 6793 <td style="text-align:right;"> 4 </td> 6794 </tr> 6795 <tr> 6796 <td style="text-align:left;"> TQRMNOQQWHKOKRCDEGOIH00789766 </td> 6797 <td style="text-align:right;"> 1 </td> 6798 <td style="text-align:right;"> 3 </td> 6799 <td style="text-align:right;"> 5 </td> 6800 </tr> 6801 <tr> 6802 <td style="text-align:left;"> TQRMNORRVHMOKRCDEOJAH00713918 </td> 6803 <td style="text-align:right;"> 1 </td> 6804 <td style="text-align:right;"> 3 </td> 6805 <td style="text-align:right;"> 3 </td> 6806 </tr> 6807 <tr> 6808 <td style="text-align:left;"> TQRMNOQWWHKOKPCDEGLDF00789500 </td> 6809 <td style="text-align:right;"> 1 </td> 6810 <td style="text-align:right;"> 3 </td> 6811 <td style="text-align:right;"> 2 </td> 6812 </tr> 6813 <tr> 6814 <td style="text-align:left;"> TQRMNOQYUHMOQRCDEIJAH00719559 </td> 6815 <td style="text-align:right;"> 1 </td> 6816 <td style="text-align:right;"> 3 </td> 6817 <td style="text-align:right;"> 2 </td> 6818 </tr> 6819 <tr> 6820 <td style="text-align:left;"> TQRMNOQWWHMMLQCDEIMBF00708621 </td> 6821 <td style="text-align:right;"> 1 </td> 6822 <td style="text-align:right;"> 3 </td> 6823 <td style="text-align:right;"> 5 </td> 6824 </tr> 6825 <tr> 6826 <td style="text-align:left;"> TQRMNOSSRHKMLSCDEFKID00787731 </td> 6827 <td style="text-align:right;"> 1 </td> 6828 <td style="text-align:right;"> 3 </td> 6829 <td style="text-align:right;"> 11 </td> 6830 </tr> 6831 <tr> 6832 <td style="text-align:left;"> TQRMNOSSRHKMLSCDEFKID00787731 </td> 6833 <td style="text-align:right;"> 1 </td> 6834 <td style="text-align:right;"> 3 </td> 6835 <td style="text-align:right;"> 7 </td> 6836 </tr> 6837 <tr> 6838 <td style="text-align:left;"> TQSMNOQXYHKMKTCDEHJGH00790304 </td> 6839 <td style="text-align:right;"> 1 </td> 6840 <td style="text-align:right;"> 3 </td> 6841 <td style="text-align:right;"> 6 </td> 6842 </tr> 6843 <tr> 6844 <td style="text-align:left;"> TQSMNOQXYHKMKTCDEHJGH00790304 </td> 6845 <td style="text-align:right;"> 1 </td> 6846 <td style="text-align:right;"> 3 </td> 6847 <td style="text-align:right;"> 2 </td> 6848 </tr> 6849 <tr> 6850 <td style="text-align:left;"> TQRMNOSUUHMOQQCDEIJAH00711284 </td> 6851 <td style="text-align:right;"> 1 </td> 6852 <td style="text-align:right;"> 3 </td> 6853 <td style="text-align:right;"> 14 </td> 6854 </tr> 6855 <tr> 6856 <td style="text-align:left;"> TQTMNOQXYHKMKTCDEHJGH00790305 </td> 6857 <td style="text-align:right;"> 1 </td> 6858 <td style="text-align:right;"> 3 </td> 6859 <td style="text-align:right;"> 13 </td> 6860 </tr> 6861 <tr> 6862 <td style="text-align:left;"> TQTMNOQXYHKMKTCDEHJGH00790305 </td> 6863 <td style="text-align:right;"> 1 </td> 6864 <td style="text-align:right;"> 3 </td> 6865 <td style="text-align:right;"> 11 </td> 6866 </tr> 6867 <tr> 6868 <td style="text-align:left;"> TQRMNORRXHLMLNCDEHJGH00706017 </td> 6869 <td style="text-align:right;"> 1 </td> 6870 <td style="text-align:right;"> 3 </td> 6871 <td style="text-align:right;"> 17 </td> 6872 </tr> 6873 <tr> 6874 <td style="text-align:left;"> TQRMNORRXHLMLNCDEHJGH00706017 </td> 6875 <td style="text-align:right;"> 1 </td> 6876 <td style="text-align:right;"> 3 </td> 6877 <td style="text-align:right;"> 11 </td> 6878 </tr> 6879 <tr> 6880 <td style="text-align:left;"> TQRMNOSQTHJMLNCDEHJGH00784389 </td> 6881 <td style="text-align:right;"> 1 </td> 6882 <td style="text-align:right;"> 3 </td> 6883 <td style="text-align:right;"> 2 </td> 6884 </tr> 6885 <tr> 6886 <td style="text-align:left;">
6886 TQRMNQRPRHJOKUCDEHIBB00784312 </td> 6887 <td style="text-align:right;"> 1 </td> 6888 <td style="text-align:right;"> 3 </td> 6889 <td style="text-align:right;"> 11 </td> 6890 </tr> 6891 <tr> 6892 <td style="text-align:left;"> TQRMNQRPRHJOKUCDEHIBB00784312 </td> 6893 <td style="text-align:right;"> 1 </td> 6894 <td style="text-align:right;"> 3 </td> 6895 <td style="text-align:right;"> 9 </td> 6896 </tr> 6897 <tr> 6898 <td style="text-align:left;"> TQRMNQRPRHJOKUCDEHIBB00784312 </td> 6899 <td style="text-align:right;"> 1 </td> 6900 <td style="text-align:right;"> 3 </td> 6901 <td style="text-align:right;"> 2 </td> 6902 </tr> 6903 <tr> 6904 <td style="text-align:left;"> TQSMNOPUXHKOKPCDEGLDF00789498 </td> 6905 <td style="text-align:right;"> 1 </td> 6906 <td style="text-align:right;"> 3 </td> 6907 <td style="text-align:right;"> 12 </td> 6908 </tr> 6909 <tr> 6910 <td style="text-align:left;"> TQSMNOPUXHKOKPCDEGLDF00789498 </td> 6911 <td style="text-align:right;"> 1 </td> 6912 <td style="text-align:right;"> 3 </td> 6913 <td style="text-align:right;"> 3 </td> 6914 </tr> 6915 <tr> 6916 <td style="text-align:left;"> TQRMNORURHKNLNCDEHLEH00790435 </td> 6917 <td style="text-align:right;"> 1 </td> 6918 <td style="text-align:right;"> 3 </td> 6919 <td style="text-align:right;"> 9 </td> 6920 </tr> 6921 <tr> 6922 <td style="text-align:left;"> TQRMNORURHKNLNCDEHLEH00790435 </td> 6923 <td style="text-align:right;"> 1 </td> 6924 <td style="text-align:right;"> 3 </td> 6925 <td style="text-align:right;"> 8 </td> 6926 </tr> 6927 <tr> 6928 <td style="text-align:left;"> TQRMNORPTHKLKTCDEGLDF00789499 </td> 6929 <td style="text-align:right;"> 1 </td> 6930 <td style="text-align:right;"> 3 </td> 6931 <td style="text-align:right;"> 15 </td> 6932 </tr> 6933 <tr> 6934 <td style="text-align:left;"> TQRMNORPTHKLKTCDEGLDF00789499 </td> 6935 <td style="text-align:right;"> 1 </td> 6936 <td style="text-align:right;"> 3 </td> 6937 <td style="text-align:right;"> 12 </td> 6938 </tr> 6939 <tr> 6940 <td style="text-align:left;"> TQRMNORWRHKMKOCDEHPJB00790946 </td> 6941 <td style="text-align:right;"> 1 </td> 6942 <td style="text-align:right;"> 3 </td> 6943 <td style="text-align:right;"> 2 </td> 6944 </tr> 6945 <tr> 6946 <td style="text-align:left;"> TQRMNOSVWHLKMOCDEIIAD00785577 </td> 6947 <td style="text-align:right;"> 1 </td> 6948 <td style="text-align:right;"> 3 </td> 6949 <td style="text-align:right;"> 10 </td> 6950 </tr> 6951 <tr> 6952 <td style="text-align:left;"> TQRMNOQTYHLOKSCDEGOIH00707817 </td> 6953 <td style="text-align:right;"> 1 </td> 6954 <td style="text-align:right;"> 3 </td> 6955 <td style="text-align:right;"> 10 </td> 6956 </tr> 6957 <tr> 6958 <td style="text-align:left;"> TQRMNOPSRHJNNUCDEIIAD00785690 </td> 6959 <td style="text-align:right;"> 1 </td> 6960 <td style="text-align:right;"> 3 </td> 6961 <td style="text-align:right;"> 8 </td> 6962 </tr> 6963 <tr> 6964 <td style="text-align:left;"> TQRMNOPTVHMOKNCDEHMHF00711899 </td> 6965 <td style="text-align:right;"> 1 </td> 6966 <td style="text-align:right;"> 3 </td> 6967 <td style="text-align:right;"> 17 </td> 6968 </tr> 6969 <tr> 6970 <td style="text-align:left;"> TQRMNOPTVHMOKNCDEHMHF00711899 </td> 6971 <td style="text-align:right;"> 1 </td> 6972 <td style="text-align:right;"> 3 </td> 6973 <td style="text-align:right;"> 10 </td> 6974 </tr> 6975 <tr> 6976 <td style="text-align:left;"> TQRMNOPTVHMOKNCDEHMHF00711899 </td> 6977 <td style="text-align:right;"> 1 </td> 6978 <td style="text-align:right;"> 3 </td> 6979 <td style="text-align:right;"> 10 </td> 6980 </tr> 6981 <tr> 6982 <td style="text-align:left;"> TQRMNOPTVHMOKNCDEHMHF00711899 </td> 6983 <td style="text-align:right;"> 1 </td> 6984 <td style="text-align:right;"> 3 </td> 6985 <td style="text-align:right;"> 6 </td> 6986 </tr> 6987</tbody> 6988</table></div> 6989 6990 6991(a modo ilustrativo solo las primeras 50 filas) 6992 6993 6994] 6995 6996 6997.panel[.panel-name[Paso 3] 6998 6999Agrupamos a nivel hogares, con el identificador único que forman la variable *codusu* y *nro_hogar* y **agregamos una columna** nueva que c
6999alcula la edad mÃnima entre los hijos 7000 7001.mid[ 7002 7003```r 7004aportes_ing <- eph_ind %>% 7005 select(codusu, nro_hogar, ch03, ch06) %>% 7006 filter(ch03==3 & ch06 %in% (0:17)) %>% #hijos menores 7007* group_by(codusu, nro_hogar) %>% 7008* mutate(edad_min = min(ch06)) 7009``` 7010] 7011 7012<div style="border: 1px solid #ddd; padding: 0px; overflow-y: scroll; height:340px; overflow-x: scroll; width:100%; "><table class="table" style="font-size: 13px; margin-left: auto; margin-right: auto;"> 7013 <thead> 7014 <tr> 7015 <th style="text-align:left;position: sticky; top:0; background-color: #FFFFFF;"> codusu </th> 7016 <th style="text-align:right;position: sticky; top:0; background-color: #FFFFFF;"> nro_hogar </th> 7017 <th style="text-align:right;position: sticky; top:0; background-color: #FFFFFF;"> ch03 </th> 7018 <th style="text-align:right;position: sticky; top:0; background-color: #FFFFFF;"> ch06 </th> 7019 <th style="text-align:right;position: sticky; top:0; background-color: #FFFFFF;"> edad_min </th> 7020 </tr> 7021 </thead> 7022<tbody> 7023 <tr> 7024 <td style="text-align:left;"> TQRMNOSWVHKMKOCDEHPJB00790947 </td> 7025 <td style="text-align:right;"> 1 </td> 7026 <td style="text-align:right;"> 3 </td> 7027 <td style="text-align:right;"> 12 </td> 7028 <td style="text-align:right;"> 7 </td> 7029 </tr> 7030 <tr> 7031 <td style="text-align:left;"> TQRMNOSWVHKMKOCDEHPJB00790947 </td> 7032 <td style="text-align:right;"> 1 </td> 7033 <td style="text-align:right;"> 3 </td> 7034 <td style="text-align:right;"> 7 </td> 7035 <td style="text-align:right;"> 7 </td> 7036 </tr> 7037 <tr> 7038 <td style="text-align:left;"> TQRMNORRTHMMLLCDEOHCH00710640 </td> 7039 <td style="text-align:right;"> 1 </td> 7040 <td style="text-align:right;"> 3 </td> 7041 <td style="text-align:right;"> 15 </td> 7042 <td style="text-align:right;"> 11 </td> 7043 </tr> 7044 <tr> 7045 <td style="text-align:left;"> TQRMNORRTHMMLLCDEOHCH00710640 </td> 7046 <td style="text-align:right;"> 1 </td> 7047 <td style="text-align:right;"> 3 </td> 7048 <td style="text-align:right;"> 11 </td> 7049 <td style="text-align:right;"> 11 </td> 7050 </tr> 7051 <tr> 7052 <td style="text-align:left;"> TQRMNOPXUHLMKUCDEGOIH00706727 </td> 7053 <td style="text-align:right;"> 1 </td> 7054 <td style="text-align:right;"> 3 </td> 7055 <td style="text-align:right;"> 10 </td> 7056 <td style="text-align:right;"> 10 </td> 7057 </tr> 7058 <tr> 7059 <td style="text-align:left;"> TQRMNOPPTHMMLMCDEGIBJ00712052 </td> 7060 <td style="text-align:right;"> 1 </td> 7061 <td style="text-align:right;"> 3 </td> 7062 <td style="text-align:right;"> 7 </td> 7063 <td style="text-align:right;"> 7 </td> 7064 </tr> 7065 <tr> 7066 <td style="text-align:left;"> TQRMNOPPTHMMLMCDEGIBJ00712052 </td> 7067 <td style="text-align:right;"> 1 </td> 7068 <td style="text-align:right;"> 3 </td> 7069 <td style="text-align:right;"> 9 </td> 7070 <td style="text-align:right;"> 7 </td> 7071 </tr> 7072 <tr> 7073 <td style="text-align:left;"> TQRMNOSUTHJMKTCDEHIBB00784269 </td> 7074 <td style="text-align:right;"> 1 </td> 7075 <td style="text-align:right;"> 3 </td> 7076 <td style="text-align:right;"> 11 </td> 7077 <td style="text-align:right;"> 11 </td> 7078 </tr> 7079 <tr> 7080 <td style="text-align:left;"> TQRMNOPPQHJLONCDEIIAD00785511 </td> 7081 <td style="text-align:right;"> 1 </td> 7082 <td style="text-align:right;"> 3 </td> 7083 <td style="text-align:right;"> 8 </td> 7084 <td style="text-align:right;"> 8 </td> 7085 </tr> 7086 <tr> 7087 <td style="text-align:left;"> TQRMNORQTHLOSNCDEIJAH00711164 </td> 7088 <td style="text-align:right;"> 1 </td> 7089 <td style="text-align:right;"> 3 </td> 7090 <td style="text-align:right;"> 4 </td> 7091 <td style="text-align:right;"> 4 </td> 7092 </tr> 7093 <tr> 7094 <td style="text-align:left;"> TQRMNORQTHLOSNCDEIJAH00711164 </td> 7095 <td style="text-align:right;"> 1 </td> 7096 <td style="text-align:right;"> 3 </td> 7097 <td style="text-align:right;"> 14 </td> 7098 <td style="text-align:right;"> 4 </td> 7099 </tr> 7100 <tr> 7101 <td style="text-align:left;"> TQRMNORQTHLOSNCDEIJAH00711164 </td> 7102 <td style="text-align:right;"> 1 </td> 7103 <td style="text-align:right;"> 3 </td> 7104 <td style="text-align:right;"> 6 </td> 7105 <td style="text-align:right;"> 4 </td> 7106 </tr> 7107 <tr> 7108 <td style="text-align:left;"> TQRMNOUPYHKOLQCDEGNFJ00789613 </td> 7109 <td style="text-align:right;"> 1 </td> 7110 <td style="text-align:right;"> 3 </td> 7111 <td style="text-align:right;"> 8 </td> 7112 <td style="text-align:right;"> 8 </td> 7113 </tr> 7114 <tr> 7115 <td style="text-align:left;">
7115 TQRMNOSTPHLMLLCDEGKDB00705046 </td> 7116 <td style="text-align:right;"> 1 </td> 7117 <td style="text-align:right;"> 3 </td> 7118 <td style="text-align:right;"> 11 </td> 7119 <td style="text-align:right;"> 11 </td> 7120 </tr> 7121 <tr> 7122 <td style="text-align:left;"> TQRMNORSUHKOKQCDEFLID00787877 </td> 7123 <td style="text-align:right;"> 1 </td> 7124 <td style="text-align:right;"> 3 </td> 7125 <td style="text-align:right;"> 9 </td> 7126 <td style="text-align:right;"> 4 </td> 7127 </tr> 7128 <tr> 7129 <td style="text-align:left;"> TQRMNORSUHKOKQCDEFLID00787877 </td> 7130 <td style="text-align:right;"> 1 </td> 7131 <td style="text-align:right;"> 3 </td> 7132 <td style="text-align:right;"> 8 </td> 7133 <td style="text-align:right;"> 4 </td> 7134 </tr> 7135 <tr> 7136 <td style="text-align:left;"> TQRMNORSUHKOKQCDEFLID00787877 </td> 7137 <td style="text-align:right;"> 1 </td> 7138 <td style="text-align:right;"> 3 </td> 7139 <td style="text-align:right;"> 6 </td> 7140 <td style="text-align:right;"> 4 </td> 7141 </tr> 7142 <tr> 7143 <td style="text-align:left;"> TQRMNORSUHKOKQCDEFLID00787877 </td> 7144 <td style="text-align:right;"> 1 </td> 7145 <td style="text-align:right;"> 3 </td> 7146 <td style="text-align:right;"> 4 </td> 7147 <td style="text-align:right;"> 4 </td> 7148 </tr> 7149 <tr> 7150 <td style="text-align:left;"> TQRMNOQQWHKOKRCDEGOIH00789766 </td> 7151 <td style="text-align:right;"> 1 </td> 7152 <td style="text-align:right;"> 3 </td> 7153 <td style="text-align:right;"> 5 </td> 7154 <td style="text-align:right;"> 5 </td> 7155 </tr> 7156 <tr> 7157 <td style="text-align:left;"> TQRMNORRVHMOKRCDEOJAH00713918 </td> 7158 <td style="text-align:right;"> 1 </td> 7159 <td style="text-align:right;"> 3 </td> 7160 <td style="text-align:right;"> 3 </td> 7161 <td style="text-align:right;"> 3 </td> 7162 </tr> 7163 <tr> 7164 <td style="text-align:left;"> TQRMNOQWWHKOKPCDEGLDF00789500 </td> 7165 <td style="text-align:right;"> 1 </td> 7166 <td style="text-align:right;"> 3 </td> 7167 <td style="text-align:right;"> 2 </td> 7168 <td style="text-align:right;"> 2 </td> 7169 </tr> 7170 <tr> 7171 <td style="text-align:left;"> TQRMNOQYUHMOQRCDEIJAH00719559 </td> 7172 <td style="text-align:right;"> 1 </td> 7173 <td style="text-align:right;"> 3 </td> 7174 <td style="text-align:right;"> 2 </td> 7175 <td style="text-align:right;"> 2 </td> 7176 </tr> 7177 <tr> 7178 <td style="text-align:left;"> TQRMNOQWWHMMLQCDEIMBF00708621 </td> 7179 <td style="text-align:right;"> 1 </td> 7180 <td style="text-align:right;"> 3 </td> 7181 <td style="text-align:right;"> 5 </td> 7182 <td style="text-align:right;"> 5 </td> 7183 </tr> 7184 <tr> 7185 <td style="text-align:left;"> TQRMNOSSRHKMLSCDEFKID00787731 </td> 7186 <td style="text-align:right;"> 1 </td> 7187 <td style="text-align:right;"> 3 </td> 7188 <td style="text-align:right;"> 11 </td> 7189 <td style="text-align:right;"> 7 </td> 7190 </tr> 7191 <tr> 7192 <td style="text-align:left;"> TQRMNOSSRHKMLSCDEFKID00787731 </td> 7193 <td style="text-align:right;"> 1 </td> 7194 <td style="text-align:right;"> 3 </td> 7195 <td style="text-align:right;"> 7 </td> 7196 <td style="text-align:right;"> 7 </td> 7197 </tr> 7198 <tr> 7199 <td style="text-align:left;"> TQSMNOQXYHKMKTCDEHJGH00790304 </td> 7200 <td style="text-align:right;"> 1 </td> 7201 <td style="text-align:right;"> 3 </td> 7202 <td style="text-align:right;"> 6 </td> 7203 <td style="text-align:right;"> 2 </td> 7204 </tr> 7205 <tr> 7206 <td style="text-align:left;"> TQSMNOQXYHKMKTCDEHJGH00790304 </td> 7207 <td style="text-align:right;"> 1 </td> 7208 <td style="text-align:right;"> 3 </td> 7209 <td style="text-align:right;"> 2 </td> 7210 <td style="text-align:right;"> 2 </td> 7211 </tr> 7212 <tr> 7213 <td style="text-align:left;"> TQRMNOSUUHMOQQCDEIJAH00711284 </td> 7214 <td style="text-align:right;"> 1 </td> 7215 <td style="text-align:right;"> 3 </td> 7216 <td style="text-align:right;"> 14 </td> 7217 <td style="text-align:right;"> 14 </td> 7218 </tr> 7219 <tr> 7220 <td style="text-align:left;"> TQTMNOQXYHKMKTCDEHJGH00790305 </td> 7221 <td style="text-align:right;"> 1 </td> 7222 <td style="text-align:right;"> 3 </td> 7223 <td style="text-align:right;"> 13 </td> 7224 <td style="text-align:right;"> 11 </td> 7225 </tr> 7226 <tr> 7227 <td style="text-align:left;"> TQTMNOQXYHKMKTCDEHJGH00790305 </td> 7228 <td style="text-align:right;"> 1 </td> 7229 <td style="text-align:right;"> 3 </td> 7230 <td style="text-align:right;"> 11 </td> 7231 <td style="text-align:right;"> 11 </td> 7232 </tr> 7233 <tr> 7234 <td style="text-align:left;"> TQRMNORRXHLMLNCDEHJGH00706017 </td> 7235 <td style="text-align:right;"> 1 </td> 7236 <td style="text-align:right;"> 3 </td> 7237 <td style="text-align:right;"> 17 </td> 7238 <td style="text-align:right;"> 11 </td> 7239 </tr> 7240 <tr> 7241 <td style="text-align:left;"> TQRMNORRXHLMLNCDEHJGH00706017 </td> 7242 <td style="text-align:right;"> 1 </td> 7243 <td style="text-align:right;"> 3 </td> 7244 <td style="text-align:right;"> 11 </td> 7245 <td style="text-align:right;"> 11 </td> 7246 </tr> 7247 <tr> 7248 <td style="text-align:left;"> TQRMNOSQTHJMLNCDEHJGH00784389 </td> 7249 <td style="text-align:right;"> 1 </td> 7250 <td style="text-align:right;"> 3 </td> 7251 <td style="text-align:right;"> 2 </td> 7252 <td style="text-align:right;"> 2 </td> 7253 </tr> 7254 <tr> 7255 <td style="text-align:left;">
7255 TQRMNQRPRHJOKUCDEHIBB00784312 </td> 7256 <td style="text-align:right;"> 1 </td> 7257 <td style="text-align:right;"> 3 </td> 7258 <td style="text-align:right;"> 11 </td> 7259 <td style="text-align:right;"> 2 </td> 7260 </tr> 7261 <tr> 7262 <td style="text-align:left;"> TQRMNQRPRHJOKUCDEHIBB00784312 </td> 7263 <td style="text-align:right;"> 1 </td> 7264 <td style="text-align:right;"> 3 </td> 7265 <td style="text-align:right;"> 9 </td> 7266 <td style="text-align:right;"> 2 </td> 7267 </tr> 7268 <tr> 7269 <td style="text-align:left;"> TQRMNQRPRHJOKUCDEHIBB00784312 </td> 7270 <td style="text-align:right;"> 1 </td> 7271 <td style="text-align:right;"> 3 </td> 7272 <td style="text-align:right;"> 2 </td> 7273 <td style="text-align:right;"> 2 </td> 7274 </tr> 7275 <tr> 7276 <td style="text-align:left;"> TQSMNOPUXHKOKPCDEGLDF00789498 </td> 7277 <td style="text-align:right;"> 1 </td> 7278 <td style="text-align:right;"> 3 </td> 7279 <td style="text-align:right;"> 12 </td> 7280 <td style="text-align:right;"> 3 </td> 7281 </tr> 7282 <tr> 7283 <td style="text-align:left;"> TQSMNOPUXHKOKPCDEGLDF00789498 </td> 7284 <td style="text-align:right;"> 1 </td> 7285 <td style="text-align:right;"> 3 </td> 7286 <td style="text-align:right;"> 3 </td> 7287 <td style="text-align:right;"> 3 </td> 7288 </tr> 7289 <tr> 7290 <td style="text-align:left;"> TQRMNORURHKNLNCDEHLEH00790435 </td> 7291 <td style="text-align:right;"> 1 </td> 7292 <td style="text-align:right;"> 3 </td> 7293 <td style="text-align:right;"> 9 </td> 7294 <td style="text-align:right;"> 8 </td> 7295 </tr> 7296 <tr> 7297 <td style="text-align:left;"> TQRMNORURHKNLNCDEHLEH00790435 </td> 7298 <td style="text-align:right;"> 1 </td> 7299 <td style="text-align:right;"> 3 </td> 7300 <td style="text-align:right;"> 8 </td> 7301 <td style="text-align:right;"> 8 </td> 7302 </tr> 7303 <tr> 7304 <td style="text-align:left;"> TQRMNORPTHKLKTCDEGLDF00789499 </td> 7305 <td style="text-align:right;"> 1 </td> 7306 <td style="text-align:right;"> 3 </td> 7307 <td style="text-align:right;"> 15 </td> 7308 <td style="text-align:right;"> 12 </td> 7309 </tr> 7310 <tr> 7311 <td style="text-align:left;"> TQRMNORPTHKLKTCDEGLDF00789499 </td> 7312 <td style="text-align:right;"> 1 </td> 7313 <td style="text-align:right;"> 3 </td> 7314 <td style="text-align:right;"> 12 </td> 7315 <td style="text-align:right;"> 12 </td> 7316 </tr> 7317 <tr> 7318 <td style="text-align:left;"> TQRMNORWRHKMKOCDEHPJB00790946 </td> 7319 <td style="text-align:right;"> 1 </td> 7320 <td style="text-align:right;"> 3 </td> 7321 <td style="text-align:right;"> 2 </td> 7322 <td style="text-align:right;"> 2 </td> 7323 </tr> 7324 <tr> 7325 <td style="text-align:left;"> TQRMNOSVWHLKMOCDEIIAD00785577 </td> 7326 <td style="text-align:right;"> 1 </td> 7327 <td style="text-align:right;"> 3 </td> 7328 <td style="text-align:right;"> 10 </td> 7329 <td style="text-align:right;"> 10 </td> 7330 </tr> 7331 <tr> 7332 <td style="text-align:left;"> TQRMNOQTYHLOKSCDEGOIH00707817 </td> 7333 <td style="text-align:right;"> 1 </td> 7334 <td style="text-align:right;"> 3 </td> 7335 <td style="text-align:right;"> 10 </td> 7336 <td style="text-align:right;"> 10 </td> 7337 </tr> 7338 <tr> 7339 <td style="text-align:left;"> TQRMNOPSRHJNNUCDEIIAD00785690 </td> 7340 <td style="text-align:right;"> 1 </td> 7341 <td style="text-align:right;"> 3 </td> 7342 <td style="text-align:right;"> 8 </td> 7343 <td style="text-align:right;"> 8 </td> 7344 </tr> 7345 <tr> 7346 <td style="text-align:left;"> TQRMNOPTVHMOKNCDEHMHF00711899 </td> 7347 <td style="text-align:right;"> 1 </td> 7348 <td style="text-align:right;"> 3 </td> 7349 <td style="text-align:right;"> 17 </td> 7350 <td style="text-align:right;"> 6 </td> 7351 </tr> 7352 <tr> 7353 <td style="text-align:left;"> TQRMNOPTVHMOKNCDEHMHF00711899 </td> 7354 <td style="text-align:right;"> 1 </td> 7355 <td style="text-align:right;"> 3 </td> 7356 <td style="text-align:right;"> 10 </td> 7357 <td style="text-align:right;"> 6 </td> 7358 </tr> 7359 <tr> 7360 <td style="text-align:left;"> TQRMNOPTVHMOKNCDEHMHF00711899 </td> 7361 <td style="text-align:right;"> 1 </td> 7362 <td style="text-align:right;"> 3 </td> 7363 <td style="text-align:right;"> 10 </td> 7364 <td style="text-align:right;"> 6 </td> 7365 </tr> 7366 <tr> 7367 <td style="text-align:left;"> TQRMNOPTVHMOKNCDEHMHF00711899 </td> 7368 <td style="text-align:right;"> 1 </td> 7369 <td style="text-align:right;"> 3 </td> 7370 <td style="text-align:right;"> 6 </td> 7371 <td style="text-align:right;"> 6 </td> 7372 </tr> 7373</tbody> 7374</table></div> 7375 7376] 7377 7378.panel[.panel-name[Paso 4] 7379
7380Ahora agrupamos en base a esa columna nueva, es decir por cada valor posible de edad del hijo mas pequeño, y **colapsamos** la base a una medida resumen (frecuencia). 7381 7382.mid[ 7383 7384```r 7385aportes_ing <- eph_ind %>% 7386 select(codusu, nro_hogar, ch03, ch06) %>% 7387 filter(ch03==3 & ch06 %in% (0:17)) %>% #hijos menores 7388 group_by(codusu, nro_hogar) %>% 7389 mutate(edad_min = min(ch06)) %>% 7390* group_by(edad_min) %>% 7391* summarise(frecuency = n()) 7392``` 7393] 7394 7395<div style="border: 1px solid #ddd; padding: 0px; overflow-y: scroll; height:295px; overflow-x: scroll; width:100%; "><table class="table" style="font-size: 13px; margin-left: auto; margin-right: auto;"> 7396 <thead> 7397 <tr> 7398 <th style="text-align:right;position: sticky; top:0; background-color: #FFFFFF;"> edad_min </th> 7399 <th style="text-align:right;position: sticky; top:0; background-color: #FFFFFF;"> frecuency </th> 7400 </tr> 7401 </thead> 7402<tbody> 7403 <tr> 7404 <td style="text-align:right;"> 1 </td> 7405 <td style="text-align:right;"> 721 </td> 7406 </tr> 7407 <tr> 7408 <td style="text-align:right;"> 2 </td> 7409 <td style="text-align:right;"> 765 </td> 7410 </tr> 7411 <tr> 7412 <td style="text-align:right;"> 3 </td> 7413 <td style="text-align:right;"> 809 </td> 7414 </tr> 7415 <tr> 7416 <td style="text-align:right;"> 4 </td> 7417 <td style="text-align:right;"> 799 </td> 7418 </tr> 7419 <tr> 7420 <td style="text-align:right;"> 5 </td> 7421 <td style="text-align:right;"> 682 </td> 7422 </tr> 7423 <tr> 7424 <td style="text-align:right;"> 6 </td> 7425 <td style="text-align:right;"> 727 </td> 7426 </tr> 7427 <tr> 7428 <td style="text-align:right;"> 7 </td> 7429 <td style="text-align:right;"> 663 </td> 7430 </tr> 7431 <tr> 7432 <td style="text-align:right;"> 8 </td> 7433 <td style="text-align:right;"> 646 </td> 7434 </tr> 7435 <tr> 7436 <td style="text-align:right;"> 9 </td> 7437 <td style="text-align:right;"> 627 </td> 7438 </tr> 7439 <tr> 7440 <td style="text-align:right;"> 10 </td> 7441 <td style="text-align:right;"> 524 </td> 7442 </tr> 7443 <tr> 7444 <td style="text-align:right;"> 11 </td> 7445 <td style="text-align:right;"> 505 </td> 7446 </tr> 7447 <tr> 7448 <td style="text-align:right;"> 12 </td> 7449 <td style="text-align:right;"> 498 </td> 7450 </tr> 7451 <tr> 7452 <td style="text-align:right;"> 13 </td> 7453 <td style="text-align:right;"> 410 </td> 7454 </tr> 7455 <tr> 7456 <td style="text-align:right;"> 14 </td> 7457 <td style="text-align:right;"> 391 </td> 7458 </tr> 7459 <tr> 7460 <td style="text-align:right;"> 15 </td> 7461 <td style="text-align:right;"> 347 </td> 7462 </tr> 7463 <tr> 7464 <td style="text-align:right;"> 16 </td> 7465 <td style="text-align:right;"> 293 </td> 7466 </tr> 7467 <tr> 7468 <td style="text-align:right;"> 17 </td> 7469 <td style="text-align:right;"> 294 </td> 7470 </tr> 7471</tbody> 7472</table></div> 7473 7474] 7475 7476 7477 7478] 7479 7480--- 7481 7482 7483- `filter()` 7484 7485- `select()` 7486 7487- `rename()` 7488 7489- `mutate()` 7490 7491- `summarise()` 7492 7493- `group_by()` 7494 7495- **`distinct()`** 7496 7497- `arrange()` 7498 7499--- 7500 7501## Distinct() 7502 7503Esta función nos permite quedarnos con observaciones únicas, es decir remover los duplicados 7504 7505-- 7506 7507Repasemos el ejercicio anterior, nos quedamos con hijos menores en cada hogar, calculamos la edad del menor y luego la frecuencia con que se da ese valor 7508 7509-- 7510 7511Al filtrar nos quedamos potencialmente con varios hijos en un mismo hogar que **se duplican** en la suma. 7512-- 7513 Lo que deberÃamos hacer es quedarnos con una **única** observación por hogar 7514 7515 7516 7517```r 7518aportes_ing <- eph_ind %>% group_by(codusu, nro_hogar) %>% 7519 filter(ch03==3 & ch06 %in% (0:17)) %>% #hijos menores
7520 mutate(edad_min = min(ch06)) %>% 7521* distinct(codusu, nro_hogar, .keep_all = TRUE) %>% 7522 group_by(edad_min) %>% 7523 summarise(frecuency = n()) 7524``` 7525 7526-- 7527el argumento `.keep_all = TRUE` indica que además de las columnas que identifican a los duplicados, mantener el resto 7528 7529--- 7530 7531Ahora la cantidad de hogares cambia en nuestro data frame resultante, respecto de la tabla anterior donde no consideramos el `distintc()` 7532 7533<table class="table" style="font-size: 13px; margin-left: auto; margin-right: auto;"> 7534 <thead> 7535 <tr> 7536 <th style="text-align:right;"> edad_min </th> 7537 <th style="text-align:right;"> frecuency </th> 7538 </tr> 7539 </thead> 7540<tbody> 7541 <tr> 7542 <td style="text-align:right;"> 1 </td> 7543 <td style="text-align:right;"> 330 </td> 7544 </tr> 7545 <tr> 7546 <td style="text-align:right;"> 2 </td> 7547 <td style="text-align:right;"> 370 </td> 7548 </tr> 7549 <tr> 7550 <td style="text-align:right;"> 3 </td> 7551 <td style="text-align:right;"> 382 </td> 7552 </tr> 7553 <tr> 7554 <td style="text-align:right;"> 4 </td> 7555 <td style="text-align:right;"> 393 </td> 7556 </tr> 7557 <tr> 7558 <td style="text-align:right;"> 5 </td> 7559 <td style="text-align:right;"> 345 </td> 7560 </tr> 7561 <tr> 7562 <td style="text-align:right;"> 6 </td> 7563 <td style="text-align:right;"> 359 </td> 7564 </tr> 7565 <tr> 7566 <td style="text-align:right;"> 7 </td> 7567 <td style="text-align:right;"> 350 </td> 7568 </tr> 7569 <tr> 7570 <td style="text-align:right;"> 8 </td> 7571 <td style="text-align:right;"> 349 </td> 7572 </tr> 7573 <tr> 7574 <td style="text-align:right;"> 9 </td> 7575 <td style="text-align:right;"> 338 </td> 7576 </tr> 7577 <tr> 7578 <td style="text-align:right;"> 10 </td> 7579 <td style="text-align:right;"> 307 </td> 7580 </tr> 7581 <tr> 7582 <td style="text-align:right;"> 11 </td> 7583 <td style="text-align:right;"> 311 </td> 7584 </tr> 7585 <tr> 7586 <td style="text-align:right;"> 12 </td> 7587 <td style="text-align:right;"> 314 </td> 7588 </tr> 7589 <tr> 7590 <td style="text-align:right;"> 13 </td> 7591 <td style="text-align:right;"> 286 </td> 7592 </tr> 7593 <tr> 7594 <td style="text-align:right;"> 14 </td> 7595 <td style="text-align:right;"> 298 </td> 7596 </tr> 7597 <tr> 7598 <td style="text-align:right;"> 15 </td> 7599 <td style="text-align:right;"> 291 </td> 7600 </tr> 7601 <tr> 7602 <td style="text-align:right;"> 16 </td> 7603 <td style="text-align:right;"> 284 </td> 7604 </tr> 7605 <tr> 7606 <td style="text-align:right;"> 17 </td> 7607 <td style="text-align:right;"> 288 </td> 7608 </tr> 7609</tbody> 7610</table> 7611 7612 7613 7614--- 7615 7616 7617- `filter()` 7618 7619- `select()` 7620 7621- `rename()` 7622 7623- `mutate()` 7624 7625- `summarise()` 7626 7627- `group_by()` 7628 7629- `distinct()` 7630 7631- **`arrange()`** 7632 7633 7634 7635--- 7636 7637 7638 7639## Arrange() 7640 7641Arrange es la última función que veremos, esta nos permite ordenar de forma ascendente o descendente las observaciones 7642 7643Por ejemplo, si dentro del hogar quisiéramos ordenar a los miembros por su edad 7644 7645 7646 7647```r 7648miembros <- eph_ind %>% group_by(codusu, nro_hogar) %>% 7649 arrange(ch06, .by_group = TRUE) 7650``` 7651 7652 7653```r 7654miembros[1:10, c("codusu", "nro_hogar", "ch06")] 7655``` 7656 7657``` 7658## # A tibble: 10 x 3 7659## # Groups: codusu, nro_hogar [5] 7660## codusu nro_hogar ch06 7661## <chr> <int> <int> 7662## 1 TQRMNOPPQHJKKSCDEHJGH00790191 1 83 7663## 2 TQRMNOPPQHJKLLCDEGOIH00783953 1 12 7664## 3 TQRMNOPPQHJKLLCDEGOIH00783953 1 56 7665## 4 TQRMNOPPQHJKTMCDEIJAH00786549 1 18 7666## 5 TQRMNOPPQHJKTMCDEIJAH00786549 1 42 7667## 6 TQRMNOPPQHJKTMCDEIJAH00786549 1 50 7668## 7 TQRMNOPPQHJLONCDEIIAD00785511 1 8 7669## 8 TQRMNOPPQHJLONCDEIIAD00785511 1 41 7670## 9 TQRMNOPPQHJLONCDEIIAD00785511 1 44 7671## 10 TQRMNOPPQHJMKTCDEGGFB00783084 1 8 7672``` 7673 7674--- 7675 7676## Arrange() 7677 7678O en nuestro ejemplo anterior, si quisiéramos ordenar las edades de los hijos menores de mayor a menor en vez de al revés 7679 7680 7681 7682```r 7683aportes_ing <- aportes_ing %>% 7684 arrange(desc(edad_min)) 7685``` 7686 7687<div style="border: 1px solid #ddd; padding: 0px;
7687 overflow-y: scroll; height:340px; overflow-x: scroll; width:100%; "><table class="table" style="font-size: 13px; margin-left: auto; margin-right: auto;"> 7688 <thead> 7689 <tr> 7690 <th style="text-align:right;position: sticky; top:0; background-color: #FFFFFF;"> edad_min </th> 7691 <th style="text-align:right;position: sticky; top:0; background-color: #FFFFFF;"> frecuency </th> 7692 </tr> 7693 </thead> 7694<tbody> 7695 <tr> 7696 <td style="text-align:right;"> 17 </td> 7697 <td style="text-align:right;"> 288 </td> 7698 </tr> 7699 <tr> 7700 <td style="text-align:right;"> 16 </td> 7701 <td style="text-align:right;"> 284 </td> 7702 </tr> 7703 <tr> 7704 <td style="text-align:right;"> 15 </td> 7705 <td style="text-align:right;"> 291 </td> 7706 </tr> 7707 <tr> 7708 <td style="text-align:right;"> 14 </td> 7709 <td style="text-align:right;"> 298 </td> 7710 </tr> 7711 <tr> 7712 <td style="text-align:right;"> 13 </td> 7713 <td style="text-align:right;"> 286 </td> 7714 </tr> 7715 <tr> 7716 <td style="text-align:right;"> 12 </td> 7717 <td style="text-align:right;"> 314 </td> 7718 </tr> 7719 <tr> 7720 <td style="text-align:right;"> 11 </td> 7721 <td style="text-align:right;"> 311 </td> 7722 </tr> 7723 <tr> 7724 <td style="text-align:right;"> 10 </td> 7725 <td style="text-align:right;"> 307 </td> 7726 </tr> 7727 <tr> 7728 <td style="text-align:right;"> 9 </td> 7729 <td style="text-align:right;"> 338 </td> 7730 </tr> 7731 <tr> 7732 <td style="text-align:right;"> 8 </td> 7733 <td style="text-align:right;"> 349 </td> 7734 </tr> 7735 <tr> 7736 <td style="text-align:right;"> 7 </td> 7737 <td style="text-align:right;"> 350 </td> 7738 </tr> 7739 <tr> 7740 <td style="text-align:right;"> 6 </td> 7741 <td style="text-align:right;"> 359 </td> 7742 </tr> 7743 <tr> 7744 <td style="text-align:right;"> 5 </td> 7745 <td style="text-align:right;"> 345 </td> 7746 </tr> 7747 <tr> 7748 <td style="text-align:right;"> 4 </td> 7749 <td style="text-align:right;"> 393 </td> 7750 </tr> 7751 <tr> 7752 <td style="text-align:right;"> 3 </td> 7753 <td style="text-align:right;"> 382 </td> 7754 </tr> 7755 <tr> 7756 <td style="text-align:right;"> 2 </td> 7757 <td style="text-align:right;"> 370 </td> 7758 </tr> 7759 <tr> 7760 <td style="text-align:right;"> 1 </td> 7761 <td style="text-align:right;"> 330 </td> 7762 </tr> 7763</tbody> 7764</table></div> 7765 7766 7767--- 7768 7769 7770## EL ABC de dplyr 7771 7772BIEN! 7773 7774-- 7775 7776Hemos recorrido las funciones principales de dplyr. Ahora ya estamos equipados para comenzar a transformar datos y manipularlos. 7777 7778-- 7779 7780Antes de terminar, a modo de extra, introduciremos algunos conceptos adicionales, que permiten fácilmente escalar y replicar algunas de estas operaciones de manera rápida 7781 7782-- 7783 7784Con un esfuerzo marginal, podremos aplicar nuestro ABC de manera eficiente, corriendo una sola linea para transformar múltiples variables a la vez. 7785 7786-- 7787 7788Veamos algunos ejemplos simples para despertar la curiosidad sobre este punto 7789 7790 7791--- 7792 7793## Operaciones para múltiples columnas 7794 7795A veces es necesario realizar una **misma operación** sobre **varias columnas** a la vez 7796 7797-- 7798 7799Antes vimos la función `rename_with()` que nos permitÃa renombrar muchas columnas al mismo tiempo. Veamos cómo funciona esta lógica para `mutate()` y `summarise()` 7800 7801-- 7802 7803Por ejemplo, si en la eph quisiéramos pasar a dolares todas las columnas de ingreso, la forma rudimentaria de hacerlo serÃa la siguiente 7804 7805 7806```r 7807eph_ind_usd <- eph_ind %>% 7808 mutate(p21_usd = p21/390, 7809 tot_p12_usd = tot_p12/390, 7810 t_vi_usd = t_vi/390, 7811 p47t_usd = p47t/390, 7812 itf_usd = itf/390) %>% 7813 select(ends_with("USD")) #solo muestro columnas nuevas 7814``` 7815 7816Bueno... es un poco tedioso pero lo podemos hacer. Ahora imagÃnense si estas fueran mas columnas, muchas mas, hacerlo a mano serÃa pesa
7816do. 7817 7818--- 7819 7820## Across() 7821 7822Para eso existe la función `across()` que nos permite reducir el trabajo de código y lograr el mismo resultado. 7823-- 7824Veamos qué argumentos nos demanda esta función 7825 7826`across(.cols, .fns, ..., .names = NULL)` 7827 7828-- 7829- cuáles columnas modificar: `.cols` 7830- qué función aplicar: `.fn` 7831- opcionalmente especificar nombres nuevos `.names` 7832 7833-- 7834 7835Probemos con el caso anterior 7836 7837 7838```r 7839eph_ind_usd <- eph_ind %>% 7840 mutate(across(.cols=c(p21,tot_p12, t_vi, p47t, itf), 7841 .fns = function(x) (x/390), 7842 .names = "{col}_USD")) %>% 7843 select(ends_with("_USD")) #solo muestro columnas nuevas 7844``` 7845 7846-- 7847 7848`names = "{col}_USD` crea para un nombre para esas columnas transformadas, que sea el mismo nombre de la columna original mas el sufijo "_USD" 7849 7850--- 7851 7852 7853```r 7854head(eph_ind_usd, 10) 7855``` 7856 7857``` 7858## ipcf_usd p21_USD tot_p12_USD t_vi_USD p47t_USD itf_USD 7859## 1 117.9487 51.28205 0.00000 66.66666667 117.94871795 117.9487 7860## 2 410.7692 0.00000 0.00000 113.84615385 113.84615385 821.5385 7861## 3 410.7692 0.00000 0.00000 707.69230769 707.69230769 821.5385 7862## 4 0.0000 0.00000 0.00000 -0.02307692 -0.02307692 0.0000 7863## 5 0.0000 0.00000 0.00000 -0.02307692 -0.02307692 0.0000 7864## 6 26.5641 0.00000 0.00000 12.82051282 12.82051282 132.8205 7865## 7 26.5641 0.00000 38.46154 0.00000000 38.46153846 132.8205 7866## 8 26.5641 0.00000 0.00000 0.00000000 0.00000000 132.8205 7867## 9 26.5641 0.00000 0.00000 81.53846154 81.53846154 132.8205 7868## 10 26.5641 0.00000 0.00000 0.00000000 0.00000000 132.8205 7869``` 7870 7871 7872--- 7873 7874 7875## Across() 7876 7877La expresión que le pasemos al argumento `.fns` puede resultar un poco rara 7878 7879-- 7880 7881Tratemos de entender qué le estamos diciendo a R con `function(x) x/390` 7882 7883-- 7884 7885- `function(x)` indica que vamos a pasar una operación para que aplique sobre x 7886 7887-- 7888 7889- `x/390` es esa operación 7890 7891-- 7892 7893¿Y qué valor va a tomar x?... 7894 7895-- 7896 7897**x será cada una de las columnas que indicamos antes** 7898-- 7899, es decir esa operación se aplica sobre los valores que tome cada una de estas columna en cada observación 7900 7901--- 7902 7903## Across() 7904 7905Veamos otro ejemplo, supongamos que por aglomerado queremos expresar los datos de ingreso como porcentaje del promedio. 7906 7907 7908```r 7909eph_ind_mean <- eph_ind %>% 7910 group_by(aglomerado) %>% 7911 mutate(across(.cols = c(p21, tot_p12, t_vi, p47t, itf), 7912 .fns= function(x) x/mean(x, na.rm = TRUE), 7913 .names = "{col}_percent")) %>% 7914 select(aglomerado, ends_with("_percent")) 7915``` 7916 7917 7918--- 7919 7920## Across() 7921 7922Otro ejemplo, si quisiéramos redondear a dos decimales todas las columnas que sean numéricas 7923 7924-- 7925 7926De la misma familia que `contains()`, `ends_with()`, `star_with()` existe `where()` que aplica la función a todas las columnas que satisfagan una condición lógica. 7927 7928-- 7929En este caso, esa condición es que sea numérica 7930 7931 7932```r 7933eph_ind_r <- eph_ind %>% 7934 mutate(across(where(is.numeric), 7935 .fns= function(x) round(x, digits=2))) 7936``` 7937 7938Notar que en este caso estaremos pisando (reemplazando) las columnas originales 7939 7940 7941--- 7942 7943## Across() 7944 7945También podemos aplicarlo con `summarise()` 7946 7947Si quisiéramos para una lista de columnas la media y el desvÃo de cada una, podemos escribir 7948 7949 7950```r 7951eph_ind %>% 7952 summarise(across(.cols = c(p21, ipcf, itf), 7953 .fns = list(mean=mean, sd=sd), na.rm=TRUE)) 7954``` 7955 7956``` 7957## p21_mean p21_sd ipcf_mean ipcf_sd itf_mean itf_sd 7958## 1 25559.51 52545.68 37628.33 47253.11 119202.9 127728.3 7959``` 7960 7961Notar que en este caso mediante la función `list()` paso una **lista de funciones**, para cada columna calculo tanto la media como el desvÃo 7962 7963 7964--- 7965 7966## Extra: Donde consultar? 7967 7968Material recomendado para revisar y extender estos contenidos: 7969 7970- [libro de la bibliografÃa base](https://r4ds.had.co.nz/) 7971 7972Para extender la noción y explicación de los temas vistos, asà como encontrar ejemplos y aplicaciones con otras bases de datos revisar el libro de consulta de base. Se recomienda este material para
7972introducirse en cada tema, lograr una comprensión conceptual y poder practicar con ejemplos concretos. 7973 7974-- 7975 7976- Cheat-Sheets: ayuda memoria y resumen 7977 - [Data Wrangling](https://www.rstudio.com/wp-content/uploads/2015/02/data-wrangling-cheatsheet.pdf) 7978 - [Data Transformation](https://github.com/rstudio/cheatsheets/blob/main/data-transformation.pdf) 7979 - [Data Tidyng](https://github.com/rstudio/cheatsheets/blob/main/tidyr.pdf) 7980 7981Este material funciona como ayuda memoria o "machete". En dos hojas agrupa las funciones por tema, y explica brevemente para qué sirven y qué argumentos requiere cada una. Recomendado para ganar agilidad al escribir códigos. Se listan solo algunos ejemplos, en la sección [material extra](https://crisbonavida-rclass.netlify.app/biblio_extra.html) encontrarán más. 7982 7983 7984--- 7985 7986## Extra: Identación, estilo y orden 7987 7988Veamos algunas buenas prácticas y conjunto de recomendaciones a la hora de escribir código. 7989 7990-- 7991 7992Para facilitar la lectura y el orden de los códigos una buena práctica es mantener una identificación, es decir un espacio respecto del margen. 7993 7994-- 7995 7996Esto ayuda a identificar rápidamente el objeto inicial, las distintas operaciones que se aplican y la secuencialidad 7997 7998 7999<img src="inputs/Clase2/identacion_v2.png" width="100%" height="100%" style="display: block; margin: auto;" /> 8000 8001 8002--- 8003 8004## Extra: Identación estilo y orden 8005 8006Mismo aplica por ejemplo para especificar argumentos de una función, sobre todo cuando estos son largos 8007 8008 8009```r 8010long_function <- function(a = "a long argument", 8011 b = "another argument", 8012 c = "another long argument") { 8013 8014} 8015``` 8016 8017-- 8018 8019Si les interesa leer más sobre esto ver el siguiente [link](https://irudnyts.github.io/r-coding-style-guide/) 8020 8021Para un resumen de las recomendaciones generales ver en la [bibliografÃa base](https://r4ds.hadley.nz/workflow-style.html) 8022 8023--- 8024 8025## Extra: Identación estilo y orden 8026 8027De esas recomendaciones generales aquà haremos énfasis en dos, evitar mayúsculas y espacios 8028 8029 8030 8031```r 8032#Procurar 8033subset <- eph_ind %>% 8034 filter(!is.na(IPCF)) %>% 8035 8036#Evitar 8037SUBSET <- eph_ind %>% 8038 filter(!is.na(IPCF)) %>% ) 8039``` 8040 8041-- 8042 8043 8044```r 8045#Asà Sà 8046mean(x, na.rm = TRUE) 8047 8048#Asà NO 8049mean (x ,na.rm=TRUE) 8050``` 8051 8052 8053--- 8054 8055## Extra: Identación estilo y orden 8056 8057Otra buena práctica, es documentar y comentar sus códigos 8058 8059-- 8060 8061Esto es muy útil para compartir los códigos con otros pero sobre todo para su **"yo del futuro"** 8062 8063 8064 8065 8066```r 8067#Calculo diferencias en horas y en ingreso por urbano-rural 8068gender_diff_ur <- subset %>% 8069 mutate(URBANO = ifelse(mas_500=="S", 1, 0)) %>% 8070 group_by(sexo, urbano) %>% 8071 summarise(hs = mean(pp3e_tot, na.rm=TRUE), #uso media 8072 ipcf = median(ipcf, na.rm = TRUE)) #uso mediana 8073``` 8074 8075-- 8076 8077Tampoco hace falta que sea exagerado, es una ayuda para entender el código, no un detalle pormenorizado. 8078 8079 8080--- 8081 8082## Extra: Identación estilo y orden 8083 8084Por último, es fundamental ordenar el script, asignándole una estructura. Para esto: 8085 8086- `#` 8087- `----` 8088 8089-- 8090 8091Anteponiéndolo a la palabra o frase, la cantidad de `#` que usemos indica la **jerarquÃa** 8092 8093Para que se incorpore al **Ãndice** necesitamos indicar al menos 4 guiones seguidos: `----` 8094 8095-- 8096 8097<img src="inputs/Clase2/indice.jpg" width="80%" height="60%" style="display: block; margin: auto;" /> 8098 8099 8100--- 8101 8102<br /> 8103 8104En las próximas clases veremos cómo setear el path y navegar por las diferentes subcarpetas 8105 8106-- 8107 8108<br /> 8109<br /> 8110<br /> 8111 8112**En los trabajos prácticos se espera que escriban sus códigos con estas buenas prácticas** 8113 8114-- 8115 8116<br /> 8117<br /> 8118 8119 </textarea> 8120<style data-target="print-only">@media screen {.remark-slide-container{display:block;}.remark-slide-scaler{box-shadow:none;}}</style>
8121<script src="https://remarkjs.com/downloads/remark-latest.min.js"></script>
vendor: 2 bytes, line 8121
8121
8122<script>var slideshow = remark.create({ 8123"highlightStyle": "rainbow", 8124"highlightLines": true, 8125"countIncrementalSlides": false 8126}); 8127if (window.HTMLWidgets) slideshow.on('afterShowSlide', function (slide) { 8128 window.dispatchEvent(new Event('resize')); 8129}); 8130(function(d) { 8131 var s = d.createElement("style"), r = d.querySelector(".remark-slide-scaler"); 8132 if (!r) return; 8133 s.type = "text/css"; s.innerHTML = "@page {size: " + r.style.width + " " + r.style.height +"; }"; 8134 d.head.appendChild(s); 8135})(document); 8136 8137(function(d) { 8138 var el = d.getElementsByClassName("remark-slides-area"); 8139 if (!el) return; 8140 var slide, slides = slideshow.getSlides(), els = el[0].children; 8141 for (var i = 1; i < slides.length; i++) { 8142 slide = slides[i]; 8143 if (slide.properties.continued === "true" || slide.properties.count === "false") { 8144 els[i - 1].className += ' has-continuation'; 8145 } 8146 } 8147 var s = d.createElement("style"); 8148 s.type = "text/css"; s.innerHTML = "@media print { .has-continuation { display: none; } }"; 8149 d.head.appendChild(s); 8150})(document); 8151// delete the temporary CSS (for displaying all slides initially) when the user 8152// starts to view slides 8153(function() { 8154 var deleted = false; 8155 slideshow.on('beforeShowSlide', function(slide) { 8156 if (deleted) return; 8157 var sheets = document.styleSheets, node; 8158 for (var i = 0; i < sheets.length; i++) { 8159 node = sheets[i].ownerNode; 8160 if (node.dataset["target"] !== "print-only") continue; 8161 node.parentNode.removeChild(node); 8162 } 8163 deleted = true; 8164 }); 8165})(); 8166// add `data-at-shortcutkeys` attribute to <body> to resolve conflicts with JAWS 8167// screen reader (see PR #262) 8168(function(d) { 8169 let res = {}; 8170 d.querySelectorAll('.remark-help-content table tr').forEach(tr => { 8171 const t = tr.querySelector('td:nth-child(2)').innerText; 8172 tr.querySelectorAll('td:first-child .key').forEach(key => { 8173 const k = key.innerText; 8174 if (/^[a-z]$/.test(k)) res[k] = t; // must be a single letter (key) 8175 }); 8176 }); 8177 d.body.setAttribute('data-at-shortcutkeys', JSON.stringify(res)); 8178})(document); 8179(function() { 8180 "use strict" 8181 // Replace
8181<script> tags in slides area to make them executable 8182 var scripts = document.querySelectorAll( 8183 '.remark-slides-area .remark-slide-container script' 8184 ); 8185 if (!scripts.length) return; 8186 for (var i = 0; i < scripts.length; i++) { 8187 var s = document.createElement('script'); 8188 var code = document.createTextNode(scripts[i].textContent); 8189 s.appendChild(code); 8190 var scriptAttrs = scripts[i].attributes; 8191 for (var j = 0; j < scriptAttrs.length; j++) { 8192 s.setAttribute(scriptAttrs[j].name, scriptAttrs[j].value); 8193 } 8194 scripts[i].parentElement.replaceChild(s, scripts[i]); 8195 } 8196})(); 8197(function() { 8198 var links = document.getElementsByTagName('a'); 8199 for (var i = 0; i < links.length; i++) { 8200 if (/^(https?:)?\/\//.test(links[i].getAttribute('href'))) { 8201 links[i].target = '_blank'; 8202 } 8203 } 8204})(); 8205// adds .remark-code-has-line-highlighted class to <pre> parent elements 8206// of code chunks containing highlighted lines with class .remark-code-line-highlighted 8207(function(d) { 8208 const hlines = d.querySelectorAll('.remark-code-line-highlighted'); 8209 const preParents = []; 8210 const findPreParent = function(line, p = 0) { 8211 if (p > 1) return null; // traverse up no further than grandparent 8212 const el = line.parentElement; 8213 return el.tagName === "PRE" ? el : findPreParent(el, ++p); 8214 }; 8215 8216 for (let line of hlines) { 8217 let pre = findPreParent(line); 8218 if (pre && !preParents.includes(pre)) preParents.push(pre); 8219 } 8220 preParents.forEach(p => p.classList.add("remark-code-has-line-highlighted")); 8221})(document);</script>
8221 8222
8223<script> 8224slideshow._releaseMath = function(el) { 8225 var i, text, code, codes = el.getElementsByTagName('code'); 8226 for (i = 0; i < codes.length;) { 8227 code = codes[i]; 8228 if (code.parentNode.tagName !== 'PRE' && code.childElementCount === 0) { 8229 text = code.textContent; 8230 if (/^\\\((.|\s)+\\\)$/.test(text) || /^\\\[(.|\s)+\\\]$/.test(text) || 8231 /^\$\$(.|\s)+\$\$$/.test(text) || 8232 /^\\begin\{([^}]+)\}(.|\s)+\\end\{[^}]+\}$/.test(text)) { 8233 code.outerHTML = code.innerHTML; // remove <code></code> 8234 continue; 8235 } 8236 } 8237 i++; 8238 } 8239}; 8240slideshow._releaseMath(document); 8241</script>
8241 8242<!-- dynamically load mathjax for compatibility with self-contained -->
8243<script> 8244(function () { 8245 var script = document.createElement('script'); 8246 script.type = 'text/javascript'; 8247 script.src = 'https://mathjax.rstudio.com/latest/MathJax.js?config=TeX-MML-AM_CHTML'; 8248 if (location.protocol !== 'file:' && /^https?:/.test(script.src)) 8249 script.src = script.src.replace(/^https?:/, ''); 8250 document.getElementsByTagName('head')[0].appendChild(script); 8251})(); 8252</script>
8252 8253 </body> 8254</html>
Line numbers count LF bytes from the start of the resource, as the search results do. Vendor segments are library code the classifier recognised; they are stored but not indexed. Bytes are shown as Latin1 characters, one per byte.