Compare commits
No commits in common. "4cbf6cdf1f9503aaad54abbeffa00dca615f7455" and "1b7582316b98f997ec0b65ce46b06d33176420e9" have entirely different histories.
4cbf6cdf1f
...
1b7582316b
13
ecobee.R
@ -290,16 +290,13 @@ ggsave(filename = "outdoorTemp_equipmentRun.png" ,
|
||||
units = "in")
|
||||
|
||||
ggplot(data = utility_data %>% filter(start_date>startdate)) +
|
||||
geom_point(aes(y = `Electricity (kWh)`,
|
||||
x = heat_pump_hours+heat_aux_hours+cool_pump_hours)) +
|
||||
geom_label_repel(aes(y = `Electricity (kWh)`,
|
||||
x = heat_pump_hours+heat_aux_hours+cool_pump_hours,
|
||||
geom_point(aes(x = `Electricity (kWh)`,
|
||||
y = heat_pump_hours+heat_aux_hours+cool_pump_hours)) +
|
||||
geom_label_repel(aes(x = `Electricity (kWh)`,
|
||||
y = heat_pump_hours+heat_aux_hours+cool_pump_hours,
|
||||
label = `mid date`)) +
|
||||
scale_x_continuous(limits = c(0, NA), expand = expansion(mult = c(0,0.1))) +
|
||||
scale_y_continuous(limits = c(0, NA), expand = expansion(mult = c(0,0.1))) +
|
||||
labs(title = "Heat pump hours vs total kWh",
|
||||
x = "Heat Pump Hours (heating + cooling)",
|
||||
y = "Electricity (kWh)")
|
||||
scale_y_continuous(limits = c(0, NA), expand = expansion(mult = c(0,0.1)))
|
||||
ggsave(filename = "equipmentRun_electicCost.png" ,
|
||||
path = paste(getwd(),"/figures/", sep = ""),
|
||||
device = "png",
|
||||
|
Before Width: | Height: | Size: 254 KiB After Width: | Height: | Size: 257 KiB |
Before Width: | Height: | Size: 245 KiB After Width: | Height: | Size: 248 KiB |
Before Width: | Height: | Size: 89 KiB After Width: | Height: | Size: 98 KiB |
Before Width: | Height: | Size: 364 KiB After Width: | Height: | Size: 323 KiB |
Before Width: | Height: | Size: 335 KiB After Width: | Height: | Size: 321 KiB |
Before Width: | Height: | Size: 376 KiB After Width: | Height: | Size: 370 KiB |
Before Width: | Height: | Size: 186 KiB After Width: | Height: | Size: 236 KiB |