Update ColumnFormattedMatrix_P_and_Corr.R