From 211703805d290741ec2b1b7b3ea6192eb6581471 Mon Sep 17 00:00:00 2001
From: dylanbenzi <dylanbenzi@gmail.com>
Date: Sun, 20 Jul 2025 20:44:27 -0400
Subject: [PATCH] modify map provider tiles

---
 dashboard.Rmd | 3 +--
 1 file changed, 1 insertion(+), 2 deletions(-)

diff --git a/dashboard.Rmd b/dashboard.Rmd
index 6949323..6d42875 100644
--- a/dashboard.Rmd
+++ b/dashboard.Rmd
@@ -371,8 +371,7 @@ output$track_map <- renderLeaflet({
   track_data <- storm_track()
   
   map <- leaflet() %>% 
-    addProviderTiles("Stadia.AlidadeSmooth", 
-                     options = providerTileOptions(updateWhenIdle = T)) %>% 
+    addProviderTiles("Stadia.AlidadeSmooth") %>% 
     fitBounds(
       lng1 = min(track_data$lon),
       lng2 = max(track_data$lon),