CommencerCommencez gratuitement

Définir des statuts

L’une des bonnes pratiques UI/UX, mise en avant dans la vidéo, consiste à utiliser les couleurs de manière efficace. Comme vous l’avez vu, des statuts codés par couleur peuvent être ajoutés aux box() et à notificationItem() en ajustant les arguments appropriés.

Available statuses

Cela vous permet d’exploiter ces couleurs prédéfinies pour aider les utilisateurs à identifier rapidement la nature du message sans devoir y prêter une attention soutenue.

Dans ce qui suit, vous allez essayer différents statuts dans shinydashboard.

Dans cet exercice, les bibliothèques shiny et shinydashboard ont déjà été chargées pour vous. De plus, l’en-tête et la barre latérale ont été stockés dans sidebar, et server() est une fonction vide.

Cet exercice fait partie du cours

<cours>Créer des tableaux de bord avec shinydashboard</cours>
Voir le cours

Exercice interactif pratique

Essayez cet exercice en complétant ce code d’exemple.

library(shiny)
library(shinydashboard)

sidebar <- dashboardSidebar(
  width = 300,
  sidebarMenu(
    id = "pages",
    menuItem("Historical trends",
             tabName = "historical"),
    menuItem("Profits and Losses (PnLs)", 
             tabName = "profit", 
             icon = icon("money-bill-alt"),
             badgeLabel = "+2.3%", badgeColor = "green")
  )
)

header <- dashboardHeader(
  title = "Portfolio dashboard for Sally",
  titleWidth = 300,
  dropdownMenu(type = "notifications",
               # Change status of "Sell alert" from "warning" to "danger"
               notificationItem("Sell alert", status = "warning"),
               # Set status of "Buy alert" to "success".
               notificationItem("Buy alert", ___))
)

body <- dashboardBody()

ui <- dashboardPage(header, sidebar, body)
server <- function(input, output){}
shinyApp(ui, server)
Modifier et exécuter le code