我希望在加载时在我的闪亮应用中播放GIF动画。我在stackoverflow中搜索并发现了这个包“shinycssloaders”。但我需要在页面加载时播放自定义动画gif。请帮我解决这个问题。
请查找闪亮应用的可重现示例
library(shiny)
library(shinydashboard)
ui <- dashboardPage(skin = "black",
dashboardHeader(title = "test"),
dashboardSidebar(
sidebarMenu(
menuItem("Complete", tabName = "comp"))),
dashboardBody(
tabItems(
tabItem(tabName = "comp",
fluidRow(
box(title = "data", width = 4, solidHeader = TRUE, status = "primary",
collapsible = TRUE, tableOutput("tbe")))))))
server <- function(input, output, session) {
output$tbe <- renderTable(mtcars)
}
shinyApp(ui, server)
由于 SJB