Faceting denních jízd
Při pohledu na počty denních jízd rozdělených podle dne v týdnu jsme si všimli zajímavého chování. Pojďme zjistit, jestli faceting na dalších proměnných přinese nové poznatky. Podíváme se, zda se vzorce pro jednotlivé dny v týdnu liší podle způsobu platby – hotovostí nebo kartou.
tx máš k dispozici ve svém pracovním prostředí.
Toto cvičení je součástí kurzu
Vizualizace velkých dat s Trelliscope v R
Pokyny k cvičení
- Po filtrování pouze na hotovostní a kartové transakce vytvoř pomocí
dplyrsouhrn podle dne v týdnu a typu platby – seskup data podlepickup_date,pickup_dowapayment_type. - Uvnitř
summarise()spočítej počet jízd a výsledek ulož do nové proměnnén_rides. - Výsledek vykresli pomocí souhrnného datasetu
daily_countjako vstupu doggplot()a použijgeom_point(), přičemž na osu x umístipickup_datea na osu yn_rides. - Pomocí
facet_grid()nastav faceting tak, abypayment_typetvořil řádky a den v týdnupickup_dowsloupce. - Všimni si, že kód
coord_fixed()omezuje poměr stran výsledného grafu, aby lépe vynikly vizuální vzorce.
Interaktivní cvičení na vyzkoušení si v praxi
Vyzkoušejte si toto cvičení dokončením tohoto ukázkového kódu.
library(dplyr)
library(ggplot2)
# Summarize taxi rides count by payment type, pickup date, pickup day of week
daily_count <- tx %>%
filter(payment_type %in% c("Card", "Cash")) %>%
group_by(___, ___, ___) %>%
summarise(___)
# Plot the data
ggplot(___, aes(___, ___)) +
___ +
facet_grid(___ ~ ___) +
coord_fixed(ratio = 0.4)