edit cashematrix and add cashematrix_solve.R