df <- tibble::tibble(
scientificName = c("Cacatua (Licmetis) tenuirostris",
"Cacatua (Licmetis) tenuirostris",
"Cacatua (Licmetis) tenuirostris"),
n_obs = c(1, 3, 4)
)
df |>
set_abundance(individualCount = n_obs)
Run the code above in your browser using DataLab