### R code from vignette source 'RNAseq.Rnw'