# NOT RUN {
#Load example plot plant data
data(exampleforest)
#Default species parameterization
data(SpParamsMED)
ntree = nrow(exampleforest$treeData)
#Initialize soil with default soil params
S = soil(defaultSoilParams())
#Calculate conic root system for trees
V1 = root_conicDistribution(Z=rep(2000,ntree), S$dVec)
print(V1)
#Calculate LDR root system for trees (Schenck & Jackson 2002)
V2 = root_ldrDistribution(Z50 = rep(200,ntree),
Z95 = rep(1000,ntree), S$dVec)
print(V2)
#Equal xylem conductance proportions for a cone distribution
#(assuming depth-width ratio 1)
root_xylemConductanceProportions(V1[1,], S$dVec)
#Xylem conductance proportions for LDR distribution
root_xylemConductanceProportions(V2[1,], S$dVec)
# }
Run the code above in your browser using DataLab