aaa-test-viztest | R Documentation |
Visual testing examples to be used by the vistest package.
### Start addGeoJSON properties - https://github.com/rstudio/leaflet/pull/625
polygon = list(
type = "Polygon",
coordinates = list(
list(
c(8.330469, 48.261570),
c(8.339052, 48.261570),
c(8.339052, 48.258227),
c(8.330469, 48.258227),
c(8.330469, 48.261570)
)
)
)
# should produce an orange-ish rectangle around `Ramsel`
leaflet() %>%
addTiles() %>%
addGeoJSON(polygon, color="#F00") %>%
setView(lng = 8.330469, lat = 48.26157, zoom = 15)
### End PR #625
# end donttest
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.