R/compR.R

Defines functions compR

compR <-
function(path="."){print(paste(list.dirs(path=path)))
                  for(folder in list.dirs(full.names = TRUE)){
                    print(folder);
                    for(file in list.files(path=folder,pattern="*.rnw")){
                      print("##############################################")
                      print(file)
                      Sweavelst(file=file,path=folder)}}}
DanielBonnery/SweaveLst documentation built on May 4, 2022, 11:45 p.m.