added fan data to figures

Signed-off-by: Ben Varick <ben@dendroalsia.net>
This commit is contained in:
Ben Varick 2022-07-03 11:13:52 -07:00
parent 066f3fc3b5
commit 1069beb6a0
Signed by: ben
SSH Key Fingerprint: SHA256:jWnpFDAcacYM5aPFpYRqlsamlDyKNpSj3jj+k4ojtUo
8 changed files with 5 additions and 4 deletions

View File

@ -153,7 +153,7 @@ ggplot() +
aes(x = dateTime,
y = temp,
color = temp_type))+
geom_rect(data = ecobee %>% pivot_longer(cols = c(compHeat1, auxHeat1, compCool1), names_to = "equipment", values_to = "active_sec") %>% filter(active_sec > 0),
geom_rect(data = ecobee %>% pivot_longer(cols = c(compHeat1, auxHeat1, compCool1, fan), names_to = "equipment", values_to = "active_sec") %>% filter(active_sec > 0),
aes(xmin = dateTime,
xmax = dateTime + active_sec,
ymin = equipment_y + equipment_types[match(equipment, equipment_types$column), 4],
@ -176,7 +176,7 @@ ggplot() +
aes(x = dateTime,
y = temp,
color = temp_type))+
geom_rect(data = ecobee %>% filter(date > Sys.Date() - 7) %>% pivot_longer(cols = c(compHeat1, auxHeat1, compCool1), names_to = "equipment", values_to = "active_sec") %>% filter(active_sec > 0),
geom_rect(data = ecobee %>% filter(date > Sys.Date() - 7) %>% pivot_longer(cols = c(compHeat1, auxHeat1, compCool1, fan), names_to = "equipment", values_to = "active_sec") %>% filter(active_sec > 0),
aes(xmin = dateTime,
xmax = dateTime + active_sec,
ymin = equipment_y + equipment_types[match(equipment, equipment_types$column), 4],
@ -269,8 +269,9 @@ ggplot(data = ecobee %>%
summarise(outdoorTemp = mean(outdoorTemp),
compHeat1 = sum(compHeat1, na.rm = TRUE),
compCool1 = sum(compCool1, na.rm = TRUE),
auxHeat1 = sum(auxHeat1, na.rm = TRUE)) %>%
pivot_longer(cols = c(compHeat1, compCool1, auxHeat1), names_to = 'equipment', values_to = 'active_sec') %>%
auxHeat1 = sum(auxHeat1, na.rm = TRUE),
fan = sum(fan, na.rm = TRUE)) %>%
pivot_longer(cols = c(compHeat1, compCool1, auxHeat1, fan), names_to = 'equipment', values_to = 'active_sec') %>%
filter(active_sec > 0),
aes(x = outdoorTemp,
y = active_sec/60/60,

Binary file not shown.

Before

Width:  |  Height:  |  Size: 258 KiB

After

Width:  |  Height:  |  Size: 257 KiB

Binary file not shown.

Before

Width:  |  Height:  |  Size: 248 KiB

After

Width:  |  Height:  |  Size: 248 KiB

Binary file not shown.

Before

Width:  |  Height:  |  Size: 98 KiB

After

Width:  |  Height:  |  Size: 98 KiB

Binary file not shown.

Before

Width:  |  Height:  |  Size: 227 KiB

After

Width:  |  Height:  |  Size: 323 KiB

Binary file not shown.

Before

Width:  |  Height:  |  Size: 323 KiB

After

Width:  |  Height:  |  Size: 321 KiB

Binary file not shown.

Before

Width:  |  Height:  |  Size: 367 KiB

After

Width:  |  Height:  |  Size: 370 KiB

Binary file not shown.

Before

Width:  |  Height:  |  Size: 251 KiB

After

Width:  |  Height:  |  Size: 236 KiB