TPD-InternationalFootballRe.../Server/InteractiveMapStatistics.R
2019-05-19 19:05:06 +02:00

9 lines
215 B
R

#
# Interactive Map Component
#
interactiveMapStatistics <- function(input, output) {
output$interactive_world_map <- renderLeaflet(
leaflet(World) %>% addTiles() %>% setView(-93.65, 42.0285, zoom = 17)
)
}