Update cachematrix.R

Added code via UI