getRTMt.sb get.RTMt.sb Calculates total outgoing radiation in hemispherical direction and total absorbed radiation per leaf and soil component. Radiation is integrated over the whole thermal spectrum with Stefan-Boltzman's equation. This function is a simplified version of 'getRTMt.planck', and is less time consuming since it does not do the calculation for each wavelength separately.

date: 5 Nov 2007 update:

13 Nov 2007
16 Nov 2007 CvdT improved calculation of net radiation
27 Mar 2008 JT added directional calculation of radiation
24 Apr 2008 JT Introduced dx as thickness of layer (see parameters)
31 Oct 2008 JT introduced optional directional calculation
31 Oct 2008 JT changed initialisation of F1 and F2 -> zeros
07 Nov 2008 CvdT changed layout
16 Mar 2009 CvdT removed Tbright calculation
Feb 2013 WV introduces structures for version 1.40
04 Dec 2019 CvdT adapted for SCOPE-lite
17 Mar 2020 CvdT mSCOPE representation

Usage

get.RTMt.sb(
  data.rad,
  data.soil,
  data.leafbio,
  data.canopy,
  data.leafopt,
  data.gap,
  Tcu,
  Tch,
  Tsu,
  Tsh,
  obsdir,
  data.spectral,
  data.opts = data.opts,
  get.plots
)

Arguments

data.rad: a large number of radiative fluxes: spectrally distributed and integrated, and canopy radiative transfer coefficients
data.soil: soil properties
data.leafbio: leaf properties
data.canopy: canopy properties (such as LAI and height)
data.leafopt: leaf optical properties
data.gap: probabilities of direct light penetration and viewing
Tcu: Temperature of sunlit leaves (oC), (13x36x60)
Tch: Temperature of shaded leaves (oC), (13x36x60)
Tsu: Temperature of sunlit soil (oC), (1)
Tsh: Temperature of shaded soil (oC), (1)
obsdir: logical, TRUE if directional (observation direction) radiative fluxes should be calculated.
data.spectral: information about wavelengths and resolutions
data.opts: simulation options. Here, the options need for the RT model
get.plots: is true plot the intermediate plots

Value

a large number of radiative fluxes: spectrally distributed and integrated, and canopy radiative transfer coefficients. Here, thermal fluxes are added

Author

 Wout Verhoef, Christiaan van der Tol, Joris Timmermans (Original version in Matlab)

Carlos Camino (Ported version into R)

Examples

if (FALSE) { # \dontrun{
data.rad <- get.RTMt.sb(data.rad, data.soil, data.leafbio, data.canopy,
                         data.leafopt, data.gap, Tcu, Tch, Tsu, Tsh,
                         obsdir = TRUE, data.spectral, data.opts,
                         get.plots = FALSE)
} # }