Componentele unui shinydashboard

Crearea dashboardurilor cu shinydashboard

Png Kee Seng

Researcher

Ce este un shinydashboard?

  • Un shinydashboard este un shinyApp cu ieșire de tip dashboard
    • Este necesară o interfață UI
    • Este necesar un server
  • shinyApp() leagă UI și serverul împreună
  • UI este definit prin dashboardPage(), nu prin fluidPage()
ui <- dashboardPage(header, sidebar, body)
server <- function(input, output){
...
}
shinyApp(ui, server)
Crearea dashboardurilor cu shinydashboard

Interfața utilizatorului (UI)

  • UI conține acum mai multe componente
    1. Un antet
    2. O bară laterală
    3. Un corp
  • UI pentru shinydashboard se asamblează cu dashboardPage()
header <- dashboardHeader(...)
sidebar <- dashboardSidebar(...)
body <- dashboardBody(...)
# a shinydashboard ui
ui <- dashboardPage(header, sidebar, body)
Crearea dashboardurilor cu shinydashboard

Previzualizarea UI

Descompunerea componentelor UI ale unui shinydashboard.

Crearea dashboardurilor cu shinydashboard

Revenind la analogia cu restaurantul

  • UI este ca restaurantul
  • Serverul este ca chelnerul
  • UI poate fi defalcat în componente mai mici

Utilizatorul shinyApp este ca un client al restaurantului.

Chelnerul transmite comanda la bucătărie și aduce mâncarea.

1 Imagine de macrovector pe Freepik
Crearea dashboardurilor cu shinydashboard

UI ca un meniu cu mai multe feluri

  • În UI:
    • Antetul este ca un panou indicator
    • Bara laterală este ca lista de preparate
    • Ieșirile și intrările sunt ca preparatele și comenzile
  • Un singur preparat este afișat la un moment dat
  • Instrucțiuni sunt furnizate pentru fiecare preparat
  • Fiecare preparat este ca un shinyApp
    • Putem avea mai multe seturi de intrări și ieșiri

Fiecare preparat este ca un shinyApp cu mai multe intrări și ieșiri.

1 Imagine de brgfx pe Freepik
Crearea dashboardurilor cu shinydashboard

Un shinydashboard gol

library(shinydashboard)
library(shiny)
header <- dashboardHeader(title = "My first dashboard")
sidebar <- dashboardSidebar()
body <- dashboardBody()
ui <- dashboardPage(header, sidebar, body)
Crearea dashboardurilor cu shinydashboard

Randarea shinydashboard

header <- dashboardHeader(title = "My first dashboard")

sidebar <- dashboardSidebar()

body <- dashboardBody()

ui <- dashboardPage(header, sidebar, body)

server <- function(input, output) { }
shinyApp(ui, server)
Crearea dashboardurilor cu shinydashboard

Randarea shinydashboard

Un shinydashboard gol

Crearea dashboardurilor cu shinydashboard

Să exersăm!

Crearea dashboardurilor cu shinydashboard

Preparing Video For Download...