Show loading page

bulmaLoading(title = "Loading", class = NULL)

Arguments

title

Title of loading page.

class

Any additional class.

Author

John Coene, jcoenep@gmail.com

Examples

if(interactive()){ ui <- bulmaPage( bulmaTitle("Loader"), bulmaSliderInput("slider", 50, 5, 100, step = 5), bulmaLoading(), bulmaContainer( plotOutput("plot") ) ) server <- function(input, output){ data <- reactive({ rnorm(input$slider, 10, 5) }) output$plot <- renderPlot({ hist(data()) }) } shiny::shinyApp(ui, server) }