Commented out `rm()` function in dataprep.R