Bygga dashboards med shinydashboard
Png Kee Seng
Researcher
shinyApp() behövs också för att koppla ihop UI och serverdashboardPage() och inte 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)

Bygga dashboards med shinydashboard