changed the sample R script address