R/utils.R

sourcedir <- function(path, trace = TRUE, ...) 
{
  for (n in list.files(path, pattern = ".R")) {
    if(trace) cat(nm,":")
    source(file.path(path, nm), ...)
    if(trace) cat("\n")
  }
}
sunsiyu/optimalr documentation built on May 30, 2019, 8:39 p.m.