具有半透明性的Venn图比例和颜色阴影

Question

我有以下类型的计数数据。

A   450
B   1800
A and B both    230

我想开发一个五颜六色(可能是半透明的交叉口)，如下面的Venn图。

​

​

注意：这个数字是用PowerPoint绘制的一个例子，它不是要缩放的。

Answer 1

这是一篇讨论星系团和共发生因素列表中的Venn图的文章。

为方便解决方案，请使用包毒蛇

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

​

​

要获得更高级和定制的解决方案，请检查包VennDiagram。

library(VennDiagram) 
venn.diagram(list(B = 1:1800, A = 1571:2020), fill = c("lightblue", "green"), 
             alpha = c(0.5, 0.5), lwd =0, "venn_diagram.tiff")

​

​

Answer 2

我最近发表了一个新的R包，尤勒尔，它做你想要的。它与venneuler非常相似，但没有不一致之处。

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

​

​

或者，您可以在eulerr.co上为同一个r包尝试闪亮的应用程序。

​

​

Answer 3

基于Geek关于Acid的第二个答案，第二个建议(再次感谢)，我也能解决这个问题。我是张贴如果这是相关的其他谷歌人！

  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");

​

​