'restructureData' - correct reference to cycleway speed and capacity

matsim-melbourne · May 31, 2024 · c5acf4d · c5acf4d
1 parent acd4512
commit c5acf4d
Showing 1 changed file with 2 additions and 2 deletions.
diff --git a/functions/restructureData.R b/functions/restructureData.R
@@ -16,8 +16,8 @@ restructureData <- function(networkList, highway_lookup,
   bikepaths <- links %>% 
     filter(uid %in% bikepath_uids) %>% 
     mutate(highway_order = 16) %>% 
-    mutate(freespeed=defaults_df$freespeed[15]) %>% 
-    mutate(laneCapacity=defaults_df$laneCapacity[15]) %>% 
+    mutate(freespeed=defaults_df$freespeed[16]) %>% 
+    mutate(laneCapacity=defaults_df$laneCapacity[16]) %>% 
     mutate(is_car=0) %>% 
     mutate(permlanes=1) %>% # bikepaths are assumed sinlge lane
     mutate(is_oneway=0) %>% # bikepaths are assumed bi-directional