phylod <- create_test_phylod(test_scenario = 1)
island_tbl <- extract_island_species(
phylod = phylod,
extraction_method = "min"
)
island_tbl <- rm_island_colonist(
island_tbl = island_tbl,
clade_name = "bird_b"
)
Run the code above in your browser using DataLab