diff --git a/ironwood_plots.R b/ironwood_plots.R index 5417dc1..3e27388 100644 --- a/ironwood_plots.R +++ b/ironwood_plots.R @@ -74,7 +74,8 @@ map <- leaflet() %>% setView(lng = site_lon, lat = site_lat, zoom = 16) %>% - addProviderTiles("CartoDB.Positron") + addTiles() + #addProviderTiles(providers$CartoDB.Positron) # Add markers with varying color and size based on population health and number of trees map <- map %>% @@ -84,7 +85,7 @@ map <- map %>% lat = ~tree_lat, radius = 5, color = ~condition_colors[tree_health_index+1], - fillOpacity = 0.7 + fillOpacity = 1 ) # show map