Chọn một châu lục để xem
Khi khám phá một bộ dữ liệu, việc thử lọc theo nhiều biến thường rất hữu ích. Ví dụ, bạn có thể chỉ muốn xem dữ liệu cho các quốc gia ở châu Phi có một giá trị tuổi thọ cụ thể.
Bài tập này là một phần của khóa học
Nghiên cứu tình huống: Xây dựng ứng dụng web với Shiny trong R
Hướng dẫn bài tập
Thêm một lựa chọn dạng select cho phép người dùng chọn châu lục cụ thể để xem. Cụ thể:
- Thêm một select input vào UI với ID "continent" và nhãn "Continent".
- Bên trong hàm render, dùng giá trị input của châu lục để chỉ chọn dữ liệu từ châu lục đã chọn (dòng 21).
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(
h1("Gapminder"),
sliderInput(inputId = "life", label = "Life expectancy",
min = 0, max = 120,
value = c(30, 50)),
# Add a continent selector dropdown
___(___, ___, choices = levels(gapminder$continent)),
tableOutput("table")
)
server <- function(input, output) {
output$table <- renderTable({
data <- gapminder
data <- subset(
data,
lifeExp >= input$life[1] & lifeExp <= input$life[2]
)
data <- subset(
data,
# Filter the data according to the continent input value
continent == ___
)
data
})
}
shinyApp(ui, server)