Update cachematrix.R

test 1