updated .R file

Two functions for caching the inverse of a square matrix