Update cachematrix.R

update