Ange statusar
En av de UI/UX-metoder som lyftes fram i videon är att använda färger på ett effektivt sätt. Som du har sett kan färgkodade statusar läggas till i box()-element och notificationItem() genom att ange lämpliga argument.
Detta gör det möjligt att använda fördefinierade färger som hjälper användare att snabbt förstå meddelandets karaktär utan att behöva läsa noggrant.
I det följande testar du olika statusar i shinydashboard.
I den här övningen har biblioteken shiny och shinydashboard redan laddats in. Dessutom är headern och sidopanelen lagrade som sidebar, och server() är en tom funktion.
Den här övningen är en del av kursen
Bygga dashboards med shinydashboard
Interaktiv övning med praktiskt arbete
Testa den här övningen genom att slutföra den här exempelkoden.
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)