Venn diagram proportional and color shading with translucency

Question

I have the following type of count data.

A 450 B 1800 A and B both 230 

I want to design a colorful (possibly translucent at the intersections) such as a Venn diagram.

Note. This graphic is an example of manual work in PowerPoint and does not scale.

Answer 1

Here is a post discussing the Venn diagram from the list of clusters and related factors. .

For the convenience of using the venneuler package:

 require(venneuler) v <- venneuler(c(A=450, B=1800, "A&B"=230)) plot(v) 

For more advanced and customized solutions, check out the VennDiagram package.

Answer 2

Based on the second answer of the second Geek On Acid suggestion (thanks again), I could also solve the problem with the line. I send messages if this applies to other users!

  require(VennDiagram) venn.diagram(list(B = 1:1800, A = 1571:2020),fill = c("red", "green"), alpha = c(0.5, 0.5), cex = 2,cat.fontface = 4,lty =2, fontfamily =3, filename = "trial2.emf"); 

Answer 3

I recently posted a new R eulerr package that does what you want. It is very similar to venneuler, but without its inconsistency.

 library(eulerr) fit <- euler(c(A = 450, B = 1800, "A&B" = 230)) plot(fit, fill_opacity = 0.3) 

Or you can try the brilliant app for the same r package in jolars.co/eulerr

Answer 4

Even if this does not fully answer your question. I thought it would be useful for other people who want to build a Venn Diagram. The venn () function can be used from the gplots package: http://www.inside-r.org/packages/cran/gplots/docs/venn

 ## modified slightly from the example given in the documentation ## Example using a list of item names belonging to the ## specified group. ## require(gplots) ## construct some fake gene names.. oneName <- function() paste(sample(LETTERS,5,replace=TRUE),collapse="") geneNames <- replicate(1000, oneName()) ## GroupA <- sample(geneNames, 400, replace=FALSE) GroupB <- sample(geneNames, 750, replace=FALSE) GroupC <- sample(geneNames, 250, replace=FALSE) GroupD <- sample(geneNames, 300, replace=FALSE) venn(list(GrpA=GroupA,GrpB=GroupB,GrpC=GroupC,GrpD=GroupD)) 

Subsequently, I simply add color and transparency using illustrator.

Answer 5

There is an intuitive and flexible proportional plotter that you can download and run. Find it at: http://omics.pnl.gov/software/VennDiagramPlotter.php

and

jvenn : Venn interactive chart viewer - GenoToul Bioinfo: http://bioinfo.genotoul.fr/jvenn/

Answer 6

I know that the OP is asking for a solution in R, but I would like to point out a web solution called BioVenn . It takes up to 3 lists of elements and draws a Venn diagram so that each surface is proportional to the number of elements - like this one:

In this diagram, I manually changed (via PhotoShop) the placement of numbers, because I did not like the locations chosen by BioVenn. But you may not have a number.

In theory, the lists used with BioVenn should consist of gene identifiers, but in practice this does not matter - the lists just have to contain strings.