Returns the average temperature of a layer between two depths.
This function calculates the average temperature of a layer of water between two depths.
layer.temperature(top, bottom, wtr, depths, bthA, bthD)
top |
Numeric value of the depth (m) of the top of the layer from the water surface |
bottom |
Numeric value of the depth (m) of the bottom of the layer from the water surface |
wtr |
Numeric vector of water temperature in degrees C |
depths |
Numeric vector of depths (m) corresponding to water temperature vector |
bthA |
Numeric vector of water body cross sectional area (m2) corresponding to bthD depths |
bthD |
Numeric vector of water body bathymetric depths (m) corresponding to areal bthA values |
Numeric value of average water temperature
layer.density
# Supply input data top <- 2 bottom <- 6 wtr <- c(25.2,25.1,24.1,22.0,19.8,15.3,12.0,11.1) depths <- c(0,1,2,3,4,5,6,7) bthA <- c(10000,8900,5000,3500,2000,1000,300,10) bthD <- c(0,1,2,3,4,5,6,7) #Return the average temperature of the water column between 2 and 6 meters. layer.temperature(top,bottom,wtr,depths,bthA,bthD)
Please choose more modern alternatives, such as Google Chrome or Mozilla Firefox.