Aktualizacja układu (UI)

Do rozmieszczenia elementów UI możesz używać funkcji layout dostępnych w pakiecie Shiny. W tym przypadku chcemy użyć sidebarLayout(), gdzie dane wejściowe umieszcza się wewnątrz sidebarPanel(), a dane wyjściowe – wewnątrz mainPanel(). Poniższy szablon pomoże ci zaktualizować układ aplikacji.

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

Pakiety shiny i ggplot2 zostały już wczytane. Pamiętaj, że p('hello') zwraca akapit HTML z tekstem "hello".

To ćwiczenie jest częścią kursu

Tworzenie aplikacji internetowych z Shiny w R

Zobacz kurs

Instrukcje do ćwiczenia

Umieść textInput() wewnątrz sidebarPanel().
Umieść plotOutput() wewnątrz mainPanel().
Umieść oba panele wewnątrz układu z paskiem bocznym: sidebarLayout(___ , __).

Interaktywne ćwiczenie praktyczne

Spróbuj tego ćwiczenia, uzupełniając ten przykładowy kod.

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)

Edytuj i uruchom kod