CommencezCommencez gratuitement

Modifier les paramètres du nuage de mots

Rappelez-vous que create_wordcloud() a deux arguments facultatifs : num_words, un entier qui précise le nombre maximal de mots à afficher, et background, qui précise la couleur d'arrière-plan de l'image.

À l'heure actuelle, l'application Shiny produit toujours un nuage de mots avec exactement les mêmes paramètres. Puisque la fonction qui génère le nuage de mots accepte ces deux paramètres, ce serait dommage de ne pas les utiliser. L'utilisateur devrait pouvoir les ajuster au moyen de champs de saisie Shiny.

Votre tâche est d'ajouter deux champs de saisie à l'application Shiny et d'utiliser leurs valeurs comme paramètres num_words et background du nuage de mots.

Cette activité fait partie du cours

Études de cas : créer des applications Web avec Shiny en R

Voir le cours

Instructions de l’exercice

Tous les progiciels requis, y compris colourpicker, ont été chargés dans votre espace de travail. Plus précisément :

  • Ajoutez une saisie numérique avec l'identifiant « num », une valeur par défaut de 100 et une valeur minimale de 5.
  • Ajoutez une saisie de couleur (du progiciel colourpicker) avec l'identifiant « col », l'étiquette « Background color » et la couleur par défaut « white ».
  • Utilisez les valeurs de ces deux champs pour définir les paramètres de create_wordcloud() (ligne 16).

Exercice interactif pratique

Essayez cet exercice en complétant ce code d’exemple.

ui <- fluidPage(
  h1("Word Cloud"),
  # Add a numeric input for the number of words
  ___(inputId = ___, label = "Maximum number of words",
      value = ___, min = ___),
  # Add a color input for the background color
  ___(___),
  wordcloud2Output("cloud")
)

server <- function(input, output) {
  output$cloud <- renderWordcloud2({
    # Use the values from the two inputs as
    # parameters to the word cloud
    create_wordcloud(artofwar,
                     num_words = ___, background = ___)
  })
}

shinyApp(ui = ui, server = server)
Modifier et exécuter le code