knitr::opts_chunk$set( collapse = TRUE, comment = "#>" )
Pass the argument enable_preloader = TRUE
to the dashboardPagePlus()
function.
You can also change the loading duration (2s by default): loading_duration = 5
for
5 seconds.
library(shiny) library(shinydashboard) library(shinydashboardPlus) shinyApp( ui = dashboardPagePlus( enable_preloader = TRUE, header = dashboardHeaderPlus( enable_rightsidebar = TRUE, rightSidebarIcon = "gears" ), sidebar = dashboardSidebar(), body = dashboardBody(), rightsidebar = rightSidebar(), title = "DashboardPage" ), server = function(input, output) { } )
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.