Dodaj interaktywny wykres jako wynik
Podobnie jak w przypadku interaktywnych tabel, statyczny wykres utworzony za pomocą ggplot2 możesz łatwo przekształcić w interaktywny, korzystając z pakietu plotly. Aby wyrenderować interaktywny wykres, użyj funkcji plotly::renderPlotly(), a następnie wyświetl go za pomocą plotly::plotlyOutput().
Pamiętaj, że podobnie jak w przypadku innych funkcji renderujących, kod wewnątrz plotly::renderPlotly() musi być ujęty w nawiasy klamrowe {}!
To ćwiczenie jest częścią kursu
Tworzenie aplikacji internetowych z Shiny w R
Instrukcje do ćwiczenia
- Utwórz interaktywny wykres 10 najpopularniejszych imion według płci i roku. Nadaj wynikowi nazwę
"plot_trendy_names"i użyj funkcjiplot_trends()do wygenerowania wykresu. - Wyświetl wykres w interfejsie użytkownika (UI).
Interaktywne ćwiczenie praktyczne
Spróbuj tego ćwiczenia, uzupełniając ten przykładowy kod.
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)