Introduction to Cache

Eliot J. B. McIntire

July 28 2020

1 Reproducible workflow

As part of a reproducible workflow, caching of function calls, code chunks, and other elements of a project is a critical component. The objective of a reproducible workflow is is likely that an entire work flow from raw data to publication, decision support, report writing, presentation building etc., could be built and be reproducible anywhere, on any computer, operating system, with any starting conditions, on demand. The reproducible::Cache function is built to work with any R function.

1.1 Differences with other approaches

Cache users DBI as a backend, with key functions, dbReadTable, dbRemoveTable, dbSendQuery, dbSendStatement, dbCreateTable and dbAppendTable. These can all be accessed via Cache, showCache, clearCache, and keepCache. It is optimized for speed of transactions, using fastdigest::fastdigest on R memory objects and digest::digest on files. The main function is superficially similar to archivist::cache, which uses digest::digest in all cases to determine whether the arguments are identical in subsequent iterations. It also but does many things that make standard caching with digest::digest don’t work reliably between systems. For these, the function .robustDigest is introduced to make caching transferable between systems. This is relevant for file paths, environments, parallel clusters, functions (which are contained within an environment), and many others (e.g., see ?.robustDigest for methods). Cache also adds important elements like automated tagging and the option to retrieve disk-cached values via stashed objects in memory using memoise::memoise. This means that running Cache 1, 2, and 3 times on the same function will get progressively faster. This can be extremely useful for web apps built with, say shiny.

1.2 Function-level caching

Any function can be cached using: Cache(FUN = functionName, ...).

This will be a slight change to a function call, such as: projectRaster(raster, crs = crs(newRaster)) to Cache(projectRaster, raster, crs = crs(newRaster)).

This is particularly useful for expensive operations.

library(raster)
## Loading required package: sp
library(reproducible)

tmpDir <- file.path(tempdir(), "reproducible_examples", "Cache")
checkPath(tmpDir, create = TRUE)
## [1] "C:/Users/EMCINT~1.L-V/AppData/Local/Temp/RtmpmIazo8/reproducible_examples/Cache"
ras <- raster(extent(0, 1000, 0, 1000), vals = 1:1e6, res = 1)
crs(ras) <- "+proj=lcc +lat_1=48 +lat_2=33 +lon_0=-100 +datum=WGS84"

newCRS <- "+init=epsg:4326" # A longlat crs

# No Cache
system.time(suppressWarnings(map1 <- projectRaster(ras, crs = newCRS))) # Warnings due to new PROJ
##    user  system elapsed 
##    3.28    0.55    4.31
# Try with memoise for this example -- for many simple cases, memoising will not be faster
opts <- options("reproducible.useMemoise" = TRUE)
# With Cache -- a little slower the first time because saving to disk
system.time(suppressWarnings(map1 <- Cache(projectRaster, ras, crs = newCRS, cacheRepo = tmpDir,
                         notOlderThan = Sys.time())))
##    user  system elapsed 
##    4.53    0.64    5.83
# vastly faster the second time
system.time(map2 <- Cache(projectRaster, ras, crs = newCRS, cacheRepo = tmpDir))
##   ...(Object to retrieve (279dabecda1015c9.rds) is large: 6.5 Mb)
##      loaded memoised result from previous projectRaster call,
##    user  system elapsed 
##    0.42    0.05    0.53
# may be faster the third time because of memoise; but this example is too simple to show
system.time(map3 <- Cache(projectRaster, ras, crs = newCRS, cacheRepo = tmpDir))
##   ...(Object to retrieve (279dabecda1015c9.rds) is large: 6.5 Mb)
##      loaded memoised result from previous projectRaster call,
##    user  system elapsed 
##    0.40    0.09    0.60
options(opts)

all.equal(map1, map2) # TRUE
## [1] TRUE
all.equal(map1, map3) # TRUE
## [1] TRUE

1.3 Caching examples

1.3.1 Basic use

library(raster)
library(magrittr)
## 
## Attaching package: 'magrittr'
## The following object is masked from 'package:raster':
## 
##     extract
try(clearCache(tmpDir, ask = FALSE), silent = TRUE) # just to make sure it is clear

ranNumsA <- Cache(rnorm, 10, 16, cacheRepo = tmpDir)

# All same
ranNumsB <- Cache(rnorm, 10, 16, cacheRepo = tmpDir) # recovers cached copy
##   ...(Object to retrieve (f11fb1a2880f8060.rds))
##      loaded cached result from previous rnorm call,
ranNumsC <- Cache(cacheRepo = tmpDir) %C% rnorm(10, 16)  # recovers cached copy
##   ...(Object to retrieve (f11fb1a2880f8060.rds))
##      loaded cached result from previous 'rnorm' pipe sequence call,
ranNumsD <- Cache(quote(rnorm(n = 10, 16)), cacheRepo = tmpDir) # recovers cached copy
##   ...(Object to retrieve (f11fb1a2880f8060.rds))
##      loaded cached result from previous rnorm call,
# Any minor change makes it different
ranNumsE <- Cache(cacheRepo = tmpDir) %C% rnorm(10, 6) # different

1.4 Example 1: Basic cache use with tags

ranNumsA <- Cache(rnorm, 4, cacheRepo = tmpDir, userTags = "objectName:a")
ranNumsB <- Cache(runif, 4, cacheRepo = tmpDir, userTags = "objectName:b")

showCache(tmpDir, userTags = c("objectName"))
## Cache size:
##   Total (including Rasters):  504 bytes
##   Selected objects (not including Rasters):  504 bytes
##              cacheId              tagKey              tagValue
##  1: 3aef38d1fc02aee5          objectName                     b
##  2: 3aef38d1fc02aee5            function                 runif
##  3: 3aef38d1fc02aee5               class               numeric
##  4: 3aef38d1fc02aee5         object.size                  1008
##  5: 3aef38d1fc02aee5            accessed   2020-07-28 22:25:03
##  6: 3aef38d1fc02aee5             inCloud                 FALSE
##  7: 3aef38d1fc02aee5          resultHash                      
##  8: 3aef38d1fc02aee5   elapsedTimeDigest      0.003181219 secs
##  9: 3aef38d1fc02aee5 elapsedTimeFirstRun                0 secs
## 10: 3aef38d1fc02aee5      otherFunctions      vweave_rmarkdown
## 11: 3aef38d1fc02aee5      otherFunctions          process_file
## 12: 3aef38d1fc02aee5      otherFunctions         process_group
## 13: 3aef38d1fc02aee5      otherFunctions   process_group.block
## 14: 3aef38d1fc02aee5      otherFunctions            call_block
## 15: 3aef38d1fc02aee5      otherFunctions            block_exec
## 16: 3aef38d1fc02aee5      otherFunctions                in_dir
## 17: 3aef38d1fc02aee5      otherFunctions             timing_fn
## 18: 3aef38d1fc02aee5      otherFunctions                handle
## 19: 3aef38d1fc02aee5           preDigest    n:7eef4eae85fd9229
## 20: 3aef38d1fc02aee5           preDigest .FUN:881ec847b7161f3c
## 21: 3aef38d1fc02aee5           file.size                   168
## 22: f7bee22047b8d0c1          objectName                     a
## 23: f7bee22047b8d0c1            function                 rnorm
## 24: f7bee22047b8d0c1               class               numeric
## 25: f7bee22047b8d0c1         object.size                  1008
## 26: f7bee22047b8d0c1            accessed   2020-07-28 22:25:03
## 27: f7bee22047b8d0c1             inCloud                 FALSE
## 28: f7bee22047b8d0c1          resultHash                      
## 29: f7bee22047b8d0c1   elapsedTimeDigest      0.002506971 secs
## 30: f7bee22047b8d0c1 elapsedTimeFirstRun                0 secs
## 31: f7bee22047b8d0c1      otherFunctions      vweave_rmarkdown
## 32: f7bee22047b8d0c1      otherFunctions          process_file
## 33: f7bee22047b8d0c1      otherFunctions         process_group
## 34: f7bee22047b8d0c1      otherFunctions   process_group.block
## 35: f7bee22047b8d0c1      otherFunctions            call_block
## 36: f7bee22047b8d0c1      otherFunctions            block_exec
## 37: f7bee22047b8d0c1      otherFunctions                in_dir
## 38: f7bee22047b8d0c1      otherFunctions             timing_fn
## 39: f7bee22047b8d0c1      otherFunctions                handle
## 40: f7bee22047b8d0c1           preDigest    n:7eef4eae85fd9229
## 41: f7bee22047b8d0c1           preDigest .FUN:4f604aa46882b368
## 42: f7bee22047b8d0c1           file.size                   173
##              cacheId              tagKey              tagValue
##             createdDate
##  1: 2020-07-28 22:25:03
##  2: 2020-07-28 22:25:03
##  3: 2020-07-28 22:25:03
##  4: 2020-07-28 22:25:03
##  5: 2020-07-28 22:25:03
##  6: 2020-07-28 22:25:03
##  7: 2020-07-28 22:25:03
##  8: 2020-07-28 22:25:03
##  9: 2020-07-28 22:25:03
## 10: 2020-07-28 22:25:03
## 11: 2020-07-28 22:25:03
## 12: 2020-07-28 22:25:03
## 13: 2020-07-28 22:25:03
## 14: 2020-07-28 22:25:03
## 15: 2020-07-28 22:25:03
## 16: 2020-07-28 22:25:03
## 17: 2020-07-28 22:25:03
## 18: 2020-07-28 22:25:03
## 19: 2020-07-28 22:25:03
## 20: 2020-07-28 22:25:03
## 21: 2020-07-28 22:25:03
## 22: 2020-07-28 22:25:03
## 23: 2020-07-28 22:25:03
## 24: 2020-07-28 22:25:03
## 25: 2020-07-28 22:25:03
## 26: 2020-07-28 22:25:03
## 27: 2020-07-28 22:25:03
## 28: 2020-07-28 22:25:03
## 29: 2020-07-28 22:25:03
## 30: 2020-07-28 22:25:03
## 31: 2020-07-28 22:25:03
## 32: 2020-07-28 22:25:03
## 33: 2020-07-28 22:25:03
## 34: 2020-07-28 22:25:03
## 35: 2020-07-28 22:25:03
## 36: 2020-07-28 22:25:03
## 37: 2020-07-28 22:25:03
## 38: 2020-07-28 22:25:03
## 39: 2020-07-28 22:25:03
## 40: 2020-07-28 22:25:03
## 41: 2020-07-28 22:25:03
## 42: 2020-07-28 22:25:03
##             createdDate
showCache(tmpDir, userTags = c("^a$")) # regular expression ... "a" exactly
## Cache size:
##   Total (including Rasters):  252 bytes
##   Selected objects (not including Rasters):  252 bytes
##              cacheId              tagKey              tagValue
##  1: f7bee22047b8d0c1          objectName                     a
##  2: f7bee22047b8d0c1            function                 rnorm
##  3: f7bee22047b8d0c1               class               numeric
##  4: f7bee22047b8d0c1         object.size                  1008
##  5: f7bee22047b8d0c1            accessed   2020-07-28 22:25:03
##  6: f7bee22047b8d0c1             inCloud                 FALSE
##  7: f7bee22047b8d0c1          resultHash                      
##  8: f7bee22047b8d0c1   elapsedTimeDigest      0.002506971 secs
##  9: f7bee22047b8d0c1 elapsedTimeFirstRun                0 secs
## 10: f7bee22047b8d0c1      otherFunctions      vweave_rmarkdown
## 11: f7bee22047b8d0c1      otherFunctions          process_file
## 12: f7bee22047b8d0c1      otherFunctions         process_group
## 13: f7bee22047b8d0c1      otherFunctions   process_group.block
## 14: f7bee22047b8d0c1      otherFunctions            call_block
## 15: f7bee22047b8d0c1      otherFunctions            block_exec
## 16: f7bee22047b8d0c1      otherFunctions                in_dir
## 17: f7bee22047b8d0c1      otherFunctions             timing_fn
## 18: f7bee22047b8d0c1      otherFunctions                handle
## 19: f7bee22047b8d0c1           preDigest    n:7eef4eae85fd9229
## 20: f7bee22047b8d0c1           preDigest .FUN:4f604aa46882b368
## 21: f7bee22047b8d0c1           file.size                   173
##              cacheId              tagKey              tagValue
##             createdDate
##  1: 2020-07-28 22:25:03
##  2: 2020-07-28 22:25:03
##  3: 2020-07-28 22:25:03
##  4: 2020-07-28 22:25:03
##  5: 2020-07-28 22:25:03
##  6: 2020-07-28 22:25:03
##  7: 2020-07-28 22:25:03
##  8: 2020-07-28 22:25:03
##  9: 2020-07-28 22:25:03
## 10: 2020-07-28 22:25:03
## 11: 2020-07-28 22:25:03
## 12: 2020-07-28 22:25:03
## 13: 2020-07-28 22:25:03
## 14: 2020-07-28 22:25:03
## 15: 2020-07-28 22:25:03
## 16: 2020-07-28 22:25:03
## 17: 2020-07-28 22:25:03
## 18: 2020-07-28 22:25:03
## 19: 2020-07-28 22:25:03
## 20: 2020-07-28 22:25:03
## 21: 2020-07-28 22:25:03
##             createdDate
showCache(tmpDir, userTags = c("runif")) # show only cached objects made during runif call
## Cache size:
##   Total (including Rasters):  252 bytes
##   Selected objects (not including Rasters):  252 bytes
##              cacheId              tagKey              tagValue
##  1: 3aef38d1fc02aee5          objectName                     b
##  2: 3aef38d1fc02aee5            function                 runif
##  3: 3aef38d1fc02aee5               class               numeric
##  4: 3aef38d1fc02aee5         object.size                  1008
##  5: 3aef38d1fc02aee5            accessed   2020-07-28 22:25:03
##  6: 3aef38d1fc02aee5             inCloud                 FALSE
##  7: 3aef38d1fc02aee5          resultHash                      
##  8: 3aef38d1fc02aee5   elapsedTimeDigest      0.003181219 secs
##  9: 3aef38d1fc02aee5 elapsedTimeFirstRun                0 secs
## 10: 3aef38d1fc02aee5      otherFunctions      vweave_rmarkdown
## 11: 3aef38d1fc02aee5      otherFunctions          process_file
## 12: 3aef38d1fc02aee5      otherFunctions         process_group
## 13: 3aef38d1fc02aee5      otherFunctions   process_group.block
## 14: 3aef38d1fc02aee5      otherFunctions            call_block
## 15: 3aef38d1fc02aee5      otherFunctions            block_exec
## 16: 3aef38d1fc02aee5      otherFunctions                in_dir
## 17: 3aef38d1fc02aee5      otherFunctions             timing_fn
## 18: 3aef38d1fc02aee5      otherFunctions                handle
## 19: 3aef38d1fc02aee5           preDigest    n:7eef4eae85fd9229
## 20: 3aef38d1fc02aee5           preDigest .FUN:881ec847b7161f3c
## 21: 3aef38d1fc02aee5           file.size                   168
##              cacheId              tagKey              tagValue
##             createdDate
##  1: 2020-07-28 22:25:03
##  2: 2020-07-28 22:25:03
##  3: 2020-07-28 22:25:03
##  4: 2020-07-28 22:25:03
##  5: 2020-07-28 22:25:03
##  6: 2020-07-28 22:25:03
##  7: 2020-07-28 22:25:03
##  8: 2020-07-28 22:25:03
##  9: 2020-07-28 22:25:03
## 10: 2020-07-28 22:25:03
## 11: 2020-07-28 22:25:03
## 12: 2020-07-28 22:25:03
## 13: 2020-07-28 22:25:03
## 14: 2020-07-28 22:25:03
## 15: 2020-07-28 22:25:03
## 16: 2020-07-28 22:25:03
## 17: 2020-07-28 22:25:03
## 18: 2020-07-28 22:25:03
## 19: 2020-07-28 22:25:03
## 20: 2020-07-28 22:25:03
## 21: 2020-07-28 22:25:03
##             createdDate
clearCache(tmpDir, userTags = c("runif"), ask = FALSE) # remove only cached objects made during runif call
## Loading required namespace: googledrive
## Cache size:
##   Total (including Rasters):  252 bytes
##   Selected objects (not including Rasters):  252 bytes
showCache(tmpDir) # only those made during rnorm call
## Cache size:
##   Total (including Rasters):  804 bytes
##   Selected objects (not including Rasters):  804 bytes
##              cacheId              tagKey              tagValue
##  1: f11fb1a2880f8060            function                 rnorm
##  2: f11fb1a2880f8060               class               numeric
##  3: f11fb1a2880f8060         object.size                  1104
##  4: f11fb1a2880f8060            accessed   2020-07-28 22:25:02
##  5: f11fb1a2880f8060             inCloud                 FALSE
##  6: f11fb1a2880f8060          resultHash                      
##  7: f11fb1a2880f8060   elapsedTimeDigest      0.003908157 secs
##  8: f11fb1a2880f8060 elapsedTimeFirstRun       0.00111413 secs
##  9: f11fb1a2880f8060      otherFunctions      vweave_rmarkdown
## 10: f11fb1a2880f8060      otherFunctions          process_file
## 11: f11fb1a2880f8060      otherFunctions         process_group
## 12: f11fb1a2880f8060      otherFunctions   process_group.block
## 13: f11fb1a2880f8060      otherFunctions            call_block
## 14: f11fb1a2880f8060      otherFunctions            block_exec
## 15: f11fb1a2880f8060      otherFunctions                in_dir
## 16: f11fb1a2880f8060      otherFunctions             timing_fn
## 17: f11fb1a2880f8060      otherFunctions                handle
## 18: f11fb1a2880f8060           preDigest    n:c5775c3b366fb719
## 19: f11fb1a2880f8060           preDigest mean:15620f138033a66c
## 20: f11fb1a2880f8060           preDigest .FUN:4f604aa46882b368
## 21: f11fb1a2880f8060           file.size                   223
## 22: f11fb1a2880f8060            accessed   2020-07-28 22:25:02
## 23: f11fb1a2880f8060     elapsedTimeLoad       0.01859307 secs
## 24: f11fb1a2880f8060            accessed   2020-07-28 22:25:02
## 25: f11fb1a2880f8060            accessed   2020-07-28 22:25:02
## 26: c16f0e2c57596069            function 'rnorm' pipe sequence
## 27: c16f0e2c57596069               class               numeric
## 28: c16f0e2c57596069         object.size                  1104
## 29: c16f0e2c57596069            accessed   2020-07-28 22:25:02
## 30: c16f0e2c57596069             inCloud                 FALSE
## 31: c16f0e2c57596069          resultHash                      
## 32: c16f0e2c57596069   elapsedTimeDigest      0.003791094 secs
## 33: c16f0e2c57596069 elapsedTimeFirstRun                0 secs
## 34: c16f0e2c57596069      otherFunctions      vweave_rmarkdown
## 35: c16f0e2c57596069      otherFunctions          process_file
## 36: c16f0e2c57596069      otherFunctions         process_group
## 37: c16f0e2c57596069      otherFunctions   process_group.block
## 38: c16f0e2c57596069      otherFunctions            call_block
## 39: c16f0e2c57596069      otherFunctions            block_exec
## 40: c16f0e2c57596069      otherFunctions                in_dir
## 41: c16f0e2c57596069      otherFunctions             timing_fn
## 42: c16f0e2c57596069      otherFunctions                handle
## 43: c16f0e2c57596069      otherFunctions                   %C%
## 44: c16f0e2c57596069      otherFunctions               do.call
## 45: c16f0e2c57596069           preDigest    n:c5775c3b366fb719
## 46: c16f0e2c57596069           preDigest mean:152602b8ff81e5bb
## 47: c16f0e2c57596069           preDigest .FUN:4f604aa46882b368
## 48: c16f0e2c57596069           file.size                   224
## 49: f7bee22047b8d0c1          objectName                     a
## 50: f7bee22047b8d0c1            function                 rnorm
## 51: f7bee22047b8d0c1               class               numeric
## 52: f7bee22047b8d0c1         object.size                  1008
## 53: f7bee22047b8d0c1            accessed   2020-07-28 22:25:03
## 54: f7bee22047b8d0c1             inCloud                 FALSE
## 55: f7bee22047b8d0c1          resultHash                      
## 56: f7bee22047b8d0c1   elapsedTimeDigest      0.002506971 secs
## 57: f7bee22047b8d0c1 elapsedTimeFirstRun                0 secs
## 58: f7bee22047b8d0c1      otherFunctions      vweave_rmarkdown
## 59: f7bee22047b8d0c1      otherFunctions          process_file
## 60: f7bee22047b8d0c1      otherFunctions         process_group
## 61: f7bee22047b8d0c1      otherFunctions   process_group.block
## 62: f7bee22047b8d0c1      otherFunctions            call_block
## 63: f7bee22047b8d0c1      otherFunctions            block_exec
## 64: f7bee22047b8d0c1      otherFunctions                in_dir
## 65: f7bee22047b8d0c1      otherFunctions             timing_fn
## 66: f7bee22047b8d0c1      otherFunctions                handle
## 67: f7bee22047b8d0c1           preDigest    n:7eef4eae85fd9229
## 68: f7bee22047b8d0c1           preDigest .FUN:4f604aa46882b368
## 69: f7bee22047b8d0c1           file.size                   173
##              cacheId              tagKey              tagValue
##             createdDate
##  1: 2020-07-28 22:25:02
##  2: 2020-07-28 22:25:02
##  3: 2020-07-28 22:25:02
##  4: 2020-07-28 22:25:02
##  5: 2020-07-28 22:25:02
##  6: 2020-07-28 22:25:02
##  7: 2020-07-28 22:25:02
##  8: 2020-07-28 22:25:02
##  9: 2020-07-28 22:25:02
## 10: 2020-07-28 22:25:02
## 11: 2020-07-28 22:25:02
## 12: 2020-07-28 22:25:02
## 13: 2020-07-28 22:25:02
## 14: 2020-07-28 22:25:02
## 15: 2020-07-28 22:25:02
## 16: 2020-07-28 22:25:02
## 17: 2020-07-28 22:25:02
## 18: 2020-07-28 22:25:02
## 19: 2020-07-28 22:25:02
## 20: 2020-07-28 22:25:02
## 21: 2020-07-28 22:25:02
## 22: 2020-07-28 22:25:02
## 23: 2020-07-28 22:25:02
## 24: 2020-07-28 22:25:02
## 25: 2020-07-28 22:25:02
## 26: 2020-07-28 22:25:02
## 27: 2020-07-28 22:25:02
## 28: 2020-07-28 22:25:02
## 29: 2020-07-28 22:25:02
## 30: 2020-07-28 22:25:02
## 31: 2020-07-28 22:25:02
## 32: 2020-07-28 22:25:02
## 33: 2020-07-28 22:25:02
## 34: 2020-07-28 22:25:02
## 35: 2020-07-28 22:25:02
## 36: 2020-07-28 22:25:02
## 37: 2020-07-28 22:25:02
## 38: 2020-07-28 22:25:02
## 39: 2020-07-28 22:25:02
## 40: 2020-07-28 22:25:02
## 41: 2020-07-28 22:25:02
## 42: 2020-07-28 22:25:02
## 43: 2020-07-28 22:25:02
## 44: 2020-07-28 22:25:02
## 45: 2020-07-28 22:25:02
## 46: 2020-07-28 22:25:02
## 47: 2020-07-28 22:25:02
## 48: 2020-07-28 22:25:02
## 49: 2020-07-28 22:25:03
## 50: 2020-07-28 22:25:03
## 51: 2020-07-28 22:25:03
## 52: 2020-07-28 22:25:03
## 53: 2020-07-28 22:25:03
## 54: 2020-07-28 22:25:03
## 55: 2020-07-28 22:25:03
## 56: 2020-07-28 22:25:03
## 57: 2020-07-28 22:25:03
## 58: 2020-07-28 22:25:03
## 59: 2020-07-28 22:25:03
## 60: 2020-07-28 22:25:03
## 61: 2020-07-28 22:25:03
## 62: 2020-07-28 22:25:03
## 63: 2020-07-28 22:25:03
## 64: 2020-07-28 22:25:03
## 65: 2020-07-28 22:25:03
## 66: 2020-07-28 22:25:03
## 67: 2020-07-28 22:25:03
## 68: 2020-07-28 22:25:03
## 69: 2020-07-28 22:25:03
##             createdDate
clearCache(tmpDir, ask = FALSE)

1.5 Example 2: using the “accessed” tag

ranNumsA <- Cache(rnorm, 4, cacheRepo = tmpDir, userTags = "objectName:a")
ranNumsB <- Cache(runif, 4, cacheRepo = tmpDir, userTags = "objectName:b")

# access it again, from Cache
Sys.sleep(1)
ranNumsA <- Cache(rnorm, 4, cacheRepo = tmpDir, userTags = "objectName:a")
##   ...(Object to retrieve (f7bee22047b8d0c1.rds))
##      loaded cached result from previous rnorm call,
wholeCache <- showCache(tmpDir)
## Cache size:
##   Total (including Rasters):  504 bytes
##   Selected objects (not including Rasters):  504 bytes
# keep only items accessed "recently" (i.e., only objectName:a)
onlyRecentlyAccessed <- showCache(tmpDir, userTags = max(wholeCache[tagKey == "accessed"]$tagValue))
## Cache size:
##   Total (including Rasters):  252 bytes
##   Selected objects (not including Rasters):  252 bytes
# inverse join with 2 data.tables ... using: a[!b]
# i.e., return all of wholeCache that was not recently accessed
#   Note: the two different ways to access -- old way with "artifact" will be deprecated
toRemove <- unique(wholeCache[!onlyRecentlyAccessed, on = "cacheId"], by = "cacheId")$cacheId
clearCache(tmpDir, toRemove, ask = FALSE) # remove ones not recently accessed
## Cache size:
##   Total (including Rasters):  252 bytes
##   Selected objects (not including Rasters):  252 bytes
showCache(tmpDir) # still has more recently accessed
## Cache size:
##   Total (including Rasters):  252 bytes
##   Selected objects (not including Rasters):  252 bytes
##              cacheId              tagKey              tagValue
##  1: f7bee22047b8d0c1          objectName                     a
##  2: f7bee22047b8d0c1            function                 rnorm
##  3: f7bee22047b8d0c1               class               numeric
##  4: f7bee22047b8d0c1         object.size                  1008
##  5: f7bee22047b8d0c1            accessed   2020-07-28 22:25:04
##  6: f7bee22047b8d0c1             inCloud                 FALSE
##  7: f7bee22047b8d0c1          resultHash                      
##  8: f7bee22047b8d0c1   elapsedTimeDigest      0.002066851 secs
##  9: f7bee22047b8d0c1 elapsedTimeFirstRun                0 secs
## 10: f7bee22047b8d0c1      otherFunctions      vweave_rmarkdown
## 11: f7bee22047b8d0c1      otherFunctions          process_file
## 12: f7bee22047b8d0c1      otherFunctions         process_group
## 13: f7bee22047b8d0c1      otherFunctions   process_group.block
## 14: f7bee22047b8d0c1      otherFunctions            call_block
## 15: f7bee22047b8d0c1      otherFunctions            block_exec
## 16: f7bee22047b8d0c1      otherFunctions                in_dir
## 17: f7bee22047b8d0c1      otherFunctions             timing_fn
## 18: f7bee22047b8d0c1      otherFunctions                handle
## 19: f7bee22047b8d0c1           preDigest    n:7eef4eae85fd9229
## 20: f7bee22047b8d0c1           preDigest .FUN:4f604aa46882b368
## 21: f7bee22047b8d0c1           file.size                   174
## 22: f7bee22047b8d0c1            accessed   2020-07-28 22:25:05
## 23: f7bee22047b8d0c1     elapsedTimeLoad       0.02205992 secs
##              cacheId              tagKey              tagValue
##             createdDate
##  1: 2020-07-28 22:25:04
##  2: 2020-07-28 22:25:04
##  3: 2020-07-28 22:25:04
##  4: 2020-07-28 22:25:04
##  5: 2020-07-28 22:25:04
##  6: 2020-07-28 22:25:04
##  7: 2020-07-28 22:25:04
##  8: 2020-07-28 22:25:04
##  9: 2020-07-28 22:25:04
## 10: 2020-07-28 22:25:04
## 11: 2020-07-28 22:25:04
## 12: 2020-07-28 22:25:04
## 13: 2020-07-28 22:25:04
## 14: 2020-07-28 22:25:04
## 15: 2020-07-28 22:25:04
## 16: 2020-07-28 22:25:04
## 17: 2020-07-28 22:25:04
## 18: 2020-07-28 22:25:04
## 19: 2020-07-28 22:25:04
## 20: 2020-07-28 22:25:04
## 21: 2020-07-28 22:25:04
## 22: 2020-07-28 22:25:05
## 23: 2020-07-28 22:25:05
##             createdDate

1.6 Example 3: using keepCache

ranNumsA <- Cache(rnorm, 4, cacheRepo = tmpDir, userTags = "objectName:a")
##   ...(Object to retrieve (f7bee22047b8d0c1.rds))
##      loaded cached result from previous rnorm call,
ranNumsB <- Cache(runif, 4, cacheRepo = tmpDir, userTags = "objectName:b")

# keep only those cached items from the last 24 hours
oneDay <- 60 * 60 * 24
keepCache(tmpDir, after = Sys.time() - oneDay, ask = FALSE)
## Cache size:
##   Total (including Rasters):  504 bytes
##   Selected objects (not including Rasters):  504 bytes
##              cacheId              tagKey              tagValue
##  1: f7bee22047b8d0c1          objectName                     a
##  2: f7bee22047b8d0c1            function                 rnorm
##  3: f7bee22047b8d0c1               class               numeric
##  4: f7bee22047b8d0c1         object.size                  1008
##  5: f7bee22047b8d0c1            accessed   2020-07-28 22:25:04
##  6: f7bee22047b8d0c1             inCloud                 FALSE
##  7: f7bee22047b8d0c1          resultHash                      
##  8: f7bee22047b8d0c1   elapsedTimeDigest      0.002066851 secs
##  9: f7bee22047b8d0c1 elapsedTimeFirstRun                0 secs
## 10: f7bee22047b8d0c1      otherFunctions      vweave_rmarkdown
## 11: f7bee22047b8d0c1      otherFunctions          process_file
## 12: f7bee22047b8d0c1      otherFunctions         process_group
## 13: f7bee22047b8d0c1      otherFunctions   process_group.block
## 14: f7bee22047b8d0c1      otherFunctions            call_block
## 15: f7bee22047b8d0c1      otherFunctions            block_exec
## 16: f7bee22047b8d0c1      otherFunctions                in_dir
## 17: f7bee22047b8d0c1      otherFunctions             timing_fn
## 18: f7bee22047b8d0c1      otherFunctions                handle
## 19: f7bee22047b8d0c1           preDigest    n:7eef4eae85fd9229
## 20: f7bee22047b8d0c1           preDigest .FUN:4f604aa46882b368
## 21: f7bee22047b8d0c1           file.size                   174
## 22: f7bee22047b8d0c1            accessed   2020-07-28 22:25:05
## 23: f7bee22047b8d0c1     elapsedTimeLoad       0.01604104 secs
## 24: f7bee22047b8d0c1            accessed   2020-07-28 22:25:06
## 25: 3aef38d1fc02aee5          objectName                     b
## 26: 3aef38d1fc02aee5            function                 runif
## 27: 3aef38d1fc02aee5               class               numeric
## 28: 3aef38d1fc02aee5         object.size                  1008
## 29: 3aef38d1fc02aee5            accessed   2020-07-28 22:25:06
## 30: 3aef38d1fc02aee5             inCloud                 FALSE
## 31: 3aef38d1fc02aee5          resultHash                      
## 32: 3aef38d1fc02aee5   elapsedTimeDigest      0.002850056 secs
## 33: 3aef38d1fc02aee5 elapsedTimeFirstRun                0 secs
## 34: 3aef38d1fc02aee5      otherFunctions      vweave_rmarkdown
## 35: 3aef38d1fc02aee5      otherFunctions          process_file
## 36: 3aef38d1fc02aee5      otherFunctions         process_group
## 37: 3aef38d1fc02aee5      otherFunctions   process_group.block
## 38: 3aef38d1fc02aee5      otherFunctions            call_block
## 39: 3aef38d1fc02aee5      otherFunctions            block_exec
## 40: 3aef38d1fc02aee5      otherFunctions                in_dir
## 41: 3aef38d1fc02aee5      otherFunctions             timing_fn
## 42: 3aef38d1fc02aee5      otherFunctions                handle
## 43: 3aef38d1fc02aee5           preDigest    n:7eef4eae85fd9229
## 44: 3aef38d1fc02aee5           preDigest .FUN:881ec847b7161f3c
## 45: 3aef38d1fc02aee5           file.size                   168
##              cacheId              tagKey              tagValue
##             createdDate
##  1: 2020-07-28 22:25:04
##  2: 2020-07-28 22:25:04
##  3: 2020-07-28 22:25:04
##  4: 2020-07-28 22:25:04
##  5: 2020-07-28 22:25:04
##  6: 2020-07-28 22:25:04
##  7: 2020-07-28 22:25:04
##  8: 2020-07-28 22:25:04
##  9: 2020-07-28 22:25:04
## 10: 2020-07-28 22:25:04
## 11: 2020-07-28 22:25:04
## 12: 2020-07-28 22:25:04
## 13: 2020-07-28 22:25:04
## 14: 2020-07-28 22:25:04
## 15: 2020-07-28 22:25:04
## 16: 2020-07-28 22:25:04
## 17: 2020-07-28 22:25:04
## 18: 2020-07-28 22:25:04
## 19: 2020-07-28 22:25:04
## 20: 2020-07-28 22:25:04
## 21: 2020-07-28 22:25:04
## 22: 2020-07-28 22:25:05
## 23: 2020-07-28 22:25:05
## 24: 2020-07-28 22:25:06
## 25: 2020-07-28 22:25:06
## 26: 2020-07-28 22:25:06
## 27: 2020-07-28 22:25:06
## 28: 2020-07-28 22:25:06
## 29: 2020-07-28 22:25:06
## 30: 2020-07-28 22:25:06
## 31: 2020-07-28 22:25:06
## 32: 2020-07-28 22:25:06
## 33: 2020-07-28 22:25:06
## 34: 2020-07-28 22:25:06
## 35: 2020-07-28 22:25:06
## 36: 2020-07-28 22:25:06
## 37: 2020-07-28 22:25:06
## 38: 2020-07-28 22:25:06
## 39: 2020-07-28 22:25:06
## 40: 2020-07-28 22:25:06
## 41: 2020-07-28 22:25:06
## 42: 2020-07-28 22:25:06
## 43: 2020-07-28 22:25:06
## 44: 2020-07-28 22:25:06
## 45: 2020-07-28 22:25:06
##             createdDate
# Keep all Cache items created with an rnorm() call
keepCache(tmpDir, userTags = "rnorm", ask = FALSE)
## Cache size:
##   Total (including Rasters):  252 bytes
##   Selected objects (not including Rasters):  252 bytes
##              cacheId              tagKey              tagValue
##  1: f7bee22047b8d0c1          objectName                     a
##  2: f7bee22047b8d0c1            function                 rnorm
##  3: f7bee22047b8d0c1               class               numeric
##  4: f7bee22047b8d0c1         object.size                  1008
##  5: f7bee22047b8d0c1            accessed   2020-07-28 22:25:04
##  6: f7bee22047b8d0c1             inCloud                 FALSE
##  7: f7bee22047b8d0c1          resultHash                      
##  8: f7bee22047b8d0c1   elapsedTimeDigest      0.002066851 secs
##  9: f7bee22047b8d0c1 elapsedTimeFirstRun                0 secs
## 10: f7bee22047b8d0c1      otherFunctions      vweave_rmarkdown
## 11: f7bee22047b8d0c1      otherFunctions          process_file
## 12: f7bee22047b8d0c1      otherFunctions         process_group
## 13: f7bee22047b8d0c1      otherFunctions   process_group.block
## 14: f7bee22047b8d0c1      otherFunctions            call_block
## 15: f7bee22047b8d0c1      otherFunctions            block_exec
## 16: f7bee22047b8d0c1      otherFunctions                in_dir
## 17: f7bee22047b8d0c1      otherFunctions             timing_fn
## 18: f7bee22047b8d0c1      otherFunctions                handle
## 19: f7bee22047b8d0c1           preDigest    n:7eef4eae85fd9229
## 20: f7bee22047b8d0c1           preDigest .FUN:4f604aa46882b368
## 21: f7bee22047b8d0c1           file.size                   174
## 22: f7bee22047b8d0c1            accessed   2020-07-28 22:25:05
## 23: f7bee22047b8d0c1     elapsedTimeLoad       0.01604104 secs
## 24: f7bee22047b8d0c1            accessed   2020-07-28 22:25:06
##              cacheId              tagKey              tagValue
##             createdDate
##  1: 2020-07-28 22:25:04
##  2: 2020-07-28 22:25:04
##  3: 2020-07-28 22:25:04
##  4: 2020-07-28 22:25:04
##  5: 2020-07-28 22:25:04
##  6: 2020-07-28 22:25:04
##  7: 2020-07-28 22:25:04
##  8: 2020-07-28 22:25:04
##  9: 2020-07-28 22:25:04
## 10: 2020-07-28 22:25:04
## 11: 2020-07-28 22:25:04
## 12: 2020-07-28 22:25:04
## 13: 2020-07-28 22:25:04
## 14: 2020-07-28 22:25:04
## 15: 2020-07-28 22:25:04
## 16: 2020-07-28 22:25:04
## 17: 2020-07-28 22:25:04
## 18: 2020-07-28 22:25:04
## 19: 2020-07-28 22:25:04
## 20: 2020-07-28 22:25:04
## 21: 2020-07-28 22:25:04
## 22: 2020-07-28 22:25:05
## 23: 2020-07-28 22:25:05
## 24: 2020-07-28 22:25:06
##             createdDate
# Remove all Cache items that happened within a rnorm() call
clearCache(tmpDir, userTags = "rnorm", ask = FALSE)
## Cache size:
##   Total (including Rasters):  252 bytes
##   Selected objects (not including Rasters):  252 bytes
showCache(tmpDir) ## empty
## Cache size:
##   Total (including Rasters):  0 bytes
##   Selected objects (not including Rasters):  0 bytes
## Empty data.table (0 rows and 4 cols): cacheId,tagKey,tagValue,createdDate
# Also, can set a time before caching happens and remove based on this
#  --> a useful, simple way to control Cache
ranNumsA <- Cache(rnorm, 4, cacheRepo = tmpDir, userTags = "objectName:a")
startTime <- Sys.time()
Sys.sleep(1)
ranNumsB <- Cache(rnorm, 5, cacheRepo = tmpDir, userTags = "objectName:b")
keepCache(tmpDir, after = startTime, ask = FALSE) # keep only those newer than startTime
## Cache size:
##   Total (including Rasters):  256 bytes
##   Selected objects (not including Rasters):  256 bytes
##              cacheId              tagKey              tagValue
##  1: 142b4176fe87d51d          objectName                     b
##  2: 142b4176fe87d51d            function                 rnorm
##  3: 142b4176fe87d51d               class               numeric
##  4: 142b4176fe87d51d         object.size                  1024
##  5: 142b4176fe87d51d            accessed   2020-07-28 22:25:07
##  6: 142b4176fe87d51d             inCloud                 FALSE
##  7: 142b4176fe87d51d          resultHash                      
##  8: 142b4176fe87d51d   elapsedTimeDigest      0.003008127 secs
##  9: 142b4176fe87d51d elapsedTimeFirstRun                0 secs
## 10: 142b4176fe87d51d      otherFunctions      vweave_rmarkdown
## 11: 142b4176fe87d51d      otherFunctions          process_file
## 12: 142b4176fe87d51d      otherFunctions         process_group
## 13: 142b4176fe87d51d      otherFunctions   process_group.block
## 14: 142b4176fe87d51d      otherFunctions            call_block
## 15: 142b4176fe87d51d      otherFunctions            block_exec
## 16: 142b4176fe87d51d      otherFunctions                in_dir
## 17: 142b4176fe87d51d      otherFunctions             timing_fn
## 18: 142b4176fe87d51d      otherFunctions                handle
## 19: 142b4176fe87d51d           preDigest    n:a4f076b3db622faf
## 20: 142b4176fe87d51d           preDigest .FUN:4f604aa46882b368
## 21: 142b4176fe87d51d           file.size                   183
##              cacheId              tagKey              tagValue
##             createdDate
##  1: 2020-07-28 22:25:07
##  2: 2020-07-28 22:25:07
##  3: 2020-07-28 22:25:07
##  4: 2020-07-28 22:25:07
##  5: 2020-07-28 22:25:07
##  6: 2020-07-28 22:25:07
##  7: 2020-07-28 22:25:07
##  8: 2020-07-28 22:25:07
##  9: 2020-07-28 22:25:07
## 10: 2020-07-28 22:25:07
## 11: 2020-07-28 22:25:07
## 12: 2020-07-28 22:25:07
## 13: 2020-07-28 22:25:07
## 14: 2020-07-28 22:25:07
## 15: 2020-07-28 22:25:07
## 16: 2020-07-28 22:25:07
## 17: 2020-07-28 22:25:07
## 18: 2020-07-28 22:25:07
## 19: 2020-07-28 22:25:07
## 20: 2020-07-28 22:25:07
## 21: 2020-07-28 22:25:07
##             createdDate
clearCache(tmpDir, ask = FALSE)

1.7 Example 4: searching for multiple objects in the cache

# default userTags is "and" matching; for "or" matching use |
ranNumsA <- Cache(runif, 4, cacheRepo = tmpDir, userTags = "objectName:a")
ranNumsB <- Cache(rnorm, 4, cacheRepo = tmpDir, userTags = "objectName:b")

# show all objects (runif and rnorm in this case)
showCache(tmpDir)
## Cache size:
##   Total (including Rasters):  504 bytes
##   Selected objects (not including Rasters):  504 bytes
##              cacheId              tagKey              tagValue
##  1: 3aef38d1fc02aee5          objectName                     a
##  2: 3aef38d1fc02aee5            function                 runif
##  3: 3aef38d1fc02aee5               class               numeric
##  4: 3aef38d1fc02aee5         object.size                  1008
##  5: 3aef38d1fc02aee5            accessed   2020-07-28 22:25:08
##  6: 3aef38d1fc02aee5             inCloud                 FALSE
##  7: 3aef38d1fc02aee5          resultHash                      
##  8: 3aef38d1fc02aee5   elapsedTimeDigest      0.002007008 secs
##  9: 3aef38d1fc02aee5 elapsedTimeFirstRun                0 secs
## 10: 3aef38d1fc02aee5      otherFunctions      vweave_rmarkdown
## 11: 3aef38d1fc02aee5      otherFunctions          process_file
## 12: 3aef38d1fc02aee5      otherFunctions         process_group
## 13: 3aef38d1fc02aee5      otherFunctions   process_group.block
## 14: 3aef38d1fc02aee5      otherFunctions            call_block
## 15: 3aef38d1fc02aee5      otherFunctions            block_exec
## 16: 3aef38d1fc02aee5      otherFunctions                in_dir
## 17: 3aef38d1fc02aee5      otherFunctions             timing_fn
## 18: 3aef38d1fc02aee5      otherFunctions                handle
## 19: 3aef38d1fc02aee5           preDigest    n:7eef4eae85fd9229
## 20: 3aef38d1fc02aee5           preDigest .FUN:881ec847b7161f3c
## 21: 3aef38d1fc02aee5           file.size                   167
## 22: f7bee22047b8d0c1          objectName                     b
## 23: f7bee22047b8d0c1            function                 rnorm
## 24: f7bee22047b8d0c1               class               numeric
## 25: f7bee22047b8d0c1         object.size                  1008
## 26: f7bee22047b8d0c1            accessed   2020-07-28 22:25:08
## 27: f7bee22047b8d0c1             inCloud                 FALSE
## 28: f7bee22047b8d0c1          resultHash                      
## 29: f7bee22047b8d0c1   elapsedTimeDigest      0.002909899 secs
## 30: f7bee22047b8d0c1 elapsedTimeFirstRun                0 secs
## 31: f7bee22047b8d0c1      otherFunctions      vweave_rmarkdown
## 32: f7bee22047b8d0c1      otherFunctions          process_file
## 33: f7bee22047b8d0c1      otherFunctions         process_group
## 34: f7bee22047b8d0c1      otherFunctions   process_group.block
## 35: f7bee22047b8d0c1      otherFunctions            call_block
## 36: f7bee22047b8d0c1      otherFunctions            block_exec
## 37: f7bee22047b8d0c1      otherFunctions                in_dir
## 38: f7bee22047b8d0c1      otherFunctions             timing_fn
## 39: f7bee22047b8d0c1      otherFunctions                handle
## 40: f7bee22047b8d0c1           preDigest    n:7eef4eae85fd9229
## 41: f7bee22047b8d0c1           preDigest .FUN:4f604aa46882b368
## 42: f7bee22047b8d0c1           file.size                   174
##              cacheId              tagKey              tagValue
##             createdDate
##  1: 2020-07-28 22:25:08
##  2: 2020-07-28 22:25:08
##  3: 2020-07-28 22:25:08
##  4: 2020-07-28 22:25:08
##  5: 2020-07-28 22:25:08
##  6: 2020-07-28 22:25:08
##  7: 2020-07-28 22:25:08
##  8: 2020-07-28 22:25:08
##  9: 2020-07-28 22:25:08
## 10: 2020-07-28 22:25:08
## 11: 2020-07-28 22:25:08
## 12: 2020-07-28 22:25:08
## 13: 2020-07-28 22:25:08
## 14: 2020-07-28 22:25:08
## 15: 2020-07-28 22:25:08
## 16: 2020-07-28 22:25:08
## 17: 2020-07-28 22:25:08
## 18: 2020-07-28 22:25:08
## 19: 2020-07-28 22:25:08
## 20: 2020-07-28 22:25:08
## 21: 2020-07-28 22:25:08
## 22: 2020-07-28 22:25:08
## 23: 2020-07-28 22:25:08
## 24: 2020-07-28 22:25:08
## 25: 2020-07-28 22:25:08
## 26: 2020-07-28 22:25:08
## 27: 2020-07-28 22:25:08
## 28: 2020-07-28 22:25:08
## 29: 2020-07-28 22:25:08
## 30: 2020-07-28 22:25:08
## 31: 2020-07-28 22:25:08
## 32: 2020-07-28 22:25:08
## 33: 2020-07-28 22:25:08
## 34: 2020-07-28 22:25:08
## 35: 2020-07-28 22:25:08
## 36: 2020-07-28 22:25:08
## 37: 2020-07-28 22:25:08
## 38: 2020-07-28 22:25:08
## 39: 2020-07-28 22:25:08
## 40: 2020-07-28 22:25:08
## 41: 2020-07-28 22:25:08
## 42: 2020-07-28 22:25:08
##             createdDate
# show objects that are both runif and rnorm
# (i.e., none in this case, because objecs are either or, not both)
showCache(tmpDir, userTags = c("runif", "rnorm")) ## empty
## Cache size:
##   Total (including Rasters):  0 bytes
##   Selected objects (not including Rasters):  0 bytes
## Empty data.table (0 rows and 4 cols): cacheId,tagKey,tagValue,createdDate
# show objects that are either runif or rnorm ("or" search)
showCache(tmpDir, userTags = "runif|rnorm")
## Cache size:
##   Total (including Rasters):  504 bytes
##   Selected objects (not including Rasters):  504 bytes
##              cacheId              tagKey              tagValue
##  1: 3aef38d1fc02aee5          objectName                     a
##  2: 3aef38d1fc02aee5            function                 runif
##  3: 3aef38d1fc02aee5               class               numeric
##  4: 3aef38d1fc02aee5         object.size                  1008
##  5: 3aef38d1fc02aee5            accessed   2020-07-28 22:25:08
##  6: 3aef38d1fc02aee5             inCloud                 FALSE
##  7: 3aef38d1fc02aee5          resultHash                      
##  8: 3aef38d1fc02aee5   elapsedTimeDigest      0.002007008 secs
##  9: 3aef38d1fc02aee5 elapsedTimeFirstRun                0 secs
## 10: 3aef38d1fc02aee5      otherFunctions      vweave_rmarkdown
## 11: 3aef38d1fc02aee5      otherFunctions          process_file
## 12: 3aef38d1fc02aee5      otherFunctions         process_group
## 13: 3aef38d1fc02aee5      otherFunctions   process_group.block
## 14: 3aef38d1fc02aee5      otherFunctions            call_block
## 15: 3aef38d1fc02aee5      otherFunctions            block_exec
## 16: 3aef38d1fc02aee5      otherFunctions                in_dir
## 17: 3aef38d1fc02aee5      otherFunctions             timing_fn
## 18: 3aef38d1fc02aee5      otherFunctions                handle
## 19: 3aef38d1fc02aee5           preDigest    n:7eef4eae85fd9229
## 20: 3aef38d1fc02aee5           preDigest .FUN:881ec847b7161f3c
## 21: 3aef38d1fc02aee5           file.size                   167
## 22: f7bee22047b8d0c1          objectName                     b
## 23: f7bee22047b8d0c1            function                 rnorm
## 24: f7bee22047b8d0c1               class               numeric
## 25: f7bee22047b8d0c1         object.size                  1008
## 26: f7bee22047b8d0c1            accessed   2020-07-28 22:25:08
## 27: f7bee22047b8d0c1             inCloud                 FALSE
## 28: f7bee22047b8d0c1          resultHash                      
## 29: f7bee22047b8d0c1   elapsedTimeDigest      0.002909899 secs
## 30: f7bee22047b8d0c1 elapsedTimeFirstRun                0 secs
## 31: f7bee22047b8d0c1      otherFunctions      vweave_rmarkdown
## 32: f7bee22047b8d0c1      otherFunctions          process_file
## 33: f7bee22047b8d0c1      otherFunctions         process_group
## 34: f7bee22047b8d0c1      otherFunctions   process_group.block
## 35: f7bee22047b8d0c1      otherFunctions            call_block
## 36: f7bee22047b8d0c1      otherFunctions            block_exec
## 37: f7bee22047b8d0c1      otherFunctions                in_dir
## 38: f7bee22047b8d0c1      otherFunctions             timing_fn
## 39: f7bee22047b8d0c1      otherFunctions                handle
## 40: f7bee22047b8d0c1           preDigest    n:7eef4eae85fd9229
## 41: f7bee22047b8d0c1           preDigest .FUN:4f604aa46882b368
## 42: f7bee22047b8d0c1           file.size                   174
##              cacheId              tagKey              tagValue
##             createdDate
##  1: 2020-07-28 22:25:08
##  2: 2020-07-28 22:25:08
##  3: 2020-07-28 22:25:08
##  4: 2020-07-28 22:25:08
##  5: 2020-07-28 22:25:08
##  6: 2020-07-28 22:25:08
##  7: 2020-07-28 22:25:08
##  8: 2020-07-28 22:25:08
##  9: 2020-07-28 22:25:08
## 10: 2020-07-28 22:25:08
## 11: 2020-07-28 22:25:08
## 12: 2020-07-28 22:25:08
## 13: 2020-07-28 22:25:08
## 14: 2020-07-28 22:25:08
## 15: 2020-07-28 22:25:08
## 16: 2020-07-28 22:25:08
## 17: 2020-07-28 22:25:08
## 18: 2020-07-28 22:25:08
## 19: 2020-07-28 22:25:08
## 20: 2020-07-28 22:25:08
## 21: 2020-07-28 22:25:08
## 22: 2020-07-28 22:25:08
## 23: 2020-07-28 22:25:08
## 24: 2020-07-28 22:25:08
## 25: 2020-07-28 22:25:08
## 26: 2020-07-28 22:25:08
## 27: 2020-07-28 22:25:08
## 28: 2020-07-28 22:25:08
## 29: 2020-07-28 22:25:08
## 30: 2020-07-28 22:25:08
## 31: 2020-07-28 22:25:08
## 32: 2020-07-28 22:25:08
## 33: 2020-07-28 22:25:08
## 34: 2020-07-28 22:25:08
## 35: 2020-07-28 22:25:08
## 36: 2020-07-28 22:25:08
## 37: 2020-07-28 22:25:08
## 38: 2020-07-28 22:25:08
## 39: 2020-07-28 22:25:08
## 40: 2020-07-28 22:25:08
## 41: 2020-07-28 22:25:08
## 42: 2020-07-28 22:25:08
##             createdDate
# keep only objects that are either runif or rnorm ("or" search)
keepCache(tmpDir, userTags = "runif|rnorm", ask = FALSE)
## Cache size:
##   Total (including Rasters):  504 bytes
##   Selected objects (not including Rasters):  504 bytes
##              cacheId              tagKey              tagValue
##  1: 3aef38d1fc02aee5          objectName                     a
##  2: 3aef38d1fc02aee5            function                 runif
##  3: 3aef38d1fc02aee5               class               numeric
##  4: 3aef38d1fc02aee5         object.size                  1008
##  5: 3aef38d1fc02aee5            accessed   2020-07-28 22:25:08
##  6: 3aef38d1fc02aee5             inCloud                 FALSE
##  7: 3aef38d1fc02aee5          resultHash                      
##  8: 3aef38d1fc02aee5   elapsedTimeDigest      0.002007008 secs
##  9: 3aef38d1fc02aee5 elapsedTimeFirstRun                0 secs
## 10: 3aef38d1fc02aee5      otherFunctions      vweave_rmarkdown
## 11: 3aef38d1fc02aee5      otherFunctions          process_file
## 12: 3aef38d1fc02aee5      otherFunctions         process_group
## 13: 3aef38d1fc02aee5      otherFunctions   process_group.block
## 14: 3aef38d1fc02aee5      otherFunctions            call_block
## 15: 3aef38d1fc02aee5      otherFunctions            block_exec
## 16: 3aef38d1fc02aee5      otherFunctions                in_dir
## 17: 3aef38d1fc02aee5      otherFunctions             timing_fn
## 18: 3aef38d1fc02aee5      otherFunctions                handle
## 19: 3aef38d1fc02aee5           preDigest    n:7eef4eae85fd9229
## 20: 3aef38d1fc02aee5           preDigest .FUN:881ec847b7161f3c
## 21: 3aef38d1fc02aee5           file.size                   167
## 22: f7bee22047b8d0c1          objectName                     b
## 23: f7bee22047b8d0c1            function                 rnorm
## 24: f7bee22047b8d0c1               class               numeric
## 25: f7bee22047b8d0c1         object.size                  1008
## 26: f7bee22047b8d0c1            accessed   2020-07-28 22:25:08
## 27: f7bee22047b8d0c1             inCloud                 FALSE
## 28: f7bee22047b8d0c1          resultHash                      
## 29: f7bee22047b8d0c1   elapsedTimeDigest      0.002909899 secs
## 30: f7bee22047b8d0c1 elapsedTimeFirstRun                0 secs
## 31: f7bee22047b8d0c1      otherFunctions      vweave_rmarkdown
## 32: f7bee22047b8d0c1      otherFunctions          process_file
## 33: f7bee22047b8d0c1      otherFunctions         process_group
## 34: f7bee22047b8d0c1      otherFunctions   process_group.block
## 35: f7bee22047b8d0c1      otherFunctions            call_block
## 36: f7bee22047b8d0c1      otherFunctions            block_exec
## 37: f7bee22047b8d0c1      otherFunctions                in_dir
## 38: f7bee22047b8d0c1      otherFunctions             timing_fn
## 39: f7bee22047b8d0c1      otherFunctions                handle
## 40: f7bee22047b8d0c1           preDigest    n:7eef4eae85fd9229
## 41: f7bee22047b8d0c1           preDigest .FUN:4f604aa46882b368
## 42: f7bee22047b8d0c1           file.size                   174
##              cacheId              tagKey              tagValue
##             createdDate
##  1: 2020-07-28 22:25:08
##  2: 2020-07-28 22:25:08
##  3: 2020-07-28 22:25:08
##  4: 2020-07-28 22:25:08
##  5: 2020-07-28 22:25:08
##  6: 2020-07-28 22:25:08
##  7: 2020-07-28 22:25:08
##  8: 2020-07-28 22:25:08
##  9: 2020-07-28 22:25:08
## 10: 2020-07-28 22:25:08
## 11: 2020-07-28 22:25:08
## 12: 2020-07-28 22:25:08
## 13: 2020-07-28 22:25:08
## 14: 2020-07-28 22:25:08
## 15: 2020-07-28 22:25:08
## 16: 2020-07-28 22:25:08
## 17: 2020-07-28 22:25:08
## 18: 2020-07-28 22:25:08
## 19: 2020-07-28 22:25:08
## 20: 2020-07-28 22:25:08
## 21: 2020-07-28 22:25:08
## 22: 2020-07-28 22:25:08
## 23: 2020-07-28 22:25:08
## 24: 2020-07-28 22:25:08
## 25: 2020-07-28 22:25:08
## 26: 2020-07-28 22:25:08
## 27: 2020-07-28 22:25:08
## 28: 2020-07-28 22:25:08
## 29: 2020-07-28 22:25:08
## 30: 2020-07-28 22:25:08
## 31: 2020-07-28 22:25:08
## 32: 2020-07-28 22:25:08
## 33: 2020-07-28 22:25:08
## 34: 2020-07-28 22:25:08
## 35: 2020-07-28 22:25:08
## 36: 2020-07-28 22:25:08
## 37: 2020-07-28 22:25:08
## 38: 2020-07-28 22:25:08
## 39: 2020-07-28 22:25:08
## 40: 2020-07-28 22:25:08
## 41: 2020-07-28 22:25:08
## 42: 2020-07-28 22:25:08
##             createdDate
clearCache(tmpDir, ask = FALSE)

1.8 Example 5: using caching to speed up rerunning expensive computations

ras <- raster(extent(0, 5, 0, 5), res = 1,
              vals = sample(1:5, replace = TRUE, size = 25),
              crs = "+proj=lcc +lat_1=48 +lat_2=33 +lon_0=-100 +ellps=WGS84")

# A slow operation, like GIS operation
notCached <- suppressWarnings(
  # project raster generates warnings when run non-interactively
  projectRaster(ras, crs = crs(ras), res = 5, cacheRepo = tmpDir)
)

cached <- suppressWarnings(
  # project raster generates warnings when run non-interactively
  # using quote works also
  Cache(projectRaster, ras, crs = crs(ras), res = 5, cacheRepo = tmpDir)
)

# second time is much faster
reRun <- suppressWarnings(
  # project raster generates warnings when run non-interactively
  Cache(projectRaster, ras, crs = crs(ras), res = 5, cacheRepo = tmpDir)
)
##   ...(Object to retrieve (779592260d3525be.rds))
##      loaded cached result from previous projectRaster call,
# recovered cached version is same as non-cached version
all.equal(notCached, reRun) ## TRUE
## [1] TRUE

1.9 Nested Caching

Nested caching, which is when Caching of a function occurs inside an outer function, which is itself cached. This is a critical element to working within a reproducible work flow. It is not enough during development to cache flat code chunks, as there will be many levels of “slow” functions. Ideally, at all points in a development cycle, it should be possible to get to any line of code starting from the very initial steps, running through everything up to that point, in less than a few seconds. If the workflow can be kept very fast like this, then there is a guarantee that it will work at any point.

##########################
## Nested Caching
# Make 2 functions
inner <- function(mean) {
  d <- 1
  Cache(rnorm, n = 3, mean = mean)
}
outer <- function(n) {
  Cache(inner, 0.1, cacheRepo = tmpdir2)
}

# make 2 different cache paths
tmpdir1 <- file.path(tempdir(), "first")
tmpdir2 <- file.path(tempdir(), "second")

# Run the Cache ... notOlderThan propagates to all 3 Cache calls,
#   but cacheRepo is tmpdir1 in top level Cache and all nested
#   Cache calls, unless individually overridden ... here inner
#   uses tmpdir2 repository
Cache(outer, n = 2, cacheRepo = tmpdir1, notOlderThan = Sys.time())
## [1]  0.4973089 -0.7926770  2.0354376
## attr(,".Cache")
## attr(,".Cache")$newCache
## [1] TRUE
## 
## attr(,"tags")
## [1] "cacheId:a7af5367c13aba8f"
## attr(,"call")
## [1] ""
showCache(tmpdir1) # 2 function calls
## Cache size:
##   Total (including Rasters):  504 bytes
##   Selected objects (not including Rasters):  504 bytes
##              cacheId              tagKey              tagValue
##  1: 4ac2b7c0f42d1e46            function                 rnorm
##  2: 4ac2b7c0f42d1e46               class               numeric
##  3: 4ac2b7c0f42d1e46         object.size                  1008
##  4: 4ac2b7c0f42d1e46            accessed   2020-07-28 22:25:09
##  5: 4ac2b7c0f42d1e46             inCloud                 FALSE
##  6: 4ac2b7c0f42d1e46          resultHash                      
##  7: 4ac2b7c0f42d1e46   elapsedTimeDigest      0.005012035 secs
##  8: 4ac2b7c0f42d1e46 elapsedTimeFirstRun                0 secs
##  9: 4ac2b7c0f42d1e46      otherFunctions      vweave_rmarkdown
## 10: 4ac2b7c0f42d1e46      otherFunctions          process_file
## 11: 4ac2b7c0f42d1e46      otherFunctions         process_group
## 12: 4ac2b7c0f42d1e46      otherFunctions   process_group.block
## 13: 4ac2b7c0f42d1e46      otherFunctions            call_block
## 14: 4ac2b7c0f42d1e46      otherFunctions            block_exec
## 15: 4ac2b7c0f42d1e46      otherFunctions                in_dir
## 16: 4ac2b7c0f42d1e46      otherFunctions             timing_fn
## 17: 4ac2b7c0f42d1e46      otherFunctions                handle
## 18: 4ac2b7c0f42d1e46           preDigest    n:7f12988bd88a0fb8
## 19: 4ac2b7c0f42d1e46           preDigest mean:22413394efd9f6a3
## 20: 4ac2b7c0f42d1e46           preDigest .FUN:4f604aa46882b368
## 21: 4ac2b7c0f42d1e46           file.size                   165
## 22: a7af5367c13aba8f            function                 outer
## 23: a7af5367c13aba8f               class               numeric
## 24: a7af5367c13aba8f         object.size                  1008
## 25: a7af5367c13aba8f            accessed   2020-07-28 22:25:09
## 26: a7af5367c13aba8f             inCloud                 FALSE
## 27: a7af5367c13aba8f          resultHash                      
## 28: a7af5367c13aba8f   elapsedTimeDigest      0.002005816 secs
## 29: a7af5367c13aba8f elapsedTimeFirstRun         0.318769 secs
## 30: a7af5367c13aba8f      otherFunctions      vweave_rmarkdown
## 31: a7af5367c13aba8f      otherFunctions          process_file
## 32: a7af5367c13aba8f      otherFunctions         process_group
## 33: a7af5367c13aba8f      otherFunctions   process_group.block
## 34: a7af5367c13aba8f      otherFunctions            call_block
## 35: a7af5367c13aba8f      otherFunctions            block_exec
## 36: a7af5367c13aba8f      otherFunctions                in_dir
## 37: a7af5367c13aba8f      otherFunctions             timing_fn
## 38: a7af5367c13aba8f      otherFunctions                handle
## 39: a7af5367c13aba8f           preDigest    n:82dc709f2b91918a
## 40: a7af5367c13aba8f           preDigest .FUN:892a6afc47a63a90
## 41: a7af5367c13aba8f           file.size                   165
##              cacheId              tagKey              tagValue
##             createdDate
##  1: 2020-07-28 22:25:09
##  2: 2020-07-28 22:25:09
##  3: 2020-07-28 22:25:09
##  4: 2020-07-28 22:25:09
##  5: 2020-07-28 22:25:09
##  6: 2020-07-28 22:25:09
##  7: 2020-07-28 22:25:09
##  8: 2020-07-28 22:25:09
##  9: 2020-07-28 22:25:09
## 10: 2020-07-28 22:25:09
## 11: 2020-07-28 22:25:09
## 12: 2020-07-28 22:25:09
## 13: 2020-07-28 22:25:09
## 14: 2020-07-28 22:25:09
## 15: 2020-07-28 22:25:09
## 16: 2020-07-28 22:25:09
## 17: 2020-07-28 22:25:09
## 18: 2020-07-28 22:25:09
## 19: 2020-07-28 22:25:09
## 20: 2020-07-28 22:25:09
## 21: 2020-07-28 22:25:09
## 22: 2020-07-28 22:25:09
## 23: 2020-07-28 22:25:09
## 24: 2020-07-28 22:25:09
## 25: 2020-07-28 22:25:09
## 26: 2020-07-28 22:25:09
## 27: 2020-07-28 22:25:09
## 28: 2020-07-28 22:25:09
## 29: 2020-07-28 22:25:09
## 30: 2020-07-28 22:25:09
## 31: 2020-07-28 22:25:09
## 32: 2020-07-28 22:25:09
## 33: 2020-07-28 22:25:09
## 34: 2020-07-28 22:25:09
## 35: 2020-07-28 22:25:09
## 36: 2020-07-28 22:25:09
## 37: 2020-07-28 22:25:09
## 38: 2020-07-28 22:25:09
## 39: 2020-07-28 22:25:09
## 40: 2020-07-28 22:25:09
## 41: 2020-07-28 22:25:09
##             createdDate
showCache(tmpdir2) # 1 function call
## Cache size:
##   Total (including Rasters):  252 bytes
##   Selected objects (not including Rasters):  252 bytes
##              cacheId              tagKey              tagValue
##  1: 33ceb4fb525fd08f            function                 inner
##  2: 33ceb4fb525fd08f               class               numeric
##  3: 33ceb4fb525fd08f         object.size                  1008
##  4: 33ceb4fb525fd08f            accessed   2020-07-28 22:25:09
##  5: 33ceb4fb525fd08f             inCloud                 FALSE
##  6: 33ceb4fb525fd08f          resultHash                      
##  7: 33ceb4fb525fd08f   elapsedTimeDigest      0.003010988 secs
##  8: 33ceb4fb525fd08f elapsedTimeFirstRun        0.1006901 secs
##  9: 33ceb4fb525fd08f      otherFunctions      vweave_rmarkdown
## 10: 33ceb4fb525fd08f      otherFunctions          process_file
## 11: 33ceb4fb525fd08f      otherFunctions         process_group
## 12: 33ceb4fb525fd08f      otherFunctions   process_group.block
## 13: 33ceb4fb525fd08f      otherFunctions            call_block
## 14: 33ceb4fb525fd08f      otherFunctions            block_exec
## 15: 33ceb4fb525fd08f      otherFunctions                in_dir
## 16: 33ceb4fb525fd08f      otherFunctions             timing_fn
## 17: 33ceb4fb525fd08f      otherFunctions                handle
## 18: 33ceb4fb525fd08f           preDigest mean:22413394efd9f6a3
## 19: 33ceb4fb525fd08f           preDigest .FUN:87e2c30917a34d25
## 20: 33ceb4fb525fd08f           file.size                   165
##             createdDate
##  1: 2020-07-28 22:25:09
##  2: 2020-07-28 22:25:09
##  3: 2020-07-28 22:25:09
##  4: 2020-07-28 22:25:09
##  5: 2020-07-28 22:25:09
##  6: 2020-07-28 22:25:09
##  7: 2020-07-28 22:25:09
##  8: 2020-07-28 22:25:09
##  9: 2020-07-28 22:25:09
## 10: 2020-07-28 22:25:09
## 11: 2020-07-28 22:25:09
## 12: 2020-07-28 22:25:09
## 13: 2020-07-28 22:25:09
## 14: 2020-07-28 22:25:09
## 15: 2020-07-28 22:25:09
## 16: 2020-07-28 22:25:09
## 17: 2020-07-28 22:25:09
## 18: 2020-07-28 22:25:09
## 19: 2020-07-28 22:25:09
## 20: 2020-07-28 22:25:09
# userTags get appended
# all items have the outer tag propagate, plus inner ones only have inner ones
clearCache(tmpdir1, ask = FALSE)
outerTag <- "outerTag"
innerTag <- "innerTag"
inner <- function(mean) {
  d <- 1
  Cache(rnorm, n = 3, mean = mean, notOlderThan = Sys.time() - 1e5, userTags = innerTag)
}
outer <- function(n) {
  Cache(inner, 0.1)
}
aa <- Cache(outer, n = 2, cacheRepo = tmpdir1, userTags = outerTag)
showCache(tmpdir1) # rnorm function has outerTag and innerTag, inner and outer only have outerTag
## Cache size:
##   Total (including Rasters):  756 bytes
##   Selected objects (not including Rasters):  756 bytes
##              cacheId              tagKey              tagValue
##  1: 4ac2b7c0f42d1e46            innerTag              innerTag
##  2: 4ac2b7c0f42d1e46            outerTag              outerTag
##  3: 4ac2b7c0f42d1e46            function                 rnorm
##  4: 4ac2b7c0f42d1e46               class               numeric
##  5: 4ac2b7c0f42d1e46         object.size                  1008
##  6: 4ac2b7c0f42d1e46            accessed   2020-07-28 22:25:10
##  7: 4ac2b7c0f42d1e46             inCloud                 FALSE
##  8: 4ac2b7c0f42d1e46          resultHash                      
##  9: 4ac2b7c0f42d1e46   elapsedTimeDigest      0.002001047 secs
## 10: 4ac2b7c0f42d1e46 elapsedTimeFirstRun                0 secs
## 11: 4ac2b7c0f42d1e46      otherFunctions      vweave_rmarkdown
## 12: 4ac2b7c0f42d1e46      otherFunctions          process_file
## 13: 4ac2b7c0f42d1e46      otherFunctions         process_group
## 14: 4ac2b7c0f42d1e46      otherFunctions   process_group.block
## 15: 4ac2b7c0f42d1e46      otherFunctions            call_block
## 16: 4ac2b7c0f42d1e46      otherFunctions            block_exec
## 17: 4ac2b7c0f42d1e46      otherFunctions                in_dir
## 18: 4ac2b7c0f42d1e46      otherFunctions             timing_fn
## 19: 4ac2b7c0f42d1e46      otherFunctions                handle
## 20: 4ac2b7c0f42d1e46           preDigest    n:7f12988bd88a0fb8
## 21: 4ac2b7c0f42d1e46           preDigest mean:22413394efd9f6a3
## 22: 4ac2b7c0f42d1e46           preDigest .FUN:4f604aa46882b368
## 23: 4ac2b7c0f42d1e46           file.size                   165
## 24: b06af03d5a73dc7d            outerTag              outerTag
## 25: b06af03d5a73dc7d            function                 inner
## 26: b06af03d5a73dc7d               class               numeric
## 27: b06af03d5a73dc7d         object.size                  1008
## 28: b06af03d5a73dc7d            accessed   2020-07-28 22:25:10
## 29: b06af03d5a73dc7d             inCloud                 FALSE
## 30: b06af03d5a73dc7d          resultHash                      
## 31: b06af03d5a73dc7d   elapsedTimeDigest       0.00351119 secs
## 32: b06af03d5a73dc7d elapsedTimeFirstRun       0.09576201 secs
## 33: b06af03d5a73dc7d      otherFunctions      vweave_rmarkdown
## 34: b06af03d5a73dc7d      otherFunctions          process_file
## 35: b06af03d5a73dc7d      otherFunctions         process_group
## 36: b06af03d5a73dc7d      otherFunctions   process_group.block
## 37: b06af03d5a73dc7d      otherFunctions            call_block
## 38: b06af03d5a73dc7d      otherFunctions            block_exec
## 39: b06af03d5a73dc7d      otherFunctions                in_dir
## 40: b06af03d5a73dc7d      otherFunctions             timing_fn
## 41: b06af03d5a73dc7d      otherFunctions                handle
## 42: b06af03d5a73dc7d           preDigest mean:22413394efd9f6a3
## 43: b06af03d5a73dc7d           preDigest .FUN:7ad10bc1ae528d8c
## 44: b06af03d5a73dc7d           file.size                   165
## 45: 88a34e1d033329e5            outerTag              outerTag
## 46: 88a34e1d033329e5            function                 outer
## 47: 88a34e1d033329e5               class               numeric
## 48: 88a34e1d033329e5         object.size                  1008
## 49: 88a34e1d033329e5            accessed   2020-07-28 22:25:10
## 50: 88a34e1d033329e5             inCloud                 FALSE
## 51: 88a34e1d033329e5          resultHash                      
## 52: 88a34e1d033329e5   elapsedTimeDigest      0.001909971 secs
## 53: 88a34e1d033329e5 elapsedTimeFirstRun         0.182533 secs
## 54: 88a34e1d033329e5      otherFunctions      vweave_rmarkdown
## 55: 88a34e1d033329e5      otherFunctions          process_file
## 56: 88a34e1d033329e5      otherFunctions         process_group
## 57: 88a34e1d033329e5      otherFunctions   process_group.block
## 58: 88a34e1d033329e5      otherFunctions            call_block
## 59: 88a34e1d033329e5      otherFunctions            block_exec
## 60: 88a34e1d033329e5      otherFunctions                in_dir
## 61: 88a34e1d033329e5      otherFunctions             timing_fn
## 62: 88a34e1d033329e5      otherFunctions                handle
## 63: 88a34e1d033329e5           preDigest    n:82dc709f2b91918a
## 64: 88a34e1d033329e5           preDigest .FUN:5f06fb5fbffe9e3b
## 65: 88a34e1d033329e5           file.size                   165
##              cacheId              tagKey              tagValue
##             createdDate
##  1: 2020-07-28 22:25:10
##  2: 2020-07-28 22:25:10
##  3: 2020-07-28 22:25:10
##  4: 2020-07-28 22:25:10
##  5: 2020-07-28 22:25:10
##  6: 2020-07-28 22:25:10
##  7: 2020-07-28 22:25:10
##  8: 2020-07-28 22:25:10
##  9: 2020-07-28 22:25:10
## 10: 2020-07-28 22:25:10
## 11: 2020-07-28 22:25:10
## 12: 2020-07-28 22:25:10
## 13: 2020-07-28 22:25:10
## 14: 2020-07-28 22:25:10
## 15: 2020-07-28 22:25:10
## 16: 2020-07-28 22:25:10
## 17: 2020-07-28 22:25:10
## 18: 2020-07-28 22:25:10
## 19: 2020-07-28 22:25:10
## 20: 2020-07-28 22:25:10
## 21: 2020-07-28 22:25:10
## 22: 2020-07-28 22:25:10
## 23: 2020-07-28 22:25:10
## 24: 2020-07-28 22:25:10
## 25: 2020-07-28 22:25:10
## 26: 2020-07-28 22:25:10
## 27: 2020-07-28 22:25:10
## 28: 2020-07-28 22:25:10
## 29: 2020-07-28 22:25:10
## 30: 2020-07-28 22:25:10
## 31: 2020-07-28 22:25:10
## 32: 2020-07-28 22:25:10
## 33: 2020-07-28 22:25:10
## 34: 2020-07-28 22:25:10
## 35: 2020-07-28 22:25:10
## 36: 2020-07-28 22:25:10
## 37: 2020-07-28 22:25:10
## 38: 2020-07-28 22:25:10
## 39: 2020-07-28 22:25:10
## 40: 2020-07-28 22:25:10
## 41: 2020-07-28 22:25:10
## 42: 2020-07-28 22:25:10
## 43: 2020-07-28 22:25:10
## 44: 2020-07-28 22:25:10
## 45: 2020-07-28 22:25:10
## 46: 2020-07-28 22:25:10
## 47: 2020-07-28 22:25:10
## 48: 2020-07-28 22:25:10
## 49: 2020-07-28 22:25:10
## 50: 2020-07-28 22:25:10
## 51: 2020-07-28 22:25:10
## 52: 2020-07-28 22:25:10
## 53: 2020-07-28 22:25:10
## 54: 2020-07-28 22:25:10
## 55: 2020-07-28 22:25:10
## 56: 2020-07-28 22:25:10
## 57: 2020-07-28 22:25:10
## 58: 2020-07-28 22:25:10
## 59: 2020-07-28 22:25:10
## 60: 2020-07-28 22:25:10
## 61: 2020-07-28 22:25:10
## 62: 2020-07-28 22:25:10
## 63: 2020-07-28 22:25:10
## 64: 2020-07-28 22:25:10
## 65: 2020-07-28 22:25:10
##             createdDate

1.10 cacheId

Sometimes, it is not absolutely desirable to maintain the work flow intact because changes that are irrelevant to the analysis, such as changing messages sent to a user, may be changed, without a desire to rerun functions. The cacheId argument is for this. Once a piece of code is run, then the cacheId can be manually extracted (it is reported at the end of a Cache call) and manually placed in the code, passed in as, say, cacheId = "ad184ce64541972b50afd8e7b75f821b".

### cacheId
set.seed(1)
Cache(rnorm, 1, cacheRepo = tmpdir1)
## [1] -0.6264538
## attr(,".Cache")
## attr(,".Cache")$newCache
## [1] TRUE
## 
## attr(,"tags")
## [1] "cacheId:7072c305d8c69df0"
## attr(,"call")
## [1] ""
# manually look at output attribute which shows cacheId: 7072c305d8c69df0
Cache(rnorm, 1, cacheRepo = tmpdir1, cacheId = "7072c305d8c69df0") # same value
## cacheId is same as calculated hash
##   ...(Object to retrieve (7072c305d8c69df0.rds))
##      loaded cached result from previous rnorm call,
## [1] -0.6264538
## attr(,".Cache")
## attr(,".Cache")$newCache
## [1] FALSE
## 
## attr(,"tags")
## [1] "cacheId:7072c305d8c69df0"
## attr(,"call")
## [1] ""
# override even with different inputs:
Cache(rnorm, 2, cacheRepo = tmpdir1, cacheId = "7072c305d8c69df0")
## cacheId is not same as calculated hash. Manually searching for cacheId:7072c305d8c69df0
##   ...(Object to retrieve (7072c305d8c69df0.rds))
##      loaded cached result from previous rnorm call,
## [1] -0.6264538
## attr(,".Cache")
## attr(,".Cache")$newCache
## [1] FALSE
## 
## attr(,"tags")
## [1] "cacheId:7072c305d8c69df0"
## attr(,"call")
## [1] ""

1.11 Working with the Cache manually

Since the cache is simply a DBI data table (of an SQLite database by default). In addition, there are several helpers in the reproducible package, including showCache, keepCache and clearCache that may be useful. Also, one can access cached items manually (rather than simply rerunning the same Cache function again).

# As of reproducible version 1.0, there is a new backend directly using DBI
mapHash <- unique(showCache(tmpDir, userTags = "projectRaster")$cacheId)
## Cache size:
##   Total (including Rasters):  3.8 Kb
##   Selected objects (not including Rasters):  3.8 Kb
map <- loadFromCache(mapHash[1], cachePath = tmpDir)
plot(map)

## cleanup
unlink(dirname(tmpDir), recursive = TRUE)

2 Reproducible Workflow

In general, we feel that a liberal use of Cache will make a re-usable and reproducible work flow. shiny apps can be made, taking advantage of Cache. Indeed, much of the difficulty in managing data sets and saving them for future use, can be accommodated by caching.