CommencerCommencez gratuitement

Lancements étatiques vs privés

D’après le graphique précédent, on dirait qu’à part la Chine, le nombre de lancements a diminué. Est-ce vraiment le cas ? Ou bien la course à l’espace s’est-elle déplacée vers le secteur privé ? Dans cet exercice, votre objectif est d’explorer cette question en comparant, au fil du temps, le nombre de lancements des États et des entreprises privées.

Les packages plotly, crosstalk et dplyr sont déjà chargés.

Cet exercice fait partie du cours

<cours>Visualisation de données interactive intermédiaire avec plotly en R</cours>
Voir le cours

Instructions de l’exercice

  • Créez un nouvel objet SharedData à partir du data frame launches_by_year.
  • Créez un graphique linéaire pour représenter le nombre de lancements dans le temps (launch_year) par agency_type. Utilisez la couleur pour représenter agency_type.
  • Activez la sélection (c’est-à-dire la mise en surbrillance) d’un agency_type.

Exercice interactif pratique

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

# table of launches by year and agency type
launches_by_year <- launches %>% count(launch_year, agency_type)

# create a ShareData object for plotting
shared_launches <- launches_by_year %>% ___(key = ___)

# create a line chart displaying launches by agency type, with highlighting
shared_launches %>%
  ___(___, ___, ___) %>%
  ___() %>%
  ___()
Modifier et exécuter le code