if (FALSE) {
filesDir = paste0(tempdir(),"/ex")
wkDir = paste0(tempdir(),"/ey")
configVariableSet("config.workdir", filesDir)
# setup the work directory
workingDirectoryPopulate(wkDir)
pdfGenerate(workDir=wkDir)
}
# \dontshow{
if (FALSE) {
unlink(filesDir,recursive=TRUE)
unlink(wkDir,recursive=TRUE)
}
# }
Run the code above in your browser using DataLab