FormTariff: Tariff for taper form

In TapeS: Tree Taper Curves and Sorting Based on 'TapeR'

Tariff for taper form

Description

evaluates tariff functions to estimate taper form, i.e. quotient of d03 by d005

Usage

FormTariff(spp, Dbh, Ht, inv)

Arguments

spp	species code of tprSpeciesCode
Dbh	diameter of considered tree at 1.3m above ground [cm]
Ht	tree height of considered tree [m]
inv	indicator for inventory (0=TapeS taper curve models, 1=NFI1, 2=NsoG, 3=IS08, 4=NFI3, 5=BDAT)

Value

quotient of d03 / d005 [unitless]

References

c.f. rBDAT::getForm respectively BDAT source code FormTarif.f

Examples

## dont't run
spp <- 15
Dbh <- 30
Ht <- 27
FormTariff(spp, Dbh, Ht, 0)
FormTariff(spp=c(1:2), Dbh=c(30, 30), Ht=c(27, 24), inv=0)
if(require("rBDAT")){
  FormTariff(spp, Dbh, Ht, 0)
  rBDAT::getForm(list(spp=spp, D1=Dbh, H1=1.3, H=Ht), inv=0) # different taper curves!
  FormTariff(spp, Dbh, Ht, 1)
  rBDAT::getForm(list(spp=spp, D1=Dbh, H1=1.3, H=Ht), inv=1) # identical
  FormTariff(spp, Dbh, Ht, 2)
  rBDAT::getForm(list(spp=spp, D1=Dbh, H1=1.3, H=Ht), inv=2) # identical
  FormTariff(spp, Dbh, Ht, 3)
  rBDAT::getForm(list(spp=spp, D1=Dbh, H1=1.3, H=Ht), inv=3) # identical
  FormTariff(spp, Dbh, Ht, 4)
  rBDAT::getForm(list(spp=spp, D1=Dbh, H1=1.3, H=Ht), inv=4) # identical
}

TapeS documentation built on April 3, 2025, 11:09 p.m.