created own cachematrix.R