Update cachematrix.R

Initial test