Komponen shinydashboard

Membangun Dashboard dengan shinydashboard

Png Kee Seng

Researcher

Apa itu shinydashboard?

  • shinydashboard adalah shinyApp dengan output dashboard
    • UI diperlukan
    • Server diperlukan
  • shinyApp() dibutuhkan untuk menyatukan UI dan server
  • Perhatikan UI didefinisikan dengan dashboardPage(), bukan fluidPage()
ui <- dashboardPage(header, sidebar, body)
server <- function(input, output){
...
}
shinyApp(ui, server)
Membangun Dashboard dengan shinydashboard

Antarmuka pengguna (UI)

  • UI kini berisi lebih banyak bagian
    1. Header
    2. Sidebar
    3. Body
  • UI shinydashboard disusun dengan dashboardPage()
header <- dashboardHeader(...)
sidebar <- dashboardSidebar(...)
body <- dashboardBody(...)
# ui shinydashboard
ui <- dashboardPage(header, sidebar, body)
Membangun Dashboard dengan shinydashboard

Pratinjau UI

Rincian komponen UI shinydashboard.

Membangun Dashboard dengan shinydashboard

Mengulas analogi restoran

  • UI seperti restoran
  • Server seperti pelayan
  • UI dapat dipecah lagi menjadi komponen lebih kecil

Pengguna shinyApp seperti pelanggan restoran.

Pelayan menyampaikan pesanan ke dapur dan membawa makanan kepada kita.

1 Gambar oleh macrovector di Freepik
Membangun Dashboard dengan shinydashboard

UI sebagai santapan multi-menu

  • Di UI:
    • Header seperti papan nama
    • Sidebar seperti daftar menu
    • Output dan input seperti hidangan dan pesanan
  • Satu menu disajikan sekaligus
  • Ada instruksi untuk tiap menu
  • Tiap menu seperti shinyApp
    • Dapat memiliki banyak set input dan output

Setiap menu seperti shinyApp dengan beberapa input dan output.

1 Gambar oleh brgfx di Freepik
Membangun Dashboard dengan shinydashboard

shinydashboard kosong

library(shinydashboard)
library(shiny)
header <- dashboardHeader(title = "My first dashboard")
sidebar <- dashboardSidebar()
body <- dashboardBody()
ui <- dashboardPage(header, sidebar, body)
Membangun Dashboard dengan shinydashboard

Merender shinydashboard

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

sidebar <- dashboardSidebar()

body <- dashboardBody()

ui <- dashboardPage(header, sidebar, body)

server <- function(input, output) { }
shinyApp(ui, server)
Membangun Dashboard dengan shinydashboard

Merender shinydashboard

Sebuah shinydashboard kosong

Membangun Dashboard dengan shinydashboard

Ayo berlatih!

Membangun Dashboard dengan shinydashboard

Preparing Video For Download...