# Libraries required for the following two examples
library(dplyr)
library(purrr)
# Look up the bavrn_state species codes for all supported species
# the column species_id contains the bavrn_state codes
species_codings |>
filter(species_coding == "bavrn_state") |>
pluck(2, 1) |>
arrange(as.numeric(species_id)) |> # just for the look of it
print(n = Inf)
# Display a summary table which shows the number of single species behind
# each bavrn_state species code
species_codings |>
filter(species_coding == "bavrn_state") |>
pluck(2, 1) |>
group_by(name_eng, species_id) |> # display english names
summarise(n = n()) |>
arrange(as.numeric(species_id)) |> # just for the look of it
print(n = Inf)
# Make an fe_species_bavrn_state vector from a vector of integer codes
spec_ids <- fe_species_bavrn_state(
c(10, 10, 10, 60, 60, 60, 60, 30, 30, 80, 86, 80)
)
Run the code above in your browser using DataLab