From 30f814887dd012ae45a1dc7a03adbce9d56d93bb Mon Sep 17 00:00:00 2001 From: JulioV Date: Thu, 21 Nov 2019 11:34:30 -0500 Subject: [PATCH] Add local_day_segment to battery deltas --- src/features/battery_deltas.R | 6 ++++-- 1 file changed, 4 insertions(+), 2 deletions(-) diff --git a/src/features/battery_deltas.R b/src/features/battery_deltas.R index 4074995f..63d092f0 100644 --- a/src/features/battery_deltas.R +++ b/src/features/battery_deltas.R @@ -15,7 +15,8 @@ if(nrow(battery) > 0){ local_start_date_time = first(local_date_time), local_end_date_time = last(local_date_time), local_start_date = first(local_date), - local_end_date = last(local_date)) %>% + local_end_date = last(local_date), + local_day_segment = first(local_day_segment)) %>% select(-group_id) %>% filter(time_diff > 0.1) # Avoids including quick cycles } else { @@ -24,7 +25,8 @@ if(nrow(battery) > 0){ local_start_date_time = character(), local_end_date_time = character(), local_start_date = character(), - local_end_date = character()) + local_end_date = character(), + local_day_segment = character()) } write.csv(consumption, snakemake@output[[1]], row.names = FALSE)