Added cachematrix.R script