In fdzul/rgeomex: The rgeomex provides the polygon data of INEGI 2019 and INE 2020

mapview::mapviewOptions(leafletWidth = 700, 
                        leafletHeight = 300)
knitr::opts_chunk$set(
  collapse = TRUE,
  comment = "#>"
)

library(rgeomex)

Para extraer los AGEBs de una localidad urbana de interes se usa la función función extract_ageb ó puede extraerse con unas líneas de código. La función extract_ageb tiene dos argumentos, uno para definir la clave del estado (cve_edo) y el otro para definir el nombre de la localidad de acuerdo al INEGI 2020 (locality). La función regresa una lista con dos elementos, un elemento correspondo a la localidad (locality) y el otro elemento corresponde a los AGEBS (ageb)

Ejemplo de Mérida con la función extract_ageb

merida <- rgeomex::extract_ageb(cve_edo = "31",
                                locality = "Mérida")

mapview::mapview(merida$ageb, 
                 legend = FALSE, 
                 col.regions = "#E01A59")

Ejemplo de la Ciudad de México con la función extract_ageb

cdmx <- rgeomex::extract_ageb(cve_edo = "09",
                                locality = "cdmx")

mapview::mapview(cdmx$ageb, 
                 legend = FALSE, 
                 col.regions = "#E01A59")

Ejemplo de la Ciudad de México con código

# Paso 1. extraer la localidad 
cdmx_loc <- rgeomex::loc_inegi19_mx |>
    dplyr::filter(CVE_ENT == "09") 

# Paso 2. extraer los agebs 
cdmx_agebs <- rgeomex::AGEB_inegi_2019_a |>
  sf::st_make_valid()

cdmx_agebs <- cdmx_agebs[cdmx_loc, ]

# Paso 3. verificar 
mapview::mapview(cdmx_agebs,
                 legend = FALSE, 
                 col.regions = "#E01A59")