ExampleScripts/coolEnergy_ex.R

##CalcEnergyCool
data("mylu.params")

e <- -10:34 #temperature vector

r <- coolEnergy(Ta = e, bat.params = mylu.params)

plot(e, r, xlab = "Temp (C)", ylab = "Energy Expended",
     main = "coolEnergy")
cReedHranac/batwintor documentation built on Jan. 27, 2020, 7:39 p.m.