adding my cachematrix.R