#' Submuestra de la ENE 2010 02 EFM
#'
#' Un conjunto de datos con las 100 primeras observaciones de la BBDD de la
#' Encuesta Nacional de Empleo (ENE) trimestre enero-marzo 2010.
#'
#' @format Un data.frame con 100 filas y 126 variables
#' (importado de SPSS a R con el paquete \code{haven}).
#' @source
#' \href{http://www.ine.cl/estadisticas/laborales/ene/base-de-datos}{Instituto
#' Nacional Estadísticas, Chile}.
#' @encoding UTF-8
"ene_2010_02"
#
# #===============================================================================
# # Reproducción
# #===============================================================================
#
# # Paquetes auxiliares
# library("tidyverse") # >= 0.5.0
# library(haven) # >= 1.0.0.9000
#
# # Macros auxiliares
# data <- "C:/Users/observatorio02/Google Drive/BBDD/"
#
# # Abreviaciones
# `%+%` <- function(a, b) paste0(a, b)
#
# # Importación CASEN
# files <- list.files(data %+% "dta/")
# for (file in files) {
# # Importa la BBDD
# df <- haven::read_dta(path %+% "dta/" %+% file)
#
# # Corrige el encoding de los caracteres no-ascii
# Encoding(names(df)) <- "latin1"
# for (varname in colnames(df)) {
# try(Encoding(names(attr(df[[varname]], "labels"))) <- "latin1", silent = TRUE)
# }
# }
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.