update to submit R script