generar un arbol de consenso de adam a partir de un archivo .tre que contiene 100 arboles filogeneticos y a ese arbol de consenso calcularle su parsimonia
library(ape) #leemos los arboles treefile <- read.tree("/home/adam/Escritorio/adam.tre") #creemos el arbol de consenso consensus <- consensus.phylo(treefile) #calculamos su parsimonia treedist(consensus)$length