# Construct some species id vector
spec_ids <- c(
rep(fe_species_tum_wwk_short(as.character(1:10)), each = 5), NA
)
summary(spec_ids)
spec_ids |> summary()
spec_ids |> summary(spec_lang = "eng")
# Usual application: Set option for species code output
# Any summary of an fe_species object will use the last setting of the
# option
options(fe_spec_lang = "sci")
spec_ids |> summary()
# The summary is also used in the summary of a data frame which contains
# an fe_species object, but displayed differently
options(fe_spec_lang = "eng")
selection_forest_1_fe_stand$trees |> summary()
Run the code above in your browser using DataLab