bulmaProgress | R Documentation |
Add a progress bar.
bulmaProgress(..., value, max = 100, color = NULL, size = NULL) renderBulmaProgress(expr, env = parent.frame(), quoted = FALSE) bulmaProgressOutput(outputId)
... |
any element. |
value |
value of progress. |
max |
maximum value. |
color |
color of progress bar. |
size |
size of progress bar, default to |
expr |
An expression that returns a Shiny tag object, |
env |
The environment in which to evaluate |
quoted |
Is |
outputId |
id of element. |
if(interactive()){ library(shiny) shinyApp( ui = bulmaPage( bulmaTitle("Hello Bulma"), bulmaProgress("15%", value = 15, max = 100), bulmaProgress("25%", value = 25, max = 100, color = "primary"), bulmaProgress("65%", value = 65, max = 100, color = "danger", size = "medium"), bulmaProgressOutput("progress") ), server = function(input, output) { output$progress <- renderBulmaProgress({ bulmaProgress( value = sample(1:100, 1) ) }) } ) }
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.