VisTaperShape3d {rForest} | R Documentation |
VisTaperShape3d is used for visualizing taper models in 3-D
VisTaperShape3d(model,dbh,height,col, solid)
model, |
taper model as an object of class "lm" |
dbh, |
tree diameter at breast height, e.g. 35 cm |
height, |
tree height, e.g. 25 m |
col, |
taper color, e.g. "forestgreen" |
solid, |
if TRUE (default) returns a solid 3d model. If FALSE, returns a 3d grid model |
Carlos Alberto Silva and Joao Paulo Sardo Madi
## Not run: # Importing forest inventory data data(ForestInv01) # setting model parametersdbh and ht hi<-ForestInv01[,2] di<-ForestInv01[,3] ht<-ForestInv01[,4] dbh<-ForestInv01[,5] # fitting the fifth-degree polynomial taper model fit <- poly5Model(dbh,ht,di,hi, plotxy=TRUE) dbh<-30 # cm height<-25 # m model<-fit library(rgl) # Plotting the taper model in 3-D VisTaperShape3d(fit,dbh,height,col="forestgreen",solid=TRUE) box3d() grid3d(c("x+","y+")) aspect3d(0.3,0.3,1) ## End(Not run)