Update cachematrix.R

cacheSolve function