All images can be downloaded as static image

[statnmap]

A button allows to download image presented.

• The image is downloaded as a static plot (not a screenshot of interactive)
  • The interactive tmaps are downloaded as image
• A message will warn the user that output can be different due to dimensions of the figure depending on the size of their screen, and non interactivity
• Eventually, a modal can present the real image that will be downloaded before download (not a priority)

Les pages

• Page 1: leaflet
• Page 3: leaflet
• Page 3: ggplot evolution
• Page 4: leaflet
• Page 4: ggplot evolution

[ColinFay]

Note to self:

library(shiny)
ui <- function(request){
  tagList(
    plotOutput("plop") %>% 
      tagAppendAttributes(
        onclick = 'var a = document.createElement("a"); a.href = $(this).find("img").attr("src"); a.download = "Image.png"; a.click(); '
      )
  )
}
server <- function(
  input, 
  output, 
  session
){
  output$plop <- renderPlot({
    plot(mtcars)
  })
}
shinyApp(ui, server)