This creates a vertical progress bar.
verticalProgress( value, min = 0, max = 100, height = "40%", striped = FALSE, active = FALSE, status = "primary", size = NULL )
value | Progress bar value. Must be between min and max. |
---|---|
min | Progress bar minimum value (0 by default). |
max | Progress bar maximum value (100 by default). |
height | Progress bar default height (40 percent by default). |
striped | Whether the progress is striped or not. FALSE by default. |
active | Whether the progress is active or not. FALSE by default. |
status | Progress bar status. "primary" by default or "warning", "info", "danger" or "success". |
size | Progress bar size. NULL by default: "sm", "xs" or "xxs" also available. |
David Granjon, dgranjon@ymail.com
if (interactive()) { library(shiny) library(shinydashboard) library(shinydashboardPlus) shinyApp( ui = dashboardPage( header = dashboardHeader(), sidebar = dashboardSidebar(), body = dashboardBody( verticalProgress( value = 10, striped = TRUE, active = TRUE ), verticalProgress( value = 50, active = TRUE, status = "warning", size = "xs" ), verticalProgress( value = 20, status = "danger", size = "sm", height = "60%" ) ), title = "Right Sidebar" ), server = function(input, output) { } ) }