finishded cachematrix.R