@@ -14,6 +14,7 @@ export( "sourcefile", "showfiles", "cache", + "setcache", "showobjects", "package", "clonecache", NAMESPACE @@ -5,6 +5,11 @@ cache <- function() { getConfig("cachedir") } +setcache <- function(dir) { + setConfig("cachedir", dir) + invisible(dir) +} + deletecache <- function(cachedir = NULL) { if(is.null(cachedir)) cachedir <- cache() R/vizcache.R @@ -1,18 +1,23 @@ \name{cache} \alias{cache} -%- Also NEED an '\alias' for EACH other topic documented here. -\title{Return cache directory} +\alias{setcache} + +\title{Set/Return cache directory} \description{ - Return the path to the current cache directory + Set/Return the path to the current cache directory } \usage{ cache() +setcache(dir) +} +\arguments{ + \item{dir}{directory name} } \value{ A string indicating the path to the current cache directory. } \examples{ -setConfig("cachedir", "mycachedir") +setcache("mycachedir") cache() } \keyword{utilities} man/cache.Rd 930bfc149c1182dfdf3adddce906696b70b0fa69 Roger D. Peng [amelia] rdpeng@gmail.com http://github.com/rdpeng/cacher/commit/d8e520383b8dd5a211db25fb6bd7585e02a8be80 d8e520383b8dd5a211db25fb6bd7585e02a8be80 2009-06-03T10:05:44-07:00 2009-06-03T10:05:44-07:00 Add 'setcache' function 70b69bc7b4ce2b4489fa1859fbb04479667b7fc3 Roger D. Peng [amelia] rdpeng@gmail.com