separated plots and stats into separate Rscripts