Streamlined the PreProcess.R script.