polygon_style <- list(
type = "fill",
paint = list(
"fill-color" = "white",
"fill-outline-color" = "red"
),
filter = list(">", "AREA", 0.2)
)
cartovl() %>%
set_view(-79.89042, 35.23582, 6) %>%
add_source(nc_geojson, "nc") %>%
add_mapbox_layer("nc", polygon_style)
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.