如何使用 R（VennEuler 包）在维恩图中添加图例和值？

Question

我一直在寻找制作具有多个比例字段的维恩图的最佳方法，到目前为止，我认为最好的工具是 R 中的 venneuler，但我修改了很多代码以准确呈现它因为我需要它，但我无法获得我需要的格式

使用此代码：

library(rJava)
library(venneuler)
vd <- venneuler(c(A=0.3, B=0.3, C=1.1, "A&B"=0.1, "A&C"=0.2, "B&C"=0.1, "A&B&C"=0.1))
plot(vd)
title("Something")

我得到这个：

我添加了很多丑陋的图例，但我不喜欢任何一种。另外，我需要获取各个字段中的各个值。我需要的图像是在图像编辑器中编辑的。我想要的是这样的：

如果您能推荐我另一个工具或帮助我编写代码，我将不胜感激提前致谢！干杯！

Answer 1

这可以通过我的 r 包 eulerr 来完成。

library(eulerr)

vd <- euler(c(A = 0.3, B = 0.3, C = 1.1,
              "A&B" = 0.1, "A&C" = 0.2, "B&C" = 0.1,
              "A&B&C" = 0.1))
plot(vd, key = TRUE, counts = TRUE)

如何使用 R（VennEuler 包）在维恩图中添加图例和值？

how to add legends and values in a Venn diagram using R (VennEuler package)?

r

venn-diagram