conditions <- factor(c(rep('C1', 3), rep('C2', 3)))
data(ExampleData)
XB <- XBSeqDataSet(Observed, Background, conditions)
XB <- estimateRealCount(XB)
XB <- estimateSizeFactors(XB)
XB <- estimateSCV(XB, fitType='local')
dispTable(XB)
Run the code above in your browser using DataLab