# NOT RUN {
data(rawpval)
fishcomb <- fishercomb(rawpval, BHth = 0.05)
DE <- ifelse(fishcomb$adjpval<=0.05,1,0)
hist(fishcomb$rawpval,nclass=100)
## A more detailed example is given in the vignette of the package:
## vignette("metaRNASeq")
# }
Run the code above in your browser using DataLab