#' Plot a stamenmap from bbox
#'
#' @param bbox Boundaries box generated by \link{get_bbox_from_gpx_table} or
#' any other Boundaries box tool
#'
#' @importFrom ggmap get_stamenmap ggmap
#' @export
bbox_map <- function(bbox) {
huez_map <- ggmap::get_stamenmap(bbox = bbox,
zoom = 13,
maptype = "terrain")
# Check the map covers your GPX file
ggmap::ggmap(huez_map)
}
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.