cachematrix.R file with inverse matrix cached