Update cachematrix.R

cleaning the function