Impostare gli status
Una delle buone pratiche di UI/UX, evidenziata nel video, è usare i colori in modo efficace. Come hai visto, è possibile aggiungere status codificati a colori ai box() e a notificationItem() impostando gli argomenti appropriati.
Questo ti permette di sfruttare colori predefiniti per aiutare gli utenti a identificare rapidamente la natura del messaggio senza dover prestare troppa attenzione.
Nel seguito, proverai diversi status in shinydashboard.
In questo esercizio, le librerie shiny e shinydashboard sono già state caricate per te. Inoltre, l'header e la sidebar sono stati salvati come sidebar, e server() è una funzione vuota.
Questo esercizio fa parte del corso
Creare dashboard con shinydashboard
esercizio interattivo pratico
Prova questo esercizio completando questo codice di esempio.
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)