From 023606e9aa011e43b36cba3518fb9df8124147e3 Mon Sep 17 00:00:00 2001 From: Hadley Wickham Date: Sun, 18 Apr 2021 09:29:27 -0500 Subject: [PATCH] Use explicit ifelse Fixes #852 --- datetimes.Rmd | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/datetimes.Rmd b/datetimes.Rmd index 5bd1129..75dcd9c 100644 --- a/datetimes.Rmd +++ b/datetimes.Rmd @@ -486,7 +486,7 @@ We can fix this by adding `days(1)` to the arrival time of each overnight flight flights_dt <- flights_dt %>% mutate( overnight = arr_time < dep_time, - arr_time = arr_time + days(overnight * 1), + arr_time = arr_time + days(ifelse(overnight, 0, 1)), sched_arr_time = sched_arr_time + days(overnight * 1) ) ```