Nothing
# Test rgrid()
loc <- x_sf[1,]
dmax <- 2000
res <- 30
# rgrid_out <- osrm:::rgrid(loc, dmax, res)
# saveRDS(rgrid_out, 'inst/tinytest/rgrid_out.rds')
rgrid_out <- osrm:::rgrid(loc, dmax, res)
expect_equivalent(rgrid_out, readRDS("rgrid_out.rds"))
Any scripts or data that you put into this service are public.
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.