Update cachematrix.R

A little update on script