comments added to the R script