species_id <- fe_species_tum_wwk_short(rep(3, 7)) # Seven Scots pines
dbh <- c(10.1, 27.4, 31.4, 35.5, 39.8, 45.2, 47.2) # and their diameters
# Estimate the heights of these trees assuming they are from a 100 year old
# stand with a mean diameter of 35.5 cm, and a corresponding mean height
# of 28 m.
h_standard_bv(species_id, dbh, age_yr = 100, d_q_cm = 35.5, h_q_m = 28.0)
# Compare with sister function h_standard_gnfi3 which does not require
# stand age
h_standard_gnfi3(species_id, dbh, d_q_cm = 35.5, h_q_m = 28.0)
Run the code above in your browser using DataLab