R函数的存储与载入

直接将一个函数存为一个R文件，使用时直接用source()载入即可

这是我的函数R文件   命名为createdir.R

createdir<-function(){mainDir <- getwd()
subDir <- c("predata","Network",'Gene_Peak',"GPPair","Cicero","Accessibility")
for(i in subDir){
  if (!file.exists(i)){
    dir.create(file.path(mainDir,i))
    
  }  
}

}

 

然后在另一个文件中载入并使用

source('/cluster/project/Rbao/createdir.R')  #载入R函数


createdir()   #使用R函数