Update cachematrix.R

My result.