Description Usage Arguments Value Author(s) References See Also Examples
Returns the net long wave radiation based on Crawford and Duchon, 1999.
1 2 3 | calc.lw.net(ts.data, lat, atm.press)
calc.lw.net.base(dateTime, sw, Ts, lat, atm.press, airT, RH)
|
ts.data |
Object of class |
lat |
latitude in degrees north |
atm.press |
atmospheric pressure in mb |
dateTime |
vector of datetime in POSIXct format |
sw |
numeric value of short wave radiation, W/m2 |
Ts |
numeric value of surface water temperature, degC |
airT |
numeric value of air temperature, degC |
RH |
numeric value of relative humidity, % |
## for calc.lw.net.base
A numeric value of net long wave heat flux in W/m^2
## for calc.lw.net
A data.frame with columns datetime
and lwnet
in W/m^2
R Iestyn Woolway Jordan S. Read Hilary Dugan Luke Winslow
Crawford, T.M., and Duchon, C.E. 1999. An improved parameterization for estimating effective atmospheric emissivity for use in calculating daytime downwelling longwave radiation. Journal of Applied Meteorology 38: 474-480.
k.read
and k.macIntyre
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 | ## Base example
dateTime <- as.POSIXct("2013-12-30 23:00")
Uz <- 3
airT <- 20
RH <- 90
sw <- 800
wndZ <- 2
Kd <- 2
lat <- 54
lake.area <- 5000
atm.press <- 1013
Ts <- 22
calc.lw.net.base(dateTime,sw,Ts,lat,atm.press,airT,RH)
## Example using timeseries in a data frame
data.path = system.file('extdata', package="LakeMetabolizer")
sp.data = load.all.data('sparkling', data.path)
# Prep the input data
ts.data = sp.data$data #pull out just the timeseries data
atm.press = 1018
lat = sp.data$metadata$latitude
lwnet = calc.lw.net(ts.data, lat, atm.press)
plot(lwnet$datetime, lwnet$lwnet)
|
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.