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