Thêm đầu ra biểu đồ tương tác
Tương tự như tạo bảng tương tác, bạn có thể dễ dàng biến một biểu đồ tĩnh tạo bằng ggplot2 thành biểu đồ tương tác với gói plotly. Để render một biểu đồ tương tác, dùng plotly::renderPlotly(), và hiển thị nó bằng plotly::plotlyOutput().
Hãy nhớ rằng cũng như các hàm render khác, mã bên trong plotly::renderPlotly() phải được bao trong dấu ngoặc nhọn {}!
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
- Tạo một biểu đồ tương tác cho top 10 tên phổ biến nhất theo giới tính và năm. Đặt tên output là
"plot_trendy_names"và dùng hàmplot_trends()để tạo biểu đồ. - Hiển thị biểu đồ trong UI.
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(
selectInput('name', 'Select Name', top_trendy_names$name)
# CODE BELOW: Add a plotly output named 'plot_trendy_names'
)
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()
}
# CODE BELOW: Render a plotly output named 'plot_trendy_names'
}
shinyApp(ui = ui, server = server)