Done cachematrix.R