Update cachematrix.R

the first function creates a list that stores a matrix and its inverse, the second function returns the inverse of the matrix