ben/laundry_status
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

changed start tz of time frame

Browse Source
This commit is contained in:
Ben Varick 2023-11-28 07:51:21 -06:00
parent f6a67d7ab2
commit 743f3d8d59
Signed by: ben
SSH Key Fingerprint: SHA256:jWnpFDAcacYM5aPFpYRqlsamlDyKNpSj3jj+k4ojtUo
1 changed files with 2 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

3
laundry_status.R
View File

@ -65,7 +65,8 @@ update_data <- function(){
time = as.POSIXct(time, tz = "America/Chicago"), time = as.POSIXct(time, tz = "America/Chicago"),
status = ifelse(value > power_threshold_on, "on", "off")) %>% status = ifelse(value > power_threshold_on, "on", "off")) %>%
mutate(door_threshold = ifelse(entity_id == "washing_machine_power", power_threshold_wash_door, power_threshold_dry_door)) %>% mutate(door_threshold = ifelse(entity_id == "washing_machine_power", power_threshold_wash_door, power_threshold_dry_door)) %>%
mutate(door = ifelse(value < door_threshold, "open", "closed")) mutate(door = ifelse(value < door_threshold, "open", "closed")) %>%
filter(time >= start_time)
values_by_entity <- as.list(NULL) values_by_entity <- as.list(NULL)
for(entity in entities$entity_id) { for(entity in entities$entity_id) {