Create RatePhylo.allCI.R