Cập nhật bố cục (UI)

Bạn có thể dùng các hàm layout do Shiny cung cấp để sắp xếp các phần tử UI. Ở đây, chúng ta muốn dùng sidebarLayout(), trong đó phần nhập liệu được đặt trong sidebarPanel() và phần đầu ra được đặt trong mainPanel(). Bạn có thể dùng mẫu sau để cập nhật bố cục cho ứng dụng của mình.

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

Chúng tôi đã nạp sẵn các gói shiny và ggplot2 cho bạn. Lưu ý rằng p('hello') trả về một đoạn văn HTML với nội dung "hello".

Bài tập này là một phần của khóa học

Xây dựng ứng dụng web với Shiny trong R

Xem khóa học

Hướng dẫn bài tập

Đặt textInput() vào trong sidebarPanel().
Đặt plotOutput() vào trong mainPanel().
Đặt cả hai panel vào trong một bố cục sidebar: sidebarLayout(___ , ___).

Bài tập tương tác thực hành trực tiếp

Hãy thử làm bài tập này bằng cách hoàn thành đoạn mã mẫu này.

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)

Chỉnh sửa và Chạy Mã