R 의 디렉토리에서 모든 fies 를 소싱하는 방법

r 의 디렉토리에서 모든 fies 를 소싱하는 방법

setwd(dirname(rstudioapi::getActiveDocumentContext()$path)) # set the work directory
# to the same file location that the r script is in.
WD <- getwd() # get the current working directory

# Load the supporting scripts from the folder supporting scripts
files.sources = list.files(paste0(WD,'/supporting scripts/'))
files.sources = paste0(WD, '/supporting scripts/', files.sources)
sapply(files.sources, source)