View source: R/sw_Vegetation.R
estimate_PotNatVeg_roots | R Documentation |
Calculate rooting profile for a soil profile from lookup tables
estimate_PotNatVeg_roots(
layers_depth,
trco_type_by_veg = list(grass_C3 = "SchenkJackson2003_PCdry_grasses", grass_C4 =
"SchenkJackson2003_PCdry_grasses", grass_annuals = "Jacksonetal1996_crops", shrub =
"SchenkJackson2003_PCdry_shrubs", forb = "SchenkJackson2003_PCdry_forbs", tree =
"Bradfordetal2014_LodgepolePine"),
trco_adj_by_veg = list(grass_C3 = "positive", grass_C4 = "positive", grass_annuals =
"positive", shrub = "positive", forb = "positive", tree = "positive"),
fgrass_c3c4ann = c(grass_C3 = NA, grass_C4 = NA, grass_annuals = NA),
trco_table = rSOILWAT2::sw2_trco_table
)
layers_depth |
A numeric vector. Values describe the lower soil layer depths [cm]. |
trco_type_by_veg |
A named list of character strings.
The rooting profiles, i.e., column names in the lookup table,
for each vegetation type. A |
trco_adj_by_veg |
A named list of character strings.
The type of adjustment from the full rooting profile
to the |
fgrass_c3c4ann |
A named, numeric vector of length 3.
Relative contribution [0-1] of the C3-grasses, C4-grasses, and
annuals functional groups. The sum of |
trco_table |
A named list with two elements. Default values
are taken from |
TranspCoeffByVegType
sw_in <- rSOILWAT2::sw_exampleData
clim <- calc_SiteClimate(weatherList = rSOILWAT2::weatherData)
veg_cover <- rSOILWAT2::estimate_PotNatVeg_composition(
MAP_mm = 10 * clim[["MAP_cm"]],
MAT_C = clim[["MAT_C"]],
mean_monthly_ppt_mm = 10 * clim[["meanMonthlyPPTcm"]],
mean_monthly_Temp_C = clim[["meanMonthlyTempC"]],
dailyC4vars = clim[["dailyC4vars"]]
)
estimate_PotNatVeg_roots(
layers_depth = c(5, 10, 20, 30, 40, 50, 100, 200),
fgrass_c3c4ann = veg_cover[["Grasses"]]
)
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.