From 822425ca398a10edb3d140c54ec72af579c13049 Mon Sep 17 00:00:00 2001 From: Ali Abbas Date: Wed, 12 Jan 2022 14:16:47 +0000 Subject: [PATCH] Remove updating PT stage distance, as it assumes there is only one non-walk trip. May need revisiting in the future. Ref https://github.com/ITHIM/ITHIM-R/issues/84 --- R/add_walk_trips.R | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/R/add_walk_trips.R b/R/add_walk_trips.R index a2fa1b20..1f1c35a5 100644 --- a/R/add_walk_trips.R +++ b/R/add_walk_trips.R @@ -48,7 +48,7 @@ add_walk_trips <- function(pt_trips){ # Correct walk trips distance walk_trips$stage_distance <- (walk_trips$stage_duration / 60) * VEHICLE_INVENTORY$speed[VEHICLE_INVENTORY$stage_mode=='pedestrian'] - pt_trips$stage_distance <- pt_trips$stage_distance - walk_trips$stage_distance + # pt_trips$stage_distance <- pt_trips$stage_distance - walk_trips$stage_distance # Recategorise trip_distance_cat for both bus and walk trips pt_trips$trip_distance_cat[pt_trips$trip_distance > 0 & pt_trips$trip_distance < DIST_LOWER_BOUNDS[2]] <- DIST_CAT[1]