Études de cas : créer des applications Web avec Shiny en R
Dean Attali
Shiny Consultant
3 sources de données pour le nuage de mots
artofwartextAreaInput()fileInput()Prochaine étape : tout permettre ensemble

radioButtons(
"time_of_day", "Choose your favorite time of day",
choices = c("Morning", "Afternoon", "Evening"),
selected = "Afternoon"
)

radioButtons(
"time_of_day", "Choose your favorite time of day",
choices = c("I'm a morning person!" = "Morning",
"Love my afternoons" = "Afternoon",
"Night owl here!" = "Evening"),
selected = "Afternoon"
)

str(input$time_of_day)
chr "Afternoon"
conditionalPanel(condition, ...)
condition ressemble à du code R, mais input$<id> devient input.<id>... peut être n'importe quelle interfaceui <- fluidPage(
radioButtons("time_of_day",
"Choose your favorite time of day",
...),
plotOutput("morning_only_plot")
)
ui <- fluidPage(
radioButtons("time_of_day",
"Choose your favorite time of day",
...),
conditionalPanel(
condition = "input.time_of_day == 'Morning'",
plotOutput("morning_only_plot")
)
)
Études de cas : créer des applications Web avec Shiny en R