## code to prepare `mexico` dataset goes here
library("rgeos")
library("rgdal")
mexico <- rgdal::readOGR(system.file("mexico/mexico.shp", package = "geotax2"))
mexico@data <- mexico@data %>% dplyr::mutate(PAIS = "MEXICO")
mexico <- gUnaryUnion(mexico, id = mexico@data$PAIS)
usethis::use_data(mexico, overwrite = TRUE)
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.