progress: Progress

In JohnCoene/bsutils: 'Shiny' Utilities for 'Bootstrap 5'

Progress

Description

Progress bars.

Usage

progress(..., id = NULL)

Arguments

...	Progress bars as returned by progressBar().
id	Parent id.

Examples

library(shiny)

ui <- fluidPage(
  theme = bslib::bs_theme(version = 5L),
  actionButton(
    "rand",
    "Randomise"
  ),
  progress(
    progressBar(15, id = "bar")
  )
)

server <- \(input, output, session){
  observeEvent(input$rand, {
    update_progress("bar", sample(10:99, 1))
  })
}

if(interactive())
 shinyApp(ui, server)

JohnCoene/bsutils documentation built on June 15, 2024, 3:21 a.m.