island_colonist <- DAISIEprep::island_colonist(
clade_name = "bird",
status = "endemic",
missing_species = 0,
col_time = 1,
col_max_age = FALSE,
branching_times = 0.5,
species = "bird_a",
clade_type = 1
)
island_tbl <- island_tbl()
bind_colonist_to_tbl(
island_colonist = island_colonist,
island_tbl = island_tbl
)
Run the code above in your browser using DataLab