将样本 Space 添加到 R 中的维恩图

Adding a Sample Space to a Venn Diagram in R

我正在尝试在 R 上的 jupyter 笔记本中插入一个简单的维恩图。我已经能够使用 VennDiagram 库生成一个简单的 2 集图。但是,我似乎无法弄清楚如何以产生 2 个相交集的方式来处理三重图,这些相交集位于另一个更大集合的子集中。

也许我用错了库?

编辑:

这是为了说明,我只需要画一个维恩图的例子。数据将类似于:

S=(1,2,3)

A=(1,2)

B=(2,3)

我的 r 包 eulerr 的最新开发版本现在可以将样本空间列表作为输入。但是,它会生成欧拉图(比例维恩图)(这就是为什么您的规范不会导致两个图在另一个图中相交)。

# devtoools::install_github("jolars/eulerr")

library(eulerr)

ll <- list(S = c(1, 2, 3), A = c(1, 2), B = c(2, 3))

fit <- euler(ll)

plot(fit)

如果您想要在三分之一内有两个相交的圆圈,请尝试以下操作:

plot(euler(c(S = 5, "A&B&S" = 3, "A&S" = 1, "B&S" = 1)))