R script to process and clean raw data from Samsung Galaxy S smartphone