VisTaperShape3d: 3-D visualization of taper models

Description Usage Arguments Author(s) Examples

View source: R/VisTaperShape3d.R

Description

VisTaperShape3d is used for visualizing taper models in 3-D

Usage

1
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

Author(s)

Carlos Alberto Silva and Joao Paulo Sardo Madi

Examples

 1
 2
 3
 4
 5
 6
 7
 8
 9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
## 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)

rForest documentation built on May 29, 2017, 9:42 a.m.