정렬된 포인트 차트
슬라이드에서 본 포인트 플롯을 개선해 보겠습니다.
먼저 데이터 처리 파이프라인을 기본값인 2006-2016 대신 1992와 2002 연도로 필터링하도록 바꾸세요. 배열 interestingCountries는 로드되어 있으며 슬라이드와 동일하다는 점에 유의하세요.
이제 플로팅 코드를 수정해 새 데이터를 그리되, 이번에는 y축을 1992년 사례 수 기준 내림차순으로 재정렬해 봅시다.
이 연습은 강의의 일부입니다
R로 배우는 시각화 베스트 프랙티스
연습 안내
filter()를 수정해1992와2002연도를 선택하세요.미학 매핑(Aesthetics)을 다음과 같이 수정하세요:
- 국가별 1992년 사례 수를 그립니다.
- 사례 수 기준으로 y축을
reorder()로 재정렬합니다.
실습형 인터랙티브 연습
이 예제를 이 샘플 코드를 완성하여 풀어보세요.
who_subset <- who_disease %>%
filter(
countryCode %in% interestingCountries,
disease == 'measles',
year %in% c(2006, 2016) # Modify years to 1992 and 2002
) %>%
mutate(year = paste0('cases_', year)) %>%
arrange(year, region) %>%
pivot_wider(names_from = year, values_from = cases)
# Reorder y axis and change the cases year to 1992
ggplot(who_subset, aes(x = log10(cases_2006), y = country)) +
geom_point()