Komponenter i en shinydashboard

Bygga dashboards med shinydashboard

Png Kee Seng

Researcher

Vad är en shinydashboard?

  • En shinydashboard är en shinyApp med en dashboard-utdata
    • Ett UI krävs
    • En server krävs
  • En shinyApp() behövs också för att koppla ihop UI och server
  • Observera att UI:t definieras med dashboardPage() och inte fluidPage()
ui <- dashboardPage(header, sidebar, body)
server <- function(input, output){
...
}
shinyApp(ui, server)
Bygga dashboards med shinydashboard

Användargränssnittet (UI)

  • UI:t innehåller nu fler delar
    1. En header
    2. En sidopanel
    3. En body
  • Ett shinydashboard-UI sätts ihop med dashboardPage()
header <- dashboardHeader(...)
sidebar <- dashboardSidebar(...)
body <- dashboardBody(...)
# a shinydashboard ui
ui <- dashboardPage(header, sidebar, body)
Bygga dashboards med shinydashboard

En förhandsgranskning av UI:t

En uppdelning av komponenterna i ett shinydashboard-UI.

Bygga dashboards med shinydashboard

Restauranganaloginen revisiteras

  • UI:t motsvarar restaurangen
  • Servern motsvarar servitören
  • UI:t kan delas upp i mindre komponenter

En användare av shinyApp:en liknar en gäst på en restaurang.

Servitören tar emot beställningen och levererar maten från köket.

1 Bild av macrovector på Freepik
Bygga dashboards med shinydashboard

UI:t som en meny med flera rätter

  • I UI:t:
    • Headern motsvarar skylten
    • Sidopanelen motsvarar menyn
    • Utdata och indata motsvarar rätterna och beställningarna
  • En rätt visas åt gången
  • Instruktioner ges för varje rätt
  • Varje rätt liknar en shinyApp
    • Vi kan ha flera uppsättningar av indata och utdata

Varje rätt liknar en shinyApp med flera indata och utdata.

1 Bild av brgfx på Freepik
Bygga dashboards med shinydashboard

En tom shinydashboard

library(shinydashboard)
library(shiny)
header <- dashboardHeader(title = "My first dashboard")
sidebar <- dashboardSidebar()
body <- dashboardBody()
ui <- dashboardPage(header, sidebar, body)
Bygga dashboards med shinydashboard

Rendera shinydashboarden

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

Rendera shinydashboarden

En tom shinydashboard

Bygga dashboards med shinydashboard

Nu kör vi en övning!

Bygga dashboards med shinydashboard

Preparing Video For Download...