Create likRatePhylo.R