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)
}