
main.folder   <- "../"
work.folder <- file.path(main.folder, "work")
rdata.folder  <- file.path(work.folder , "rdata")
pdf.folder <- file.path(work.folder , "pdfs")
rout.folder <- file.path(work.folder, "rout")
