script for analysis in R

this is the code for cleaning these files in R