
vennCounts(x, include="both")
vennDiagram(object, include="both", names=NULL, mar=rep(1,4), cex=c(1.5,1,0.7), lwd=1, circle.col=NULL, counts.col=NULL, show.include=NULL, ...)
decideTests
.TestResults
matrix from decideTests
or a VennCounts
object produced by vennCounts
."both"
for all differentially expressed genes, "up"
for up-regulated genes only or "down"
for down-regulated genes only. If include=c("up","down")
then both the up and down counts will be shown. This argument is ignored if object
if object
is already a vennCounts
object.par
.par
.par
for possible values.include
. See par
for possible values.include
should be printed on the plot. Defaults to FALSE
if include
is a single value and TRUE
otherwiseplot
vennCounts
produces a VennCounts
object, which is a numeric matrix with last column "Counts"
giving counts for each possible vector outcome.
vennDiagram
causes a plot to be produced on the current graphical device.
vennDiagram
can plot up to five sets.
vennCounts
can collate intersection counts for any number of sets.
Y <- matrix(rnorm(100*6),100,6)
Y[1:10,3:4] <- Y[1:10,3:4]+3
Y[1:20,5:6] <- Y[1:20,5:6]+3
design <- cbind(1,c(0,0,1,1,0,0),c(0,0,0,0,1,1))
fit <- eBayes(lmFit(Y,design))
results <- decideTests(fit)
a <- vennCounts(results)
print(a)
mfrow.old <- par()$mfrow
par(mfrow=c(1,2))
vennDiagram(a)
vennDiagram(results,
include=c("up", "down"),
counts.col=c("red", "blue"),
circle.col = c("red", "blue", "green3"))
par(mfrow=mfrow.old)
Run the code above in your browser using DataLab