Added cachematrix.R code