mirror of
https://github.com/dylanbenzi/hurricane_normalization_app.git
synced 2026-07-30 05:08:57 +00:00
modify map provider tiles
This commit is contained in:
+1
-2
@@ -371,8 +371,7 @@ output$track_map <- renderLeaflet({
|
|||||||
track_data <- storm_track()
|
track_data <- storm_track()
|
||||||
|
|
||||||
map <- leaflet() %>%
|
map <- leaflet() %>%
|
||||||
addProviderTiles("Stadia.AlidadeSmooth",
|
addProviderTiles("Stadia.AlidadeSmooth") %>%
|
||||||
options = providerTileOptions(updateWhenIdle = T)) %>%
|
|
||||||
fitBounds(
|
fitBounds(
|
||||||
lng1 = min(track_data$lon),
|
lng1 = min(track_data$lon),
|
||||||
lng2 = max(track_data$lon),
|
lng2 = max(track_data$lon),
|
||||||
|
|||||||
Reference in New Issue
Block a user