mu <- 10 ## mean counts in control group for all genes
disp <- 0.1 ## dispersion for all genes
logfc <- log(2) ## log fold change for DE genes
size <- ssizeRNA_single(m = 30, mu = mu, disp = disp, logfc = logfc,
maxN = 20)
size$ssize ## first sample size to reach desired power
size$power ## calculated power for each sample size
size$crit.vals ## calculated critical value for each sample size
Run the code above in your browser using DataLab