Application Shiny pour nuage de mots
Un jeu de données d’exemple nommé artofwar vous est fourni ; il contient l’intégralité du texte du livre L’Art de la guerre. Vous pouvez examiner ce texte en exécutant head(artofwar) ou tail(artofwar) pour afficher les premiers et derniers vers du livre.
Comme mentionné dans la vidéo, les nuages de mots ne font pas partie des sorties que vous avez déjà vues. Ils nécessitent donc une nouvelle paire de fonctions d’affichage et de rendu : wordcloud2Output() et renderWordcloud2(). Ces fonctions sont disponibles dans le paquet wordcloud2.
Cet exercice fait partie du cours
Études de cas : créer des applications web avec Shiny en R
Instructions
La fonction create_wordcloud(), le jeu de données artofwar et tous les packages nécessaires sont déjà disponibles dans votre espace de travail.
- Ajoutez, dans l’UI, un espace réservé pour la sortie du nuage de mots avec un outputId
cloud. - Rendez l’objet du nuage de mots et affectez-le au bon élément de la liste
output(ligne 11).
Au fait, create_wordcloud() est une fonction que nous avons définie pour vous. Vous ne pourrez pas l’exécuter dans votre propre RStudio sur votre ordinateur. Pour la consulter, tapez create_wordcloud dans la console.
Exercice interactif pratique
Essayez cet exercice en complétant cet exemple de code.
# Define UI for the application
ui <- fluidPage(
h1("Word Cloud"),
# Add the word cloud output placeholder to the UI
___(outputId = "cloud")
)
# Define the server logic
server <- function(input, output) {
# Render the word cloud and assign it to the output list
output$___ <- ___({
# Create a word cloud object
create_wordcloud(artofwar)
})
}
# Run the application
shinyApp(ui = ui, server = server)