Update cachematrix.R

Final script