library(plotKML)
poly <- readGPX("data-raw/boundary2.gpx")
poly <- poly$routes$boundary2
poly <- rbind(poly, poly[1,])
saveRDS(poly, file = "data/poly.rds")
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.