Hi,

I am trying to use the vennDiagram function of the limma package to color
the circle borders in different colors. This works fine for up to three
circles, but for four and five circles I can not get it to work. Does
anyone have a solution for this?

Below is some sample code to reproduce my issue (adapted from the example
section of the vennDiagram function):

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),c(1,0,1,0,1,0))
fit <- eBayes(lmFit(Y,design))
results <- decideTests(fit)
a <- vennCounts(results)
print(a)
mfrow.old <- par()$mfrow
par(mfrow=c(1,2))
vennDiagram(a,circle.col=c("red","green","blue","yellow"))

For me all circles are red, instead of red, green, blue and yellow.

Thanks!
/Leif

	[[alternative HTML version deleted]]

