# Three spruces, two pines, two beech
species_id <- fe_species_ger_nfi_2012(c(10, 10, 10, 20, 20, 100, 100))
dbh_cm <- c(10.1, 27.4, 31.4, 35.5, 39.8, 45.2, 47.2)
standing_area_gnfi3(species_id, dbh_cm)
Run the code above in your browser using DataLab