Dr. P. David Polly from Indiana University published a Phylogenetics package for Mathematica. A detailed User's Guide is also available. Short discription is copied below.
Keywords: Phylogenetics; Ancestral Node Reconstruction; Newick Trees
Abstract: This add-in package for Mathematica performs basic phylogenetic functions, including reading and drawing Newick format trees, calculating phylogenetically independent contrasts, reconstructing ancestral values for continuous traits, performing random walks, and simulating continuous traits on phylogenetic trees. The file is a ".m" file, which can be imported into Mathematica 6.0 and later (functions do not work in earlier versions of Mathematica). Install using the "Install" item on the "File" menu. Once installed, you must load the package like any other with the line <<PollyPhylogenetics
, using either this suggested name or another.