An R script that caches the inverse of a matrix