adding R script and clean_data dir