Create cachematrix.R

Caching the Inverse of a Matrix