대륙별 올림픽 메달
대륙별 선수들의 올림픽 성과를 겨울·여름 대회를 포함해 시간에 따라 비교하려고 합니다. 1928년부터 각 대륙의 참가자 1인당 평균 메달 수가 담긴 medal_df 데이터셋이 주어졌어요. 어떤 대륙이 메달을 전혀 따지 못한 해에는 값이 0이 되도록 데이터를 보완해 보겠습니다.
ggplot2 패키지는 미리 로드되어 있습니다.
이 연습은 강의의 일부입니다
tidyr로 데이터 재구조화하기
연습 안내
- 각
continent가 각 올림픽 대회에서medals_per_participant값을 갖도록 데이터셋을 보완하세요. 누락된 값은 0으로 채웁니다. - 여름과 겨울 올림픽은 같은 해에 열리지 않으므로
nesting()함수를 사용해season과year변수를 중첩하세요. ggplot()을 사용해year별medals_per_participant의 선 그래프를 그리고,continent로 색상을 구분하세요.
실습형 인터랙티브 연습
이 예제를 이 샘플 코드를 완성하여 풀어보세요.
medal_df %>%
# Give each continent an observation at each Olympic event
complete(
___,
___,
fill = ___(___ = ___)
) %>%
# Plot the medals_per_participant over time, colored by continent
ggplot(___) +
___ +
facet_grid(season ~ .)