Initial version of the cache matrix R functions