change base map

This commit is contained in:
aaron
2024-03-12 13:25:04 +01:00
parent 4cc76b055e
commit 27f26e28ce

View File

@@ -74,7 +74,8 @@ map <- leaflet() %>%
setView(lng = site_lon, setView(lng = site_lon,
lat = site_lat, lat = site_lat,
zoom = 16) %>% 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 # Add markers with varying color and size based on population health and number of trees
map <- map %>% map <- map %>%
@@ -84,7 +85,7 @@ map <- map %>%
lat = ~tree_lat, lat = ~tree_lat,
radius = 5, radius = 5,
color = ~condition_colors[tree_health_index+1], color = ~condition_colors[tree_health_index+1],
fillOpacity = 0.7 fillOpacity = 1
) )
# show map # show map