Updated directory structure and added R script