Logo Questions Linux Laravel Mysql Ubuntu Git Menu
 

Restart Shiny Session

Tags:

r

shiny

shinyjs

This seems like a very obvious question but I haven't found anything on the subject.

How can I refresh a shiny application (the equivalent of pressing F5, or clicking the "Reload App" button in RStudio)?

ui.R

 shinyUI(pageWithSidebar(
  headerPanel("Example"),
  sidebarPanel(
    actionButton("goButton", "Refresh")
  ),  
  mainPanel(
        h4("I would really like to refresh this please.")
    )   
))

server.R

shinyServer(function(input, output,session) { 
  observe({
    if(input$goButton==0) return(NULL)
    isolate({
      #
      #  I would like to refresh my session here with some sort of 
      #  function like session(refresh)...
    })
    })
})

I don't think I want to use stopApp() - I just want to refresh it such that it's in the same state as when it is loaded.

UPDATE

On the RStudio website, it shows here how to manage a user's session from the server. Specifically,

$ sudo rstudio-server suspend-session <pid>

Is there the equivalent function as the user, from within the app? In the documentation for session info (here), it says there is an onSessionEnded(callback) function. It would be good if there was a session.End() function which performs the above suspend-session function!

like image 676
Hamilton Blake Avatar asked Jul 31 '14 15:07

Hamilton Blake


2 Answers

You can use the history.go(0) js-method to reload the page and thus reset the session, e.g. from a link:

p(HTML("<A HREF=\"javascript:history.go(0)\">Reset this page</A>"))

Furthermore you can use the shinyjs package to execute javascript from within the server:

library(shiny)
library(shinyjs)

jsResetCode <- "shinyjs.reset = function() {history.go(0)}" # Define the js method that resets the page

shinyApp(
  ui = fluidPage(
    useShinyjs(),                                           # Include shinyjs in the UI
    extendShinyjs(text = jsResetCode, functions = "reset"), # Add the js code to the page
    actionButton("reset_button", "Reset Page")
  ),

  server = function(input, output) {
    observeEvent(input$reset_button, {js$reset()})          # Call the method from
                                                            # somewhere within the server
  })
like image 173
bubble Avatar answered Sep 22 '22 13:09

bubble


The session has now a method to do the trick. Shinyjs is no longer required:

session$reload()
like image 43
Jan Avatar answered Sep 21 '22 13:09

Jan