# Load the predefined B matrices of the package
B_mats <- GeRnika::B_mats
B_real <- B_mats[[2]]$B_real
B_opt <- B_mats[[2]]$B_opt
# Instantiate two \code{Phylotree} class objects on
# the basis of the B matrices
phylotree_real <- B_to_phylotree(
B = B_real)
phylotree_opt <- B_to_phylotree(
B = B_opt)
equals(phylotree_real, phylotree_opt)
Run the code above in your browser using DataLab