Create CachingInverse.R