I have a shiny app hosted at ShinyApps.io which works fine when running locally, but have trouble with downloadHandler functionality on the
side. When I click on the link I get a Not Found error.
output$exampleDownload <- downloadHandler(
filename = 'Pangenome.csv',
content = function(file) {
exampleFile <- system.file('extdata', 'exampleData.csv', package = 'PanVizGenerator')
file.copy(from=exampleFile, to=file)
}
)
As you can see it is not rocket science going on within the function...
The app is hosted on
https://thomas.shinyapps.io/PanVizGenerator/ and is based on the server.R file residing in the thomasp85/PanVizGenerator GitHub repository. I would be happy to receive any pointers for my troubleshooting.
best
Thomas