Sunlit shaded multi-layer model

Usage

sunML(Idir, Idiff, LAI = 8, nlayers = 8, cos.theta = 0.5, kd = 0.7, chi.l = 1, heightf = 3)

Arguments

I.dir
direct light (quantum flux), (micro mol /m2/s).
I.diff
indirect light (diffuse), (micro mol /m2/s).
LAI
leaf area index, default 8.
nlayers
number of layers in which the canopy is partitioned, default 8.
kd
extinction coefficient for diffuse light.
chi.l
The ratio of horizontal:vertical projected area of leaves in the canopy segment.
cos.theta
cosine of theta, solar zenith angle.

Value

a list structure with components

Vectors size equal to the number of layers.

Description

Simulates the light microenvironment in the canopy based on the sunlit-shade model and the multiple layers.

Examples

## <strong>Not run</strong>: # res2 <- sunML(1500,200,3,10) # # xyplot(Fsun + Fshade ~ c(1:10), data=res2, # ylab='LAI', # xlab='layer', # type='l',lwd=2,col=c('blue','green'), # lty=c(1,2), # key=list(text=list(c('Direct','Diffuse')),lty=c(1,2), # cex=1.2,lwd=2,lines=TRUE,x=0.7,y=0.5, # col=c('blue','green'))) # ## <strong>End(Not run)</strong>