Update cachematrix.R

Working code