View source: R/loaders-handler.R
useLoaders | R Documentation |
Simple CSS loaders
useLoaders()
loaders(uiOutput, type = "default", style = NULL, text = NULL)
uiOutput |
An output element to be wrapped within a loader. |
type |
The type of loader to use. Visit https://css-loader.raphaelfabeni.com/ for details.
|
style |
Custom styling for the loaders. |
text |
Custom text. Available only for the following types:
|
None
useLoaders
: Dependencies to include in your UI.
loaders
: Display loading animation.
if (interactive()) {
library(shiny)
shinyApp(
ui = fluidPage(
useLoaders(),
actionButton("render", "Render"),
loaders(uiOutput = plotOutput("plot"),
type = "default",
style = "half",
text = "Loading...")
),
server = function(input, output) {
output$plot <- renderPlot({
input$render
Sys.sleep(3)
hist(mtcars$mpg)
})
}
)
}
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.