Tambahkan keluaran plot interaktif

Mirip dengan membuat tabel interaktif, Anda dapat dengan mudah mengubah plot statis yang dibuat menggunakan ggplot2 menjadi plot interaktif dengan paket plotly. Untuk merender plot interaktif, gunakan plotly::renderPlotly(), dan tampilkan menggunakan plotly::plotlyOutput().

Ingat, seperti halnya dengan fungsi render lainnya, kode di dalam plotly::renderPlotly() harus dibungkus dengan kurung kurawal {}!

Latihan ini merupakan bagian dari kursus

Membangun Aplikasi Web dengan Shiny di R

Lihat Kursus

Instruksi latihan

Buat plot interaktif untuk 10 nama paling populer berdasarkan jenis kelamin dan tahun. Beri nama output "plot_trendy_names" dan gunakan fungsi plot_trends() untuk menghasilkan plotnya.
Tampilkan plot tersebut di UI.

Latihan interaktif langsung praktik

Cobalah latihan ini dengan melengkapi kode contoh ini.

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)

Edit dan Jalankan Kode