context("Helpers")
test_that("can create a Leaflet CRS", {
sc <- make_leaflet_crs("SC")
expect_is(sc, "leaflet_crs")
expect_equal(sc$code, "ESRI:32133")
})
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.