Layout-uri cu bară laterală

Funcțiile de layout îți permit să aranjezi vizual elementele de intrare și de ieșire în interfața utilizatorului. Un layout bine ales face aplicația Shiny mai atractivă din punct de vedere estetic și îmbunătățește experiența utilizatorului.

În acest exercițiu, vei modifica layout-ul unei aplicații Shiny care le permite utilizatorilor să exploreze popularitatea unor nume la modă. Aplicația finală ar trebui să arate astfel:

O aplicație în care selectorul de nume apare în bara laterală stângă, iar graficul apare în dreapta, în panoul principal

Acest exercițiu face parte din cursul

Crearea aplicațiilor web cu Shiny în R

Vezi cursul

Instrucțiuni pentru exercițiu

Modifică layout-ul acestei aplicații astfel încât selectorul de nume să apară în bara laterală, iar graficul și tabelul să apară în dreapta.

Exercițiu interactiv practic

Încearcă acest exercițiu completând acest cod de exemplu.

ui <- fluidPage(
  # MODIFY CODE BELOW: Wrap in a sidebarLayout
    # MODIFY CODE BELOW: Wrap in a sidebarPanel
    selectInput('name', 'Select Name', top_trendy_names$name),
    # MODIFY CODE BELOW: Wrap in a mainPanel
    plotly::plotlyOutput('plot_trendy_names'),
    DT::DTOutput('table_trendy_names')
)

# DO NOT MODIFY
server <- function(input, output, session){
  # Function to plot trends in a name
  plot_trends <- function(){
     babynames %>% 
      filter(name == input$name) %>% 
      ggplot(aes(x = year, y = n)) +
      geom_col()
  }
  output$plot_trendy_names <- plotly::renderPlotly({
    plot_trends()
  })
  
  output$table_trendy_names <- DT::renderDT({
    babynames %>% 
      filter(name == input$name)
  })
}

shinyApp(ui = ui, server = server)

Editează și rulează codul