Description Usage Arguments Value Functions Examples
View source: R/semantic_dashboard.R
Create a body of a dashboard with tabs and other additional UI elements.
1 2 3 | dashboard_body(..., class = "")
dashboardBody(..., class = "")
|
... |
UI elements to include within the body. |
class |
CSS class to be applied to the container of |
A tab that can be passed to dashboardPage
dashboardBody
: Create a body of a dashboard (alias for dashboard_body
for compatibility with shinydashboard
)
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 | if(interactive()){
library(shiny)
library(semantic.dashboard)
ui <- dashboardPage(
dashboardHeader(color = "blue"),
dashboardSidebar(side = "left", size = "thin", color = "teal",
sidebarMenu(
menuItem(tabName = "tab1", "Tab 1"),
menuItem(tabName = "tab2", "Tab 2"))),
dashboardBody(tabItems(
tabItem(tabName = "tab1", p("Tab 1")),
tabItem(tabName = "tab2", p("Tab 2"))))
)
server <- function(input, output) {
}
shinyApp(ui, server)
}
|
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.