Kategorická osa x

V předchozích grafech jsme viděli, že příušnice se začaly hlásit až od roku 1999, takže srovnání před tímto rokem nemá smysl.

Pojďme filtrovat data tak, aby obsahovala pouze případy hlášené v roce 1999 a později, a pak vytvoříme skládaný sloupcový graf zobrazující podíl různých nemocí podle regionu.

Uprav pipeline pro manipulaci s daty, aby data měla požadovaný tvar, a pak sestav a vykresli svůj skládaný sloupcový graf. S pořadím sloupců si tentokrát hlavu nelám, to jsme řešili v minulém cvičení. Vidíš nějaké překvapivé vzory?

Toto cvičení je součástí kurzu

Vizualizace dat v R – nejlepší postupy

Zobrazit kurz

Pokyny k cvičení

Filtruj data who_disease tak, aby obsahovala pouze roky 1999 a novější.
Doplň group_by() tak, aby se v souhrnu zachovala informace o region.
Vyplň estetiky: x = region, y = total_cases a fill = disease.

Interaktivní cvičení na vyzkoušení si v praxi

Vyzkoušejte si toto cvičení dokončením tohoto ukázkového kódu.

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.
	___(___)

Upravit a spustit kód