Update cachematrix.R

creating 2 functions