# NOT RUN {
ons_api <- "https://opendata.arcgis.com/datasets/687f346f5023410ba86615655ff33ca9_4.geojson"
p <- map(mapdata,
ons_api = ons_api,
area_code = AreaCode,
fill = Significance,
title = "Map example",
subtitle = "An indicator for Upper Tier Local Authorities England",
copyright_year = 2019)
p
## For an interactive (leaflet) map
p <- map(mapdata,
ons_api = ons_api,
area_code = AreaCode,
fill = Significance,
type = "interactive",
value = Value,
name_for_label = AreaName,
title = "An indicator for Upper Tier<br>Local Authorities England")
p
# }
Run the code above in your browser using DataLab