Update cachematrix.R

First pass at creating functions that cache the inverse of a matrix