cacheMean.R and cachematrix.R