j'ai un pb avec shiny-server qui me laisse "chèvre". Je voudrais utiliser la fonction stopApp. Soit le programme shiny minimal (dans mon vrai code je voudrais faire plus de chose dans le stopApp) suivant :
ui.R
Code : Tout sélectionner
library(shiny)
shinyUI(fluidPage(
actionButton("stopApp", "Stop app")
)
)
server.R
Code : Tout sélectionner
shinyServer(function(input, output,session){
observeEvent(input$stopApp, {
cat("Stopping shiny app%s\n")
stopApp()
})
})
Cette appli fonctionne sans soucis qd je la lance avec runApp, par contre en la lançant dans un navigateur via shiny-server, l'interface s'ouvre bien mais qd j'appuie sur le bouton "stopApp" ça provoque un plantage de l'appli.
Toute aide sera la bienvenue
Serge