Edited cachematrix.R