Nothing
collapse_properties <- function(geo) {
collapser <- function(feature) {
feature$properties <- lapply(
feature$properties,
function(x) paste0(x, collapse = ";")
)
feature
}
geo$features <- lapply(geo$features, collapser)
geo
}
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.