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. Elle a atteint son apogée le 20 juillet 1969, quand Apollo 11, un vaisseau habité, a atterri sur la Lune. Dans cet exercice, votre tâche est de créer un graphique chronologique résumant cette première course à l'espace : la course à la supériorité en matière de vols spatiaux entre pays.
Les bibliothèques plotly, crosstalk et dplyr sont déjà chargées.
Cette activité fait partie du cours
Visualisation de données interactive intermédiaire avec plotly en R
Instructions de l’exercice
- Créez un nouvel objet
SharedDataà partir de la trame de donnéesstate_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 dans une couleur différente.
- Permettez la sélection (c.-à-d. 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 %>%
___(___, ___, ___) %>%
___() %>%
___()