维恩图情节？(Venn diagram plot?)

维恩图情节？(Venn diagram plot?)

我有一些数据如下，我想为他们安装Venn digram。如果有任何解决方案，请您告诉我。

dim(a) 1200 dim(b) 420 dim(c) 580 dim(d) 650

数据之间重叠：

a_b = 200 a_c=100 c_b=20 a_d= 11 b_d= 61 c_d= 0

I have some data as below, I would like to have Venn digram for them.Would you please let me know if there is any solution.

dim(a) 1200 dim(b) 420 dim(c) 580 dim(d) 650

Overlaps between data:

a_b = 200 a_c=100 c_b=20 a_d= 11 b_d= 61 c_d= 0

最满意答案

有多种方法可以构建ViennDiagram。 一个是使用VennDiagram包：

library(VennDiagram) grid.newpage() venn.plot <- draw.quad.venn( area1 = 1200, area2 = 420, area3 = 580, area4 = 650, n12 = 200, n13 = 100, n14 = 11, n23 = 20, n24 = 61, n34 = 0, n123 = 0, n124 = 0, n134 = 0, n234 = 0, n1234 = 0, category = c("a", "b", "c", "d"), fill = c("orange", "red", "green", "blue"), lty = "dashed", cex = 2, cat.cex = 2, cat.col = c("orange", "red", "green", "blue") )

There are multiple ways of building ViennDiagram. One is by using VennDiagram package:

library(VennDiagram) grid.newpage() venn.plot <- draw.quad.venn( area1 = 1200, area2 = 420, area3 = 580, area4 = 650, n12 = 200, n13 = 100, n14 = 11, n23 = 20, n24 = 61, n34 = 0, n123 = 0, n124 = 0, n134 = 0, n234 = 0, n1234 = 0, category = c("a", "b", "c", "d"), fill = c("orange", "red", "green", "blue"), lty = "dashed", cex = 2, cat.cex = 2, cat.col = c("orange", "red", "green", "blue") )