This creates a vertical progress bar.
verticalProgress(value, min = 0, max = 100, height = "40%",
striped = FALSE, active = FALSE, status = "primary", size = NULL)
Progress bar value. Must be between min and max.
Progress bar minimum value (0 by default).
Progress bar maximum value (100 by default).
Progress bar default height (40 percent by default).
Whether the progress is striped or not. FALSE by default.
Whether the progress is active or not. FALSE by default.
Progress bar status. "primary" by default or "warning", "info", "danger" or "success".
Progress bar size. NULL by default: "sm", "xs" or "xxs" also available.
# NOT RUN {
if (interactive()) {
library(shiny)
library(shinydashboard)
shinyApp(
ui = dashboardPagePlus(
header = dashboardHeaderPlus(
enable_rightsidebar = TRUE,
rightSidebarIcon = "gears"
),
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%"
)
),
rightsidebar = rightSidebar(),
title = "Right Sidebar"
),
server = function(input, output) { }
)
}
# }
Run the code above in your browser using DataLab