Facettage automatisé

Dans l’exercice précédent, vous avez créé manuellement un nuage de points avec facettes. Ce n’était pas très fastidieux, car vous ne vous concentriez que sur deux groupes. Cependant, il y a 6 plateformes dans le jeu de données vgsales2016, et coder manuellement 6 nuages de points serait très fastidieux.

Dans cet exercice, vous allez pratiquer l’utilisation de group_by(), nest(), mutate() et map2() pour automatiser la création d’un nuage de points à facettes en suivant le modèle ci‑dessous :

data %>%
  group_by(factor) %>%
  nest() %>%
  mutate(
      plot = map2(data, factor,
        \(data, factor) 
            plot_ly(data = data, x = ~x, y = ~y) %>%
                  add_markers(name = ~factor)
    )) %>%
  subplot(nrows = R, shareY = TRUE, shareX = TRUE)

Cet exercice fait partie du cours

Visualisation de données interactive avec plotly en R

Afficher le cours

Instructions

Utilisez group_by(), nest(), mutate() et map2() pour créer un nuage de points à facettes affichant Critic_Score sur l’axe des x et User_Score sur l’axe des y, avec des facettes définies par Platform.
Disposez les facettes sur une grille de 3 lignes.

Exercice interactif pratique

Essayez cet exercice en complétant cet exemple de code.

# Create a faceted scatterplot of User_Score vs. Critic_Score with 3 rows
vgsales2016 %>%
  ___(___) %>%
  ___() %>%
  mutate(
    plot = ___(
      ___, ___,
      \(data, Platform) 
      	
    )) %>%
  subplot(nrows = ___, shareY = TRUE, shareX = TRUE)

Modifier et exécuter le code