multi_phylod <- list()
multi_phylod[[1]] <- create_test_phylod(test_scenario = 1)
multi_phylod[[2]] <- create_test_phylod(test_scenario = 2)
multi_island_tbl <- multi_extract_island_species(
multi_phylod = multi_phylod,
extraction_method = "min",
island_tbl = NULL,
include_not_present = FALSE
)
Run the code above in your browser using DataLab