Create cachesolve.R