## Not run:
# simOptions = RNAseq.SimOptions.2grp()
# ## run a few simulations
# simRes = runSims(Nreps=c(3,5,7), sim.opts=simOptions, nsims=5,
# DEmethod="edgeR")
#
# ## using FDR 0.1 to call DE, then look at power curves and summary
# powers = comparePower(simRes)
# ## plot
# par(mfrow=c(2,3))
# plotPower(powers)
# plotPowerTD(powers)
# plotFDR(powers)
# plotFDcost(powers)
# plotPowerAlpha(powers)
#
# ## in one figure
# par(mfrow=c(2,3))
# plotAll(powers)
# ## End(Not run)
Run the code above in your browser using DataLab