Nothing
data("ExampleData")
conditions <- factor(c(rep('C1',2), rep('C2', 2)))
XB <- XBSeqDataSet(Observed[,1:4], Background[,1:4], conditions)
XB <- estimateRealCount(XB)
XB <- estimateSizeFactors(XB)
expect_warning(estimateSCV(XB, method='per-condition', sharingMode='gene-est-only', fitType='local'))
Any scripts or data that you put into this service are public.
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.