SensibleHeat {EcoHydRology} | R Documentation |
Sensible heat exchange between a surface and the surrounding air [kJ m-2 d-1]
SensibleHeat(surftemp, airtemp, wind)
surftemp |
surface temperature [C] |
airtemp |
average dailiy air temperature [C] |
wind |
average daily windspeed [m/s] |
M. Todd Walter
##---- Should be DIRECTLY executable !! ---- ##-- ==> Define data, use random, ##-- or do help(data=index) for the standard data sets. ## The function is currently defined as function(surftemp,airtemp,wind){ # sensible heat exchange between a surface and the surrounding air [kJ m-2 d-1] #surftemp: surface temperature [C] #airtemp: average dailiy air temperature [C] #wind: average daily windspeed [m/s] latentht<-2500 #latent heat of vaporization [kJ kg-1] heatcapacity<-1.25 #approx. heat capacity of air [kJ m-3 C-1] windfunction<-5.3*(1+wind) return(86400*heatcapacity*(surftemp-airtemp)*windfunction/latentht) }