R Script file

updating the R scrip file for the Samsung data merge