tprHeight {TapeS}

Estimate height for given diameter w/ or w/o bark

Description

Function to extract the height of given diameter w/ or w/o bark from taper curve

Usage

tprHeight(obj, Dx, bark = TRUE, cp = TRUE, mono = TRUE, Rfn = NULL)

## S4 method for signature 'tprTrees'
tprHeight(obj, Dx, bark = TRUE, cp = TRUE, mono = TRUE, Rfn = NULL)

Arguments

obj

object of class 'tprTrees'

Dx

diameter for which height is required

bark

should given diameter be considered over or under bark?

cp

cartesian product, i.e. apply all Hx to all trees, defaults to TRUE

mono

logical, defaults to true. If calibrated taper curve is non-monotonic at stem base, a support diameter is added.

Rfn

Rfn setting for residuals error matrix, defaults to list(fn="sig2"), see resVar.

Value

estimated height of given diameter

Methods (by class)

• tprHeight(tprTrees): method for class 'tprTrees'

See Also

tprDiameter, tprDiameterCpp

Examples

obj <- tprTrees(spp=c(1, 3, 8, 15),
                Dm=list(c(30, 28), c(30, 28), c(30, 28), c(30, 28)),
                Hm=list(c(1.3, 5), c(1.3, 5), c(1.3, 5), c(1.3, 5)),
                Ht = rep(30, 4))
tprHeight(obj, Dx = c(30, 7), bark=TRUE)
tprHeight(obj, Dx = c(30, 7), bark=FALSE)

## no cartesion product between obj and Dx, i.e. cp=FALSE
## Dx is recycled if necessary
tprHeight(obj, Dx = c(30, 7), bark=FALSE, cp=FALSE)