olndictr es un diccionario de variables resumido en tres funciones:
show_index()
muestra el índice de variables del diccionario.find_inputs()
identifica las variables necesarias para crear una o más variables del diccionario.add_varlist()
añade a la BBDD una o más variables del diccionario.Obviamente, el número de variables consideradas dentro de este diccionario es limitado, pero cubre la mayoría de las variables usadas por el OLN en su quehacer diario (revise la documentación para más detalles).
# Instala la versión de desarrollo desde GitHub:
# install.packages("devtools")
devtools::install_github("igutierrezm/olndictr")
Si Ud. encuentra algún bug, por favor compártalo en issues y adjunte un ejemplo mínimo reproducible.
library(dplyr)
library(labelled)
# library(olndictr)
devtools::load_all()
# Carga una submuestra de la BBDD de la ENE (trimestre enero-marzo 2010)
olndictr::casen_2015
#> # A tibble: 2,974 x 776
#> folio o id_vivienda region provincia comuna zona
#> <dbl> <dbl> <dbl> <dbl+lbl> <dbl+lbl> <dbl+lbl> <dbl+lbl>
#> 1 1.1011e+10 1 1101100101 1 11 1101 1
#> 2 1.1011e+10 2 1101100101 1 11 1101 1
#> 3 1.1011e+10 3 1101100101 1 11 1101 1
#> 4 1.1011e+10 4 1101100101 1 11 1101 1
#> 5 1.1011e+10 5 1101100101 1 11 1101 1
#> # ... with 2,969 more rows, and 769 more variables
# Muestra el índice de las variables incluidas en el diccionario
olndictr::show_index("casen")
#> # A tibble: 44 x 2
#> variable descripcion
#> <chr> <chr>
#> 1 activ_ condición de actividad
#> 2 cise_ condición de actividad
#> 3 cise_ condición de actividad
#> 4 cise_ condición de actividad
#> 5 cise_ condición de actividad
#> # ... with 39 more rows
# Identifica los insumos de la variable nivel educacional (educ_)
olndictr::find_inputs("educ_", "casen", year = 2015)
#> [1] "educ"
# Expande casen_2015 añadiendo la variable nivel educacional (educ_)
df <- casen_2015 %>%
olndictr::add_varlist("educ_", src = "casen", year = 2015)
# Visualiza la relación entre educ_ y sus insumos (como factores)
df$educ <- labelled::to_factor(df$educ)
df %>%
dplyr::distinct(educ, educ_) %>%
dplyr::select(educ, educ_)
#> # A tibble: 14 x 2
#> educ educ_
#> <fctr> <fctr>
#> 1 m. hum. incompleta básica
#> 2 profesional incompleto media
#> 3 m. hum. completa media
#> 4 ns/nr ns/nr
#> 5 básica compl. básica
#> # ... with 9 more rows
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.