eCanA(LAI, doy, hour, solarR, AirTemp, RH, WindS, Vcmax, Vpmax, Vpr, Jmax, Ca = 380, Oa = 210, StomataWS = 1)
micro mol /m2/s
).m/s
).micro mol /m2/s
).micro mol /m2/s
).micro mol /m2/s
).micro
mol electrons m-2
s-1
).micro
bar) (e.g. 380).numeric
returns a single value which is hourly canopy assimilation
(mol m-2
ground s-1
)
It represents an integration of the photosynthesis function
eC4photo
, canopy evapo/transpiration and the
multilayer canopy model sunML
.
## <strong>Not run</strong>: # data(doy124) # tmp1 <- numeric(24) # for(i in 1:24){ # lai <- doy124[i,1] # doy <- doy124[i,3] # hr <- doy124[i,4] # solar <- doy124[i,5] # temp <- doy124[i,6] # rh <- doy124[i,7]/100 # ws <- doy124[i,8] # # tmp1[i] <- CanA(lai,doy,hr,solar,temp,rh,ws) # } # # plot(c(0:23),tmp1, # type='l',lwd=2, # xlab='Hour', # ylab=expression(paste('Canopy assimilation (mol ', # m^-2,' ',s^-1,')'))) # ## <strong>End(Not run)</strong>