# NOT RUN {
map <- get_map("fra")
g2(map, asp(longitude, latitude)) %>%
fig_polygon(axes = FALSE, tooltip = FALSE) %>%
style(height = cb("window.innerHeight"))
g2() %>%
fig_map(map = "fra") %>%
style(height = cb("window.innerHeight"))
# }
# NOT RUN {
# }
Run the code above in your browser using DataLab