Update cachematrix.R

Added code