Updated cacheMatrix.r function