shinythems在使用庫時，我試圖在我閃亮的應用程式中放一個盒子：
library(shiny)
library(DT)
library(shinythemes)
library(shinydashboard)
ui <- fluidPage(
theme = shinytheme("lumen"),
navbarPage("test theme",
tabPanel("tab1",
mainPanel(width = 12,
fluidRow(
box(width=6,title = "title",status = "warning", solidHeader = TRUE,
dataTableOutput(outputId = "tab"))))
))
)
)
Server <- function(input, output,session){
output$tab = renderDataTable(mtcars)
}
shinyApp(ui, server)
但它沒有像我預期的那樣作業！
我希望得到類似的東西：
我也試過了titlePanel，但沒用！
uj5u.com熱心網友回復：
我不相信你可以像那樣混合搭配Shiny fluidPage、shinythemes和來自shinydashboard的元素。為了box正常作業，它需要 shinydashboard CSS 并包含你通常使用的
dashboardPage(
dashboardHeader(),
dashboardSidebar(),
dashboardBody()
)
布局而不是fluidPage()/fixedPage()閃亮的布局。
雖然..有
轉載請註明出處，本文鏈接：https://www.uj5u.com/shujuku/534244.html
標籤：r用户界面闪亮的