add start new R script thread