edit cachematrix.R script