change base map
This commit is contained in:
@@ -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
|
||||||
|
|||||||
Reference in New Issue
Block a user