cachematrix.R modified file