The hardware and bandwidth for this mirror is donated by METANET, the Webhosting and Full Service-Cloud Provider.
If you wish to report a bug, or if you are interested in having us mirror your free-software or open-source project, please feel free to contact us at mirror[@]metanet.ch.

timbeR

The goal of timbeR is to provide functions for estimating log volumes and quantities from taper functions in the processing of forest inventories.

Installation

You can install the CRAN version of the package as follows:

install.packages("timbeR")

You can also install the development version from GitHub with:

# install.packages("devtools")
devtools::install_github("sergiocostafh/timbeR")

Example

As a basic example, we can fit a 5th degree polynomial to the tree_scaling dataset.

library(dplyr)
library(timbeR)

tree_scaling <- tree_scaling %>% 
  mutate(did = di/dbh,
         hih = hi/h)

poli5 <- lm(did~hih+I(hih^2)+I(hih^3)+I(hih^4)+I(hih^5),tree_scaling)

And then we define the wood products:

assortments <- data.frame(
  NAME = c('15-25','4-15'),
  SED = c(15,4),
  MINLENGTH = c(2.65,2),
  MAXLENGTH = c(2.65,4.2),
  LOSS = c(5,5)
)

And now we can estimate the volume and quantity of wood products in a tree stem. For ease of understanding, let’s simulate cutting logs on a single tree.

# Tree measurements
dbh <- 25
h <- 20

# Estimate logs volume and quantity
poly5_logs(dbh, h, coef(poli5), assortments)
#> $volumes
#> # A tibble: 1 x 2
#>   `15-25` `4-15`
#>     <dbl>  <dbl>
#> 1   0.293  0.111
#> 
#> $logs
#> # A tibble: 1 x 2
#>   `15-25` `4-15`
#>     <dbl>  <dbl>
#> 1       3      2

Finally, we can generate the same result in a visual way, simulating the position of the logs along the tree stem.

poly5_logs_plot(dbh, h, coef(poli5), assortments)

These binaries (installable software) and packages are in development.
They may not be fully stable and should be used with caution. We make no claims about them.