Update cachematrix.R

simplify