new pdf and updated R script file to match Rnw
new pdf and updated R script file to match Rnw