How to build a three-position proportional Venn / Euler diagram?

I have a microchip dataset, and I would like to present it in accordance with the attached drawing (made using PowerPoint). I tried the various packages available for R (VennDiagram, venneuler, limma). However, I could not make the data proportionally or show the values.

Does anyone have an idea how to do this?

The code for the game can be found below!

Thanks!

# you might need these: source("http://www.bioconductor.org/biocLite.R") biocLite("limma") library(VennDiagram) library(limma) library(venneuler) # Trial 1: Kind of proportional but difficult to customize for labels and other stuff su <- venneuler(c(A=162, B=104, C=86, "A&B"=206, "A&C"=112, "B&C"=90 ,"A&B&C"=2433)) plot(su) # Trial 2: looks nice but not proportional hw <- c(F,F,F,F,T,T,T,T) hm <- c(F,F,T,T,F,F,T,T) hr <- c(F,T,F,T,F,T,F,T) c4 <- cbind(hw,hm,hr) e <- vennCounts(c4) e[1:8,4] <- c(3193,86,104,90,162,112,206,2433) vennDiagram(e) 

enter image description here

+5
source share
2 answers

I would recommend the VennDiagram package: http://cran.r-project.org/web/packages/VennDiagram/VennDiagram.pdf

On pack 19 you will find 10 folders of very good examples (both advanced and simplified). At the moment, I have not found anything that can not do what I need.

As a general help for other people who get here on this issue (not directly related to this issue, but relevant), I would recommend looking for your answer using this search

0
source

With my nVennR package nVennR this can be done in two ways, as shown in the vignette . In this example

 > library(nVennR) > myV <- createVennObj(nSets = 3, sNames = c('A', 'B', 'C'), sSizes = c(0, 86, 104, 90, 162, 112, 206, 2433)) > myV <- plotVenn(nVennObj = myV) 

Three sets, proportional

A package may represent more sets.

0
source

All Articles