Nothing
## Load Arabidopsis data
data(arab);
## Specify treatment groups
## grp.ids = c(1, 1, 1, 2, 2, 2); # Numbers or strings are both OK
grp.ids = rep(c("mock", "hrcc"), each=3);
## Estimate normalization factors
norm.factors = estimate.norm.factors(arab);
print(norm.factors);
## Prepare an NBP object, adjust the library sizes by thinning the
## counts. For demonstration purpose, only use the first 100 rows of
## the arab data.
set.seed(999);
obj = prepare.nbp(arab[1:100,], grp.ids, lib.size=colSums(arab), norm.factors=norm.factors);
print(obj);
## Fit a dispersion model (NBQ by default)
obj = estimate.disp(obj);
plot(obj);
## Perform exact NB test
## grp1 = 1;
## grp2 = 2;
grp1 = "mock";
grp2 = "hrcc";
obj = exact.nb.test(obj, grp1, grp2);
## Print and plot results
print(obj);
par(mfrow=c(3,2));
plot(obj);
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.