Chapter 19 Map of the Reporting District Incidents

The Map shows the Reporting District with the circle size representing the number of incidents in the areas.

leaflet(RDGeoLocation) %>% addProviderTiles("Esri.NatGeoWorldMap") %>%
  addCircles(lng = ~RDlon, lat = ~RDlat, radius = ~sqrt(CountIncidents)*30,
             color = c("red"))  %>%
  # controls
  setView(lng=center_lon, lat=center_lat, zoom=10)