Source R scripts in different folders

Question

I have a question about sourcing R scripts in different folders. Suppose I created a new project in R Studio. The project folder contains several folders (data, different folders containing the scripots, latex folder, plot folder etc). Is there a way to automatically source all R scripts within this project folder? Thanks

@DavidRobinson exactly not just in folder. There are contained in different subfolders — math
– math, Commented Sep 25, 2014 at 18:49

Rich Scriven · Accepted Answer · 2014-09-25 19:19:02Z

2

I use this function for sourcing all R files in a specific folder.

## finds all .R and .r files within a folder and sources them
sourceFolder <- function(folder, recursive = FALSE, ...) 
{ 
    files <- list.files(folder, pattern = "[.][rR]$", 
                        full.names = TRUE, recursive = recursive)
    if (!length(files))
        stop(simpleError(sprintf('No R files in folder "%s"', folder)))
    src <- invisible(lapply(files, source, ...))
    message(sprintf('%s files sourced from folder "%s"', length(src), folder))
}

So, if I have a folder on my desktop named Rfiles I can source all the files with a .r or .R extension with the call

sourceFolder("./Desktop/Rfiles")
# 6 files sourced from folder "./Desktop/Rfiles"

You could use the recursive argument to source all the R files in the subdirectories

sourceFolder("yourFolder", recursive = TRUE)

edited Sep 25, 2014 at 19:19

answered Sep 25, 2014 at 18:55

Rich Scriven

99.8k11 gold badges190 silver badges252 bronze badges

Sign up to request clarification or add additional context in comments.

3 Comments

aosmith Over a year ago

If you set recursive to TRUE in list.files you can list all files with the pattern in all subfolders of a folder.

Rich Scriven Over a year ago

@aosmith - thank you! I've made an edit. Totally forgot list.files had a recursive argument

mert Over a year ago

@RichScriven I tried to extend your sourceFolder function to source the cpp files via the command Rcpp::sourceCpp but failed. Is it possible to extend your function to cpp files?

Collectives™ on Stack Overflow

Source R scripts in different folders

1 Answer 1

3 Comments

Your Answer

Hot Network Questions

Collectives™ on Stack Overflow

1 Answer 1

3 Comments

Your Answer

Sign up or log in

Post as a guest

Related