vignettes/06-04.R

In igutierrezm/mypkgr: Diccionario de variables del OLN

#===============================================================================
# 06-04. Tasa de trabajadores de subsistencia
#===============================================================================

# Variables auxiliares
# by <- c(~educ_, ~etnia_, ~sexo_, ~oficio1_, ~rama1_, ~edad_tr_, ~zona_)
by <- c(~educ_)

# Especificaciones
args <- list()
for (i in 1:length(by)) {
  args[[i]] <- list()                        # sub-especificación
  args[[i]]$formula <- ~trabsub_             # fórmula
  args[[i]]$by      <- by[[i]]               # desagregación
  args[[i]]$FUN     <- svymean               # función
  args[[i]]$subpop  <- ~I(ocupado_ == "Si")  # subpoblación
}
args$src    <- "casen"                       # fuente
args$years  <- seq(2013, 2015, 2)            # años cubiertos
args$months <- seq(0, 0, 1)                  # meses cubiertos
args$data   <- data                          # directorio de las BBDD

# Estimaciones
chart <- oln_table_create(args)