Refresh the page
| 1 | refresh()
 | 
| 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 | if (interactive()) {
  library(shiny)
  ui <- fluidPage(
    useShinyjs(),
    textInput("text", "Text", "text"),
    actionButton("refresh", "Refresh")
  )
  server <- function(input, output, session) {
    observeEvent(input$refresh, {
      refresh()
    })
  }
 shinyApp(ui, server)
}
 | 
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.