Update cachematrix.R

Adding code