Lägg till interaktiv plotutdata
Precis som när du skapar interaktiva tabeller kan du enkelt göra en statisk plot skapad med ggplot2 interaktiv med hjälp av paketet plotly. Använd plotly::renderPlotly() för att rendera en interaktiv plot och plotly::plotlyOutput() för att visa den i gränssnittet.
Kom ihåg att koden inuti plotly::renderPlotly() ska omges av klammerparenteser {}, precis som med andra render-funktioner!
Den här övningen är en del av kursen
Bygg webbapplikationer med Shiny i R
Övningsinstruktioner
- Skapa en interaktiv plot över de 10 mest populära namnen uppdelat på kön och år. Ge utdata namnet
"plot_trendy_names"och använd funktionenplot_trends()för att generera ploten. - Visa ploten i gränssnittet (UI).
Interaktiv övning med praktiskt arbete
Testa den här övningen genom att slutföra den här exempelkoden.
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)