Update cachematrix.R

#test