Create cacheSolve.R