tests/reg-tests.R

In rdpeng/cachesweave: Tools for caching Sweave computations

suppressMessages(library(cacheSweave))

infile <- system.file("example", "simpleRR.Rnw", package = "cacheSweave")

setCacheDir("cache")

Sweave(infile, driver = cacheSweaveDriver)

ls()


## Check to see that objects were properly cached
## Database should contain 'airquality' and 'fit'

dname <- dir("cache", full.names = TRUE)
suppressMessages(library(stashR))
db <- new("localDB", dir = dname[2], name = "cacheDB")
dbList(db)