2022-05-31

Ciel práce

  • Zanalyzovať intenzitu dopravy na Slovensku
  • Vyhodnotiť kde je intenzita najväčšia podla rôznych kategórií
  • Vypočítať priemernú vzdialenosť áut na určitých úsekoch počas dopravnej špičky.

Analýza intenzity dopravy na Slovensku

Rozdelenie intenzity dopravy podľa krajov a typu vozidla

Rozdelenie intenzity dopravy podľa typu komunikácie a vozidla

Najvyťaženejšií úsek pre motocykle - Prístavný most

Úsek Cesta Okres Kraj Typ_cesty Typ Intenzita
87022 D1 Bratislava II Bratislavský Dialnica Motocykle 524

Najintenzívnejšie úseky celkovo

Výpočet vzdialenosti vozidiel počas jazdy počas špičky

Metodika

Na záver vypočítajme, ako ďaleko od seba musia ísť autá v špičke, ak za 3 hodiny prejde daným úsekom 30% áut rýchlosťou 80 km/h a daný úsek má 2 dopravné pásy v každom smere. Potom vzdialenosť medzi dvoma autami vypočítame pomocou rovníc \[ t=\frac{T}{n/p} \\ s=v*t \], kde T je časový úsek, za ktorý prejde n áut naprieč p pruhmi, t je potom časový úsek medzi dvoma za sebou idúcimi vozidlami v jednom pruhu, v je ich priemerná rýchlosť a s je vzdialenosť medzi nimi.

Výpočet

data_w_dist <- data %>% 
  filter(Typ == "Spolu", Kraj == "Bratislavský", 
         Typ_cesty == "Dialnica", grepl("Bratislava", Okres)) %>%
  mutate(Vzdialenosť = case_when(
    Úsek == "87021" ~ 80/3.6 * ((3*60*60)/(0.30*Intenzita/6)),
    TRUE ~ 80/3.6 * ((3*60*60)/(0.30*Intenzita/4))))

Výsledok pre všetky Dialnice v Bratislave

Výsledok pre 5 najintenzívnejších úsekov v BA