LoslegenKostenlos loslegen

Dropdown-Menüs

Du hast gesehen, wie Dropdown-Menüs zu einer shinyApp hinzugefügt werden können. So kann der:die Nutzer:in der App eine Option aus einer Liste auswählen, während nur wenig Platz benötigt wird. Das ist eine gute UI-Gestaltung, wenn die App bereits viele andere Elemente enthält.

In dieser Übung wurden die Daten als sleep gespeichert und ein Plot namens p wurde ebenfalls gespeichert. Die Bibliotheken shiny und tidyverse sind bereits geladen. Wenn du den Code fertiggestellt hast, kannst du die shinyApp in einem HTML-Viewer öffnen, um sie vollständig anzusehen.

Diese Übung ist Teil des Kurses

Dashboards mit shinydashboard erstellen

Kurs anzeigen

Anleitung zur Übung

  • Platziere ein selectInput() mit zwei Auswahlmöglichkeiten namens "Plot" und "Table".
  • Platziere ein plotOutput() und tableOutput() mit den Namen "plot" und "table".
  • Füge die Plot-Ausgabe im Server hinzu.
  • Füge die Tabellen-Ausgabe im Server hinzu.

Interaktive Übung

Vervollständige den Beispielcode, um diese Übung erfolgreich abzuschließen.

ui <- fluidPage(
  titlePanel("Sleeping habits in America"), 
  # Place a selectInput with two choices, "Plot" and "Table"
  ___("choice", "Choose an output",
              choices = ___),
  # Place plot and table outputs called "plot" and "table"
  ___("plot"), ___)
server <- function(input, output) {
  # Add renderPlot
  output$plot <- ___({
    if(input$choice == "Plot") p
  })
  # Add renderTable
  output$___ <- ___({
    if(input$choice == "Table") sleep
  }) }
shinyApp(ui, server)
Code bearbeiten und ausführen