Renamed R script and some changes in read me