treecm (version 1.2.2)

getPlinthForce: Computes the force on the plinth on the ground

Description

To stabilize the tree a steel cable is connected from an anchor point on the tree to a plinth on the ground. The function computes the force on the plinth (needed to choose the appropriate steel cable and to build the plinth itself) and the maximum security azimuth (the angle relative to the North from the tree base). Force is computed by comparing the moment of the tree and the moment of the anchor, whose arm is the vector from tree base to the anchor point. The anchor point is defined as the distance from tree base, along the stem. Note that this distance equals anchor height only when the stem is perfectly vertical and straight.

Usage

getPlinthForce(l.stem, d, logs, treeMoment, CM)

Arguments

l.stem

the distance from tree base to anchor point, along the stem

d

the length of the cable (in metres)

logs

a data frame holding the selected logs (see logPathSelection)

treeMoment

the moment of the tree as computed by calcMoment

CM

an object of CM class

Value

a named list of 6 elements:

force

the force in Newton on the plinth

distanceOnGround

the distance from tree base to the plinth

anchorAlongStem

the distance from tree base to the anchor (ie l.stem)

cableLength

the length of the cable (ie d)

anchorHeight

true height of the anchor over ground

azimuth

the azimuth of the plint relative to the tree base

See Also

Other Stabilization: anchorRange, centreOfMassAngle, centreOfMassModulus, logPathSelection, toCartesianXYZ

Examples

library(treecm)
data(stonePine1TreeData)
vectors <- treeVectors(stonePine1TreeData)
CM <- centreOfMass(vectors)
treeMoment <- buildTreeMomentObject(
  centreOfMassModulus(CM)
  , treeTotalBiomass(stonePine1TreeData)
  , centreOfMassAngle(CM)
  )
treeMoment <- calcMoment(treeMoment)
logs <- logPathSelection(stonePine1TreeData)
plinth <- data.frame(getPlinthForce(10, 20, logs, getMoment(treeMoment), CM))