Create Cache.R