changed cachematrix.R