Lay-out (UI) bijwerken

Je kunt layout-functies van Shiny gebruiken om UI-elementen te rangschikken. In dit geval willen we een sidebarLayout() gebruiken, waarbij de input in een sidebarPanel() staat en de output in de mainPanel(). Je kunt deze template gebruiken om de lay-out van je app aan te passen.

sidebarLayout(
  sidebarPanel(p("This goes into the sidebar on the left")),
  mainPanel(p("This goes into the panel on the right"))
)

We hebben de packages shiny en ggplot2 alvast voor je geladen. Let op: p('hello') geeft een HTML-paragraaf terug met de tekst "hello".

Deze oefening maakt deel uit van de cursus

Webapplicaties bouwen met Shiny in R

Bekijk cursus

Oefeninstructies

Zet de textInput() in een sidebarPanel().
Zet de plotOutput() in een mainPanel().
Zet beide panels in een sidebarlay-out: sidebarLayout(___ , ___).

Interactieve oefening met praktijkervaring

Probeer deze oefening door deze voorbeeldcode aan te vullen.

ui <- fluidPage(
  titlePanel("Baby Name Explorer"),
  # CODE BELOW: Add a sidebarLayout, sidebarPanel, and mainPanel
  
  textInput('name', 'Enter Name', 'David'),
  plotOutput('trend')
  
)

server <- function(input, output, session) {
  output$trend <- renderPlot({
    ggplot()
  })
}

shinyApp(ui = ui, server = server)

Code bewerken en uitvoeren