rewind_history() gives one row for each entry that rewind keeps.
rewind_can_undo() and rewind_can_redo() tell you if the position can
change. All three functions depend on the history. You can thus use them
in render*() and observe() to control your own UI.
Usage
rewind_history(session = shiny::getDefaultReactiveDomain())
rewind_can_undo(session = shiny::getDefaultReactiveDomain())
rewind_can_redo(session = shiny::getDefaultReactiveDomain())Value
rewind_history() gives a data frame. It has the columns index,
label, time and current. The other two functions give one logical
value.
Examples
if (interactive()) {
library(shiny)
server <- function(input, output, session) {
rewind_enable()
output$steps <- renderTable(rewind_history())
}
}