cacheMatrixForInverse.R