Consistent cleaning, pt. 2
Add R script for data cleaning