library(leaflet)
# Default
l <- leaflet() %>% addTiles() %>% setView(0, 0, 1)
#' Default simple Graticule
l %>% addSimpleGraticule()
#' <br/>
#' Custom Params
l %>% addSimpleGraticule(interval = 40, showOriginLabel = FALSE)
#' <br/>
#' Custom Resolution + Custom Date and on a toggleable Layer
l %>%
addSimpleGraticule(interval = 40,
showOriginLabel = FALSE,
group = "graticule") %>%
addLayersControl(
overlayGroups = c("graticule"),
options = layersControlOptions(collapsed = FALSE)
)
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.