shiny : téléchagement

Postez ici vos questions, réponses, commentaires ou suggestions - Les sujets seront ultérieurement répartis dans les archives par les modérateurs

Modérateur : Groupe des modérateurs

Bertrand Vassor
Messages : 32
Enregistré le : 18 Sep 2017, 10:18

shiny : téléchagement

Messagepar Bertrand Vassor » 17 Déc 2018, 15:43

Bonjour,

je teste le téléchargement d'un rapport construit avec shiny. J'ai comme exemple celui du site RStudio :

Code : Tout sélectionner

library(shiny)
ui<-shinyUI(fluidPage(
  titlePanel("Hello Shiny!"),
  sidebarPanel(
    downloadButton('downloadReport',label="Download Report")
  ),
  mainPanel(
    p("Hello")
  )
))

server<-shinyServer(function(input, output) {
  output$downloadReport <- downloadHandler(
    filename = function() {
      paste0('Report_.pdf')
    },
    content = function(file) {
      src <- normalizePath('report.rmd')
      owd <- setwd(tempdir())
      on.exit(setwd(owd))
      file.copy(src, 'report.rmd')
      library(rmarkdown)
      out <- render('report.rmd',pdf_document())
      file.rename(out, file)
    }
  )
})

shinyApp(ui, server)#Runs the app


L'application se lance bien, mais lorsque je sélectionne "Download Report", après environs 1 minute, une fenètre indiquant l'endroit le dossier où télécharger le document s'ouvre, et j'obtiens le message d'erreur suivant dans une fenêtre :

Code : Tout sélectionner

An error occurred during download:

Error downloading http://127.0.0.1:4018/session/a78dc3bde43d3dcc4820dc3d749b47b9/download/downloadReport?w= - server replied: Internal Server Error


Dans la console j'ai :

Code : Tout sélectionner

Listening on http://127.0.0.1:4018
Warning in normalizePath("report.rmd") :
  path[1]="report.rmd": Aucun fichier ou dossier de ce type
Warning in normalizePath(path, winslash = winslash, mustWork = mustWork) :
  path[1]="report.rmd": Aucun fichier ou dossier de ce type
Warning: Error in tools::file_path_as_absolute: file 'report.rmd' does not exist
  [No stack trace available]


Après des recherches j'avoue rester perplexe, la création d'un fichier report.rmd à plusieurs endroits n'y changeant rien.

Quelqu'un a-t-il un retour d'expérience dans ce domaine ?

Merci bien.
BV

Debian 9, R à jour ou quasi.

Mickael Canouil
Messages : 508
Enregistré le : 04 Avr 2011, 08:53
Contact :

Re: shiny : téléchagement

Messagepar Mickael Canouil » 17 Déc 2018, 16:16

Bonjour,

En premier lieu, il faut télécharger l'exemple en entier, à savoir "ui.R", "server.R" et "report.Rmd", via "get code" sur https://shiny.rstudio.com/gallery/downl ... ports.html

Voici le répertoire GitHub de l'exemple => https://github.com/rstudio/shiny-exampl ... -knitr-pdf

Cordialement,
Mickaël

Bertrand Vassor
Messages : 32
Enregistré le : 18 Sep 2017, 10:18

[Résolu ]Re: shiny : téléchagement

Messagepar Bertrand Vassor » 17 Déc 2018, 17:03

Merci bien Mickael,

je n'avais pas compris, ce qui parait stupide a posteriori qu'il fallait créer le fichier report.Rmd ...;-)

Bonne soirée.
B


Retourner vers « Questions en cours »

Qui est en ligne

Utilisateurs parcourant ce forum : Bing [Bot] et 1 invité