From 27f26e28ceb172f5dd39b1ff326846f5a76ab3de Mon Sep 17 00:00:00 2001
From: aaron <aaron@duckpond.ch>
Date: Tue, 12 Mar 2024 13:25:04 +0100
Subject: [PATCH] change base map

---
 ironwood_plots.R | 5 +++--
 1 file changed, 3 insertions(+), 2 deletions(-)

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