CommencerCommencez gratuitement

Frise chronologique de la course à l’espace

La première « course à l’espace » a commencé lorsque les États-Unis et l’Union soviétique ont tenté de devenir la puissance dominante en vol spatial. Cette course a culminé le 20 juillet 1969, lorsque Apollo 11, un engin habité, s’est posé sur la Lune. Dans cet exercice, votre objectif est de créer une série temporelle résumant cette première course : la course à la supériorité en vol spatial entre pays.

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 state_launches.
  • Créez un graphique en courbes affichant le nombre de lancements par année (launch_year) pour chaque État (state_code).
  • Tracez chaque courbe avec une couleur différente.
  • Activez la sélection (c’est-à-dire la mise en évidence) d’un État individuel.

Exercice interactif pratique

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

# table of launches by year
state_launches <- launches %>% 
  filter(agency_type == "state") %>% 
  count(launch_year, state_code)

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

# Create a line chart for launches by state, with highlighting
shared_launches %>%
  ___(___, ___, ___) %>%
  ___() %>%
  ___()
Modifier et exécuter le code