merge_tree_cat_list {ontophylo}

Merge state bins over a tree list

Description

A wrapper function to merge identical state bins over a tree list.

Usage

merge_tree_cat_list(tree.list)

Arguments

tree.list

multiSimmap object.

Value

A list of trees with merged identical bins.

Author(s)

Diego S. Porto

Examples

data("hym_stm")
tree_list <- hym_stm[[1]]
tree_list <- discr_Simmap_all(tree_list, res = 100)
stm_merg_list <- merge_tree_cat_list(tree_list)
# Check some arbitrary branch of some arbitrary tree.
br1 <- tree_list[[1]]$maps[[5]]
br1
br2 <- stm_merg_list[[1]]$maps[[5]]
br2
sum(br1) == br2