R/SatVaporPressure.R

SatVaporPressure <-
function(T_C){  
# saturated vapor pressure at a given temperature (kPa)
#T_C: temperature [C]
return(0.611 * exp((17.3*T_C)/(237.2+T_C)))
}

Try the EcoHydRology package in your browser

Any scripts or data that you put into this service are public.

EcoHydRology documentation built on May 2, 2019, 4:47 p.m.