edit cachematrix.R by creating 2 functions