test_that("leaflet_basemap works", {
themap <- leaflet_basemap()
testthat::expect_equal(class(themap), c("leaflet", "htmlwidget"))
})
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.