Building Dashboards with shinydashboard
Png Kee Seng
Researcher
shinyApp()
is also needed to glue the UI and server togetherdashboardPage()
and not fluidPage()
ui <- dashboardPage(header, sidebar, body)
server <- function(input, output){
...
}
shinyApp(ui, server)
dashboardPage()
header <- dashboardHeader(...)
sidebar <- dashboardSidebar(...)
body <- dashboardBody(...)
# a shinydashboard ui
ui <- dashboardPage(header, sidebar, body)
library(shinydashboard)
library(shiny)
header <- dashboardHeader(title = "My first dashboard")
sidebar <- dashboardSidebar()
body <- dashboardBody()
ui <- dashboardPage(header, sidebar, body)
header <- dashboardHeader(title = "My first dashboard") sidebar <- dashboardSidebar() body <- dashboardBody() ui <- dashboardPage(header, sidebar, body)
server <- function(input, output) { }
shinyApp(ui, server)
Building Dashboards with shinydashboard