Completed R file with makeCacheMatrix and cacheSolve