R/load_source_directory.R

#' Runs all source files within the directory source.directory
#' @param source.directory is a directory with R source files to load
#' @return source file list
#' @details Looks for files with .R or .r suffixes.
#' @export

load.source.directory <- function(source.directory){

  
  source.file.list <- list.files(source.directory,pattern="(\\.R$)|(\\.r$)",full.names=TRUE)
  
  print(source.file.list)
  
  out <- lapply(source.file.list, source)
  
  return(out)
  
}
gelfondjal/IT2 documentation built on May 17, 2019, 12:15 a.m.