Update cachematrix.R

First submit