R/sourceDir.R

Defines functions sourceDir

Documented in sourceDir

sourceDir <- function(path, trace = FALSE, recursive = FALSE, ...) {
        for (nm in list.files(path, pattern = "\\.[RrSsQq]$", recursive = recursive)) {
                if(trace) cat(nm,":")           
                fp = file.path(path, nm)
                source(fp, ...);
                if(trace) cat("\n")
        }
}

Try the xhmmScripts package in your browser

Any scripts or data that you put into this service are public.

xhmmScripts documentation built on May 29, 2017, 3:08 p.m.