Create transformRateMatrix.R