knitr::opts_chunk$set(echo = TRUE)
source("gpx_edit.R") track_f <- "RGTCycling_Armed-Forces-Classic_2020-12-13_19-00-00.gpx" track <- load_track_points(track_f) start_id <- 1 end_id <- 81 sub <- make_loop(track, start_id, end_id, NULL, NULL) mapview(sub)
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.