Completed cachematrix.R so that it calculates and caches the inverse of a matrix