VisTaperShape3d: 3-D visualization of taper models

In rForest: Forest Inventory and Analysis

Description

VisTaperShape3d is used for visualizing taper models in 3-D

Usage

VisTaperShape3d(model,dbh,height,col, solid)

Arguments

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

Value

Nothing, but outputs a plot

Author(s)

Carlos Alberto Silva and Joao Paulo Sardo Madi

Examples

# 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)

rForest documentation built on Oct. 4, 2021, 9:06 a.m.