Nejfrekventovanější stanice příjezdů a odjezdů s váhami
Zatím jsme se na naši síť dívali pouze s nevážených hranami. Váhy hran ale ve skutečnosti představují počty cest, takže dává smysl rozšířit analýzu stupňů o váženou distribuci stupňů. Je to důležité proto, že i když je vyvážený poměr stupňů žádoucí, fyzicky je potřeba přerozdělovat kola. Pokud jsou váhy na všech stanicích stejné, postačí nevážený poměr stupňů. Jenže pokud chceme vědět, kolik kol ve skutečnosti proudí sítí, musíme váhy zohlednit.
Váženým protějškem distribuce stupňů je síla (strength). Vypočítáme ji pomocí funkce strength(), která vrací váženou distribuci stupňů na základě atributu weight hran grafu.
Toto cvičení je součástí kurzu
Případové studie: Analýza sítí v R
Pokyny k cvičení
- Vytvoř datový rámec s následujícími sloupci.
trip_outby měl obsahovat váženou distribuci stupňů (sílu) směru"out"protrip_g_simp.trip_inby měl obsahovat váženou distribuci stupňů směru"in".ratioby měl obsahovat poměr stupňů „out" ku stupňům „in".
- Filtruj
trip_strngtak, aby zůstaly pouze řádky, kde jsoutrip_outitrip_invětší než10. - Vykresli histogram filtrovaných poměrů.
Interaktivní cvičení na vyzkoušení si v praxi
Vyzkoušejte si toto cvičení dokončením tohoto ukázkového kódu.
trip_strng <- data_frame(
# Find the "out" strength distribution
trip_out = strength(___, mode = "___"),
# ... and the "in" strength distribution
trip_in = strength(___, mode = "in"),
# Calculate the ratio of out / in
ratio = ___ / trip_in
)
trip_strng_filtered <- trip_strng %>%
# Filter for rows where trips in and out are both over 10
filter(___ > 10, ___ > 10)
# Plot histogram of filtered ratios
hist(___$ratio)