Componentes de un shinydashboard

Creación de paneles con shinydashboard

Png Kee Seng

Researcher

¿Qué es un shinydashboard?

  • Un shinydashboard es otra shinyApp con salida de panel
    • Se necesita una UI
    • Se necesita un server
  • También hace falta shinyApp() para unir UI y server
  • La UI se define con dashboardPage(), no con fluidPage()
ui <- dashboardPage(header, sidebar, body)
server <- function(input, output){
...
}
shinyApp(ui, server)
Creación de paneles con shinydashboard

La interfaz de usuario (UI)

  • La UI ahora tiene más partes
    1. Un header
    2. Una barra lateral
    3. Un body
  • La UI de shinydashboard se arma con dashboardPage()
header <- dashboardHeader(...)
sidebar <- dashboardSidebar(...)
body <- dashboardBody(...)
# ui de shinydashboard
ui <- dashboardPage(header, sidebar, body)
Creación de paneles con shinydashboard

Vista previa de la UI

Desglose de los componentes de una UI de shinydashboard.

Creación de paneles con shinydashboard

Volvamos a la analogía del restaurante

  • La UI es como el restaurante
  • El server es como el camarero
  • La UI se puede descomponer en componentes más pequeños

Quien usa la shinyApp es como un cliente de un restaurante.

El camarero pasa el pedido a cocina y trae la comida.

1 Imagen de macrovector en Freepik
Creación de paneles con shinydashboard

La UI como un menú de varios platos

  • En la UI:
    • El header es como el rótulo
    • La barra lateral es como la carta
    • Los outputs e inputs son como platos y pedidos
  • Se muestra un plato a la vez
  • Cada plato tiene instrucciones
  • Cada plato es como una shinyApp
    • Podemos tener varios conjuntos de inputs y outputs

Cada plato es como una shinyApp con varios inputs y outputs.

1 Imagen de brgfx en Freepik
Creación de paneles con shinydashboard

Un shinydashboard vacío

library(shinydashboard)
library(shiny)
header <- dashboardHeader(title = "My first dashboard")
sidebar <- dashboardSidebar()
body <- dashboardBody()
ui <- dashboardPage(header, sidebar, body)
Creación de paneles con shinydashboard

Renderizar el shinydashboard

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

sidebar <- dashboardSidebar()

body <- dashboardBody()

ui <- dashboardPage(header, sidebar, body)

server <- function(input, output) { }
shinyApp(ui, server)
Creación de paneles con shinydashboard

Renderizar el shinydashboard

Un shinydashboard vacío

Creación de paneles con shinydashboard

¡Vamos a practicar!

Creación de paneles con shinydashboard

Preparing Video For Download...