Minor beautifications and passing R script name

Need to be able to grab the r script again for it to run form DeSeq