## Parameters
b0 <- 1.016215
b1 <- 0.332529
coefs <- c(b0, b1)
## Tree attributes
dbh <- 40
toth <- 25
## Using the function
hl.int <- c(0.3, 1.3, 5)
dl.hat <- biging.fx(d = dbh, h = toth, hl = hl.int, paramod=coefs)
cbind(hl.int, dl.hat)
Run the code above in your browser using DataLab