Kategorisk x-axel

I de tidigare diagrammen såg vi att mässlingen inte börjat rapporteras förrän 1999, vilket gör jämförelser dessförinnan missvisande.

Låt oss filtrera data till att bara innehålla fall rapporterade från och med 1999, och sedan skapa ett stapeldiagram med staplar indelade efter andelen olika sjukdomar per region.

Modifiera datapipelinen så att du får data i rätt format, bygg sedan ditt stapeldiagram och plotta! Du behöver inte sortera staplarna som i förra övningen. Ser du några överraskande mönster?

Den här övningen är en del av kursen

Visualiseringsmetoder i R

Visa kurs

Övningsinstruktioner

Filtrera who_disease-data till enbart år 1999 och senare.
Lägg till i group_by() för att behålla region-information i sammanfattningen.
Fyll i estetiken med x = region, y = total_cases och fill = disease.

Interaktiv övning med praktiskt arbete

Testa den här övningen genom att slutföra den här exempelkoden.

disease_counts <- who_disease %>%
	# Filter to on or later than 1999
	filter(___) %>% 
	mutate(disease = ifelse(disease %in% c('measles', 'mumps'), disease, 'other')) %>%
	group_by(disease, ___) %>%    # Add region column to grouping
	summarise(total_cases = sum(cases))

# Set aesthetics so disease is the stacking variable, region is the x-axis and counts are the y
ggplot(disease_counts, aes(___)) +
	# Add a column geometry with the proper position value.
	___(___)

Redigera och kör kod