Added working directory structure.
R script: added path to working directory.