CommencerCommencez gratuitement

App 2 : Prénoms de bébés populaires

La création d’une application Shiny est un processus modulaire. Vous commencez par l’UI, puis vous travaillez sur le code du serveur, en construisant les résultats à partir des saisies de l’utilisateur. Plus vous prenez l’habitude de suivre consciemment cette approche, plus il sera facile de créer de bonnes applications.

Vous allez maintenant créer une application Shiny qui permet à un utilisateur de choisir le sexe et l’année, puis d’afficher les 10 prénoms les plus populaires de cette année sous forme d’histogramme par colonnes de la proportion de naissances (prop) par prénom (name). Votre application finale doit ressembler visuellement à la capture d’écran ci‑dessous.

An app where the name selector and year slider appear in the left sidebar, while the graph appears on the right in the main panel

Nous mettons à votre disposition une fonction get_top_names() pour extraire les 10 prénoms les plus fréquents pour une year et un sex donnés. Par exemple, vous pouvez obtenir les 10 prénoms masculins les plus populaires pour l’année 2000 avec get_top_names(2000, "M").

Nous avons également chargé le package ggplot2. Vous pouvez créer un graphique en colonnes à partir d’un data frame d contenant les colonnes x et y avec :

ggplot(d, aes(x = x, y = y)) +
  geom_col()

Cet exercice fait partie du cours

<cours>Créer des applications web avec Shiny en R</cours>
Voir le cours

Instructions de l’exercice

  • Ajoutez un titre en haut de votre application et un agencement avec barre latérale.
  • Ajoutez, dans la barre latérale, une saisie permettant de sélectionner le sexe (M ou F).
  • Ajoutez, dans la barre latérale, un curseur permettant de sélectionner une année (1880 à 2017).
  • Ajoutez un résultat de type graphique dans le panneau principal.
  • Ajoutez, côté serveur, un résultat qui affiche un graphique en colonnes en fonction de year et sex. Notez que vous pouvez ajouter plusieurs lignes de code entre les accolades d’une fonction de rendu : render***({___}).

Exercice interactif pratique

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

ui <- fluidPage(
  
)

server <- function(input, output, session) {
  
}

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