Vizualizace upravených demografických trendů

Pojďme porovnat, jak se v průběhu času měnilo půjčování napříč různými demografickými skupinami. Data frame rydf, který jsi vytvořil/a v předchozím cvičení, máš k dispozici ve svém pracovním prostoru.

Poznámka: Odebrali jsme řádek odpovídající hodnotě "Not Avail".

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

Škálovatelné zpracování dat v R

Zobrazit kurz

Pokyny k cvičení

tidyr a ggplot2 jsou načteny ve tvém pracovním prostoru.

Vypiš objekty rydf a pop_proportion.
Převeď rydf na data frame v dlouhém formátu tak, že sloučíš všechny sloupce kromě Race.
Vytvoř spojnicový graf s Year na ose x a Adjusted_Count na ose y.

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

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

# View rydf
___ 

# View pop_proportion
___

# Gather on all variables except Race
rydfl <- ___(rydf, ___, names_to = "Year", values_to = "Count")

# Create a new adjusted count variable
rydfl$Adjusted_Count <- rydfl$Count / pop_proportion[rydfl$Race]

# Plot
ggplot(rydfl, aes(x = ___, y = ___, group = Race, color = Race)) + 
    geom_line()

Upravit a spustit kód