You cannot select more than 25 topics Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.

11 lines
267 B
R

# To source a bunch of files in the same directory
sourceDir <- function(path, trace = TRUE) {
lsDir <- list.files(path, pattern = "\\.[Rr]$")
for (i in lsDir) {
if(trace) {cat(i, ":")}
source(file.path(path, i))
if(trace) {cat("\n")}
}
}