added R script to cluster