Set of R Scripts for data analysis