test_that("filter works", {
gpx_features_samsung = readGPXFile("track_run.gpx")
expect_equal(length(filterForClosePoints(gpx_features_samsung, 2)), 27)
})
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.