Insert a screen output element in a shiny app UI. This must be used with a
renderUI reactive expression in the app server.
screenOutput(
outputId,
next_label = NULL,
prev_label = NULL,
next_condition = NULL,
prev_condition = NULL,
class = NULL,
...
)output variable to read the value from
specific label of the "next" control for this screen. If NULL,
use the default one for the current glide.
specific label of the "back" control for this screen. If NULL,
use the default one for the current glide.
condition for the "next" control to be enabled. Same syntax
as shiny::conditionalPanel.
condition for the "back" control to be enabled. Same syntax
as shiny::conditionalPanel.
screen CSS classes. glide__slide is automatically added.
other arguments to pass to the container tag function.
Important : for this to work, you have to add a
outputOptions(output, id, suspendWhenHidden = FALSE) in your app
server. See example.
## Only run examples in interactive R sessions
if (interactive()) {
ui <- fixedPage(
h3("Simple shinyglide app"),
glide(
screen(
p("First screen."),
),
screenOutput("screen"),
screen(
p("Final screen."),
)
)
)
server <- function(input, output, session) {
output$screen <- renderUI({
p("Second screen.")
})
outputOptions(output, "screen", suspendWhenHidden = FALSE)
}
shinyApp(ui, server)
}