Update cachematrix.R

First update