Ứng dụng 2: Tên em bé phổ biến
Xây dựng một ứng dụng Shiny là một quy trình theo mô-đun. Bạn bắt đầu với UI, rồi chuyển sang phần mã server, xây dựng các đầu ra dựa trên đầu vào của người dùng. Bạn càng luyện tập có chủ đích theo cách này, việc xây dựng ứng dụng tốt sẽ càng trở nên dễ dàng.
Bây giờ bạn sẽ xây dựng một ứng dụng Shiny cho phép người dùng chọn giới tính và năm, và sẽ hiển thị 10 tên phổ biến nhất trong năm đó dưới dạng biểu đồ cột của tỷ lệ sinh (prop) theo tên (name). Ứng dụng cuối cùng của bạn sẽ trông tương tự như ảnh chụp màn hình bên dưới.
Chúng tôi đã cung cấp hàm get_top_names() để trích xuất 10 tên hàng đầu cho một year và sex nhất định. Ví dụ, bạn có thể lấy 10 tên nam phổ biến nhất cho năm 2000 bằng get_top_names(2000, "M").
Chúng tôi cũng đã nạp sẵn gói ggplot2. Bạn có thể tạo biểu đồ cột từ một data frame d với các cột x và y bằng:
ggplot(d, aes(x = x, y = y)) +
geom_col()
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
Hướng dẫn bài tập
- Thêm tiêu đề ở phía trên của ứng dụng và thêm bố cục sidebar.
- Thêm một input vào sidebar để người dùng chọn giới tính (
MhoặcF). - Thêm một thanh trượt (slider) vào sidebar để người dùng chọn năm (1880 đến 2017).
- Thêm một đầu ra biểu đồ vào main panel.
- Thêm một đầu ra ở server để render biểu đồ cột dựa trên
yearvàsex. Lưu ý bạn có thể thêm nhiều dòng mã bên trong dấu ngoặc nhọn của hàm render:render***({___}).
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(
)
server <- function(input, output, session) {
}
shinyApp(ui = ui, server = server)