Placeholders voor resultaten toevoegen
Resultaten (outputs) zijn objecten die aan de gebruiker worden getoond en in R worden gegenereerd, zoals een plot of een tabel.
Om een output aan een Shiny-app toe te voegen, moet je eerst een placeholder voor die output toevoegen die Shiny vertelt waar de output moet komen.
Shiny biedt verschillende placeholderfuncties, één voor elk type output. Zo is plotOutput() bedoeld voor het tonen van plots, tableOutput() voor het weergeven van tabellen en textOutput() voor dynamische tekst.
Deze oefening maakt deel uit van de cursus
Casestudies: webapplicaties bouwen met Shiny in R
Oefeninstructies
- Maak een tekstinvoer met ID "name" in het zijpaneel.
- Voeg drie output-placeholders toe aan het hoofdpaneel:
- Een tekstoutput met ID "greeting" (regel 14).
- Een plotoutput met ID "cars_plot" (regel 16).
- Een tabeloutput met ID "iris_table" (regel 18).
Interactieve oefening met praktijkervaring
Probeer deze oefening door deze voorbeeldcode aan te vullen.
library(shiny)
# Define UI for the application
ui <- fluidPage(
sidebarLayout(
sidebarPanel(
# Create a text input with an ID of "name"
___(___, "What is your name?", "Dean"),
numericInput("num", "Number of flowers to show data for",
10, 1, nrow(iris))
),
mainPanel(
# Add a placeholder for a text output with ID "greeting"
textOutput(outputId = ___),
# Add a placeholder for a plot with ID "cars_plot"
___("cars_plot"),
# Add a placeholder for a table with ID "iris_table"
___(___)
)
)
)
# Define the server logic
server <- function(input, output) {}
# Run the application
shinyApp(ui = ui, server = server)