14.1 UI Benutzeroberfläche

Als nächste gestalten und modifizieren wir die UI Oberfläche:

ui <- fluidPage(
  selectInput("dataset", label = "Dataset", choices = ls("package:datasets")),
  verbatimTextOutput("summary"),
  tableOutput("table")
)

• fluidPage() ist eine layout Funktion um die Allgemeinen visuellen Strukturen der App festzulegen.
• selectInput() lässt den Nutzer mit der App interagieren, indem eine Box bereitgestellt wird mit dem Label “Dataset”.
• verbatimTextOutput() und tableOutput() sind Funktionen um shiny zu vermitteln, wo und wie der Output dargestellt werden soll.

# run the shinyapp again
shinyApp(ui, server)