updated Cache.R