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),