### Install development version of censo2017 from GitHub

Source: https://docs.ropensci.org/censo2017/index.html

Installs the development version of censo2017 directly from GitHub using the remotes package. The first line is commented out as a reminder to install remotes if needed.

```r
# install.packages("remotes")
remotes::install_github("ropensci/censo2017")
```

--------------------------------

### Install censo2017 from CRAN

Source: https://docs.ropensci.org/censo2017/index.html

Installs the stable version of the censo2017 package from CRAN. Requires 3.5 GB free disk space to create the local database, which then occupies 1.0 GB.

```r
install.packages("censo2017")
```

--------------------------------

### View and replicate nivel_educacional_biobio dataset

Source: https://docs.ropensci.org/censo2017/reference/nivel_educacional_biobio.html

The first block shows the output of the dataset `nivel_educacional_biobio`, a tibble with 860 rows and 4 columns (comuna, nivel_educ, cuenta, proporcion). The second block is a `dontrun` example that replicates the dataset using dplyr with SQL via `censo_conectar()`, joining tables `zonas`, `viviendas`, `hogares`, and `personas`, filtering region "08", and computing counts and proportions. The comment notes the result is slightly different from the vignettes explaining the same table.

```r
nivel_educacional_biobio
#> # A tibble: 860 × 4
#>    comuna nivel_educ cuenta proporcion
#>    <chr>       <int>  <int>      <dbl>
#>  1 08101           1   4851    0.0217 
#>  2 08101           2   2701    0.0121 
#>  3 08101           3   3579    0.0160 
#>  4 08101           4    831    0.00372
#>  5 08101           5  37538    0.168  
#>  6 08101           6   5687    0.0254 
#>  7 08101           7  47356    0.212  
#>  8 08101           8  18641    0.0834 
#>  9 08101           9   5854    0.0262 
#> 10 08101          10   2653    0.0119 
#> # ℹ 850 more rows
```

```r
if (FALSE) { # \dontrun{
# replicar el resultado usando dplyr directamente con SQL
# es ligeramente distinto a las vinietas que explican esta misma tabla
nivel_educacional_biobio <- tbl(censo_conectar(), "zonas") %>% 
 mutate(
  region = substr(as.character(geocodigo), 1, 2),
  comuna = substr(as.character(geocodigo), 1, 5)
 ) %>% 
 filter(region == "08") %>% 
 select(comuna, geocodigo, zonaloc_ref_id) %>%
 inner_join(select(tbl(censo_conectar(), "viviendas"),
  zonaloc_ref_id, vivienda_ref_id), by = "zonaloc_ref_id") %>%
 inner_join(select(tbl(censo_conectar(), "hogares"),
  vivienda_ref_id, hogar_ref_id), by = "vivienda_ref_id") %>%
 inner_join(select(tbl(censo_conectar(), "personas"),
  hogar_ref_id, nivel_educ = p15), by = "hogar_ref_id") %>%
 group_by(comuna, nivel_educ) %>%
 summarise(cuenta = n()) %>%
 group_by(comuna) %>%
 mutate(proporcion = cuenta * (1 / sum(cuenta))) %>% 
 arrange(comuna, nivel_educ)} # }
```

--------------------------------

### censo_tabla() example

Source: https://docs.ropensci.org/censo2017/reference/censo_tabla.html

Example call to censo_tabla() wrapped in if (FALSE) to prevent execution during package checks. It extracts the 'comunas' table from the database.

```r
if (FALSE)  censo_tabla("comunas")  # \dontrun{}
```

--------------------------------

### Use censo_conectar() with DBI to list tables and query data

Source: https://docs.ropensci.org/censo2017/reference/censo_conectar.html

Example usage of censo_conectar() with DBI. Lists tables and runs a SQL query on the connection. Wrapped in \dontrun to prevent execution during package checks.

```r
if (FALSE) { # \dontrun{
 DBI::dbListTables(censo_conectar())

 DBI::dbGetQuery(
  censo_conectar(),
  'SELECT * FROM comunas WHERE provincia_ref_id = 1'
 )
} # }
```

--------------------------------

### Descargar base de datos del censo con censo_descargar()

Source: https://docs.ropensci.org/censo2017/reference/censo_descargar.html

Descarga la base de datos completa del censo como un archivo zip que se descomprime para crear la base de datos local. Por defecto descarga la última versión disponible en GitHub; se pueden ver todas las versiones en https://github.com/pachamaltese/censo2017/releases.

```r
censo_descargar(ver = NULL)
```

--------------------------------

### Unir datos censales a mapa comunal con censo_tabla() y left_join()

Source: https://docs.ropensci.org/censo2017/articles/censo2017.html

Construye un mapa de la región del Biobío uniendo datos censales con geometrías comunales. Se usa para agregar datos al mapa sin depender de chilemapas, combinando la tabla de comunas con la información educacional previamente calculada.

```R
mapa_biobio <- censo_tabla("mapa_comunas") %>%
  filter(region == "08") %>% 
  left_join(nivel_educacional_biobio, by = "comuna")
```

--------------------------------

### Ejemplo de censo_descargar() con \dontrun{}

Source: https://docs.ropensci.org/censo2017/reference/censo_descargar.html

Ejemplo de uso de censo_descargar() dentro de un bloque \dontrun{} para evitar su ejecución en ejemplos automáticos. Si no se desea descargar en el home, se puede usar usethis::edit_r_environ() para crear la variable de entorno CENSO2017_DIR con la ruta.

```r
if (FALSE)  censo_descargar()  # \dontrun{}
```

--------------------------------

### Eliminar la base de datos del censo con censo_eliminar

Source: https://docs.ropensci.org/censo2017/reference/censo_eliminar.html

Elimina el directorio 'censo2017' y todos sus contenidos, incluyendo versiones de la base de datos del Censo creadas con cualquier versión de 'DuckDB'. El argumento 'preguntar' controla si se despliega un menú para confirmar la acción; por defecto es verdadero.

```r
censo_eliminar(preguntar = TRUE)
```

--------------------------------

### Crear mapa con geom_sf y ggplot2

Source: https://docs.ropensci.org/censo2017/articles/censo2017.html

Genera un mapa coroplético con ggplot2 y geom_sf para visualizar el porcentaje de habitantes con grado de doctor por comuna en la Región del Biobío. Se crea una paleta de colores, se une el mapa con los datos filtrados por nivel_educ == 14 y se aplica una escala de gradiente. El join es necesario para mostrar las comunas con 0 doctores.

```R
colors <- c("#DCA761","#C6C16D","#8B9C94","#628CA5","#5A6C7A")

g <- ggplot() +
  geom_sf(data = mapa_biobio %>% 
            select(codigo_comuna, geometry) %>% 
            left_join(
              mapa_biobio %>% 
                filter(nivel_educ == 14) %>% 
                select(codigo_comuna, nivel_educ, proporcion),
              by = "codigo_comuna"
            ),
          aes(fill = proporcion, geometry = geometry),
          size = 0.1) +
  scale_fill_gradientn(colours = rev(colors), name = "Porcentaje") +
  labs(title = "Porcentaje de habitantes con el grado de doctor\npor comuna en la Region del Bio Bio") +
  theme_minimal(base_size = 13)

g
```

--------------------------------

### Ejemplo de censo_eliminar() con if (FALSE)

Source: https://docs.ropensci.org/censo2017/reference/censo_eliminar.html

Ejemplo de uso de la función 'censo_eliminar()' envuelto en 'if (FALSE)' para evitar su ejecución automática en la documentación. Se muestra como ejemplo de cómo llamar a la función sin argumentos.

```r
if (FALSE)  censo_eliminar()  # \dontrun{}
```

--------------------------------

### censo_tabla(tabla)

Source: https://docs.ropensci.org/censo2017/reference/censo_tabla.html

Devuelve una tabla completa de la base de datos del censo. Para entregar datos filtrados previamente se debe usar censo_conectar().

```APIDOC
## censo_tabla(tabla)

### Description
Devuelve una tabla completa de la base de datos del censo. Para entregar datos filtrados previamente se debe usar `censo_conectar()`.

### Usage
```r
censo_tabla(tabla)
```

### Arguments
- **tabla** (character) - Una cadena de texto indicando la tabla a extraer.

### Value
Un tibble.

### Examples
```r
if (FALSE) {
  censo_tabla("comunas")
}
```
```

--------------------------------

### Unir datos de nivel educacional con mapa de comunas del Biobío

Source: https://docs.ropensci.org/censo2017/articles/censo2017.html

Filtra el mapa de comunas para la región 08 y realiza un left join con los datos de nivel educacional usando el código de comuna.

```R
mapa_biobio <- mapa_comunas %>% 
  filter(codigo_region == "08") %>% 
  left_join(nivel_educacional_biobio, by = c("codigo_comuna" = "comuna"))
```

--------------------------------

### Connect to census database with censo_conectar()

Source: https://docs.ropensci.org/censo2017/reference/censo_conectar.html

Returns a DBI-compatible DuckDB connection to the local census database. The dir argument defaults to the censo2017 data folder in the user's R data directory or the CENSO2017_DIR environment variable if set.

```r
censo_conectar(dir = censo_path())
```

--------------------------------

### Mostrar datos de nivel educacional por comuna

Source: https://docs.ropensci.org/censo2017/articles/censo2017.html

Imprime la tabla resultante con 860 filas y 4 columnas, mostrando las primeras 10 filas y un resumen de las restantes.

```R
nivel_educacional_biobio
#> # A tibble: 860 × 4
#> # Groups:   comuna [54]
#>    comuna nivel_educ cuenta proporcion
#>    <chr>       <int>  <int>      <dbl>
#>  1 08101           1   4851    0.0217 
#>  2 08101           2   2701    0.0121 
#>  3 08101           3   3579    0.0160 
#>  4 08101           4    831    0.00372
#>  5 08101           5  37538    0.168  
#>  6 08101           6   5687    0.0254 
#>  7 08101           7  47356    0.212  
#>  8 08101           8  18641    0.0834 
#>  9 08101           9   5854    0.0262 
#> 10 08101          10   2653    0.0119 
#> # ℹ 850 more rows
```

--------------------------------

### Agrupar y calcular proporción de nivel educacional por comuna

Source: https://docs.ropensci.org/censo2017/articles/censo2017.html

Agrupa los datos por comuna y nivel educacional, cuenta las personas y calcula la proporción respecto al total de cada comuna.

```R
nivel_educacional_biobio <- nivel_educacional_biobio %>% 
  group_by(comuna, nivel_educ) %>%
  summarise(cuenta = n()) %>%
  group_by(comuna) %>%
  mutate(proporcion = cuenta / sum(cuenta))
```

--------------------------------

### censo_descargar(ver = NULL)

Source: https://docs.ropensci.org/censo2017/reference/censo_descargar.html

Documentación de la función censo_descargar del paquete censo2017, que permite descargar la base de datos del Censo 2017.

```APIDOC
## censo_descargar(ver = NULL)

### Description
Descarga la base de datos completa del Censo 2017 como un archivo zip que se descomprime para crear la base de datos local. Si no se especifica la versión, se descarga la última versión disponible en GitHub.

### Method
Función de R (SDK)

### Endpoint
censo_descargar(ver = NULL)

### Parameters
#### Function Arguments
- **ver** (character) - Opcional - La versión a descargar. Por defecto es la última versión disponible en GitHub. Se pueden ver todas las versiones en https://github.com/pachamaltese/censo2017/releases.

### Request Example
```r
censo_descargar()
```

### Response
#### Success Response
No se especifica un valor de retorno en la documentación. La función descarga y descomprime la base de datos local.

### Notes
- Para cambiar la ubicación de descarga, se puede definir la variable de entorno `CENSO2017_DIR` usando `usethis::edit_r_environ()`.
- El ejemplo está envuelto en `if (FALSE)` para evitar su ejecución automática.
```

--------------------------------

### censo_eliminar

Source: https://docs.ropensci.org/censo2017/reference/censo_eliminar.html

Elimina el directorio censo2017 y todos sus contenidos, incluyendo versiones de la base de datos del Censo creadas con cualquier versión de DuckDB.

```APIDOC
## censo_eliminar

### Description
Elimina el directorio `censo2017` y todos sus contenidos, incluyendo versiones de la base de datos del Censo creadas con cualquier versión de 'DuckDB'.

### Usage
```r
censo_eliminar(preguntar = TRUE)
```

### Arguments
- **preguntar** (logical) - Si acaso se despliega un menú para confirmar la acción de borrar cualquier base del censo existente. Por defecto es verdadero.

### Examples
```r
if (FALSE) censo_eliminar()  # \dontrun{}
```
```

--------------------------------

### Citation for censo2017

Source: https://docs.ropensci.org/censo2017/index.html

Citation text for censo2017, as recommended for academic publications. Includes the package name, author, year, version, and documentation URL.

```text
Mauricio Vargas (2020). censo2017: Base de Datos de Facil Acceso del Censo
  2017 de Chile (2017 Chilean Census Easy Access Database). R package version
  0.1. https://docs.ropensci.org/censo2017/
```

--------------------------------

### Cruzar tablas censales para obtener nivel educacional en Biobío

Source: https://docs.ropensci.org/censo2017/articles/censo2017.html

Construye una tabla con el nivel educacional (p15) por comuna para la Región del Biobío (código 08), uniendo las tablas zonas, viviendas, hogares y personas mediante inner joins y filtrando por región.

```R
nivel_educacional_biobio <- tbl(censo_conectar(), "zonas") %>% 
  mutate(
    region = substr(as.character(geocodigo), 1, 2),
    comuna = substr(as.character(geocodigo), 1, 5)
  ) %>% 
  filter(region == "08") %>% 
  select(comuna, geocodigo, zonaloc_ref_id) %>%
  inner_join(select(tbl(censo_conectar(), "viviendas"), zonaloc_ref_id, vivienda_ref_id), by = "zonaloc_ref_id") %>%
  inner_join(select(tbl(censo_conectar(), "hogares"), vivienda_ref_id, hogar_ref_id), by = "vivienda_ref_id") %>%
  inner_join(select(tbl(censo_conectar(), "personas"), hogar_ref_id, nivel_educ = p15), by = "hogar_ref_id") %>%
  collect()
```

--------------------------------

### Cargar paquetes necesarios (censo2017, dplyr, ggplot2, chilemapas)

Source: https://docs.ropensci.org/censo2017/articles/censo2017.html

Carga los paquetes requeridos para el ejemplo: censo2017 para datos censales, dplyr para manipulación de datos, ggplot2 para gráficos y chilemapas para mapas.

```R
library(censo2017)
library(dplyr)
library(ggplot2)
library(chilemapas)
```

--------------------------------

### BibTeX citation for censo2017

Source: https://docs.ropensci.org/censo2017/index.html

BibTeX entry for citing censo2017 in LaTeX documents. Includes the DOI and documentation URL.

```bibtex
@Manual{,
  title = {censo2017: Base de Datos de F\'acil Acceso del Censo 2017 de Chile
(2017 Chilean Census Easy Access Database)},
  author = {Mauricio Vargas},
  year = {2020},
  note = {R package version 0.1},
  url = {https://docs.ropensci.org/censo2017/},
  doi = {10.5281/zenodo.4277761}
}
```

--------------------------------

### censo_tabla() usage

Source: https://docs.ropensci.org/censo2017/reference/censo_tabla.html

Usage signature for the censo_tabla() function. It takes a single argument, tabla, which is a character string indicating the table to extract. The function returns a tibble.

```r
censo_tabla(tabla)
```

--------------------------------

### censo_desconectar() usage

Source: https://docs.ropensci.org/censo2017/reference/censo_desconectar.html

Function usage for disconnecting from the census database. No arguments are required.

```r
censo_desconectar()
```

--------------------------------

### censo_desconectar()

Source: https://docs.ropensci.org/censo2017/reference/censo_desconectar.html

An auxiliary function to disconnect from the census database. It takes no arguments and is called directly.

```APIDOC
## censo_desconectar()

### Description
An auxiliary function to disconnect from the census database.

### Usage
```r
censo_desconectar()
```

### Arguments
None.

### Examples
```r
censo_desconectar()
```

```

=== COMPLETE CONTENT === This response contains all available snippets from this library. No additional content exists. Do not make further requests.