在Venneuler R包中显示计数

Question

有人知道如何在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)

Answer 1

这将显示手动添加的计数标签：

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

vd$labels<- c(
  paste("A\n",0.3+0.1+0.2+0.1),
  paste("B\n",0.3+0.1+0.1+0.1),
  paste("C\n",1.1+0.2+0.1+0.1)
)

plot(vd)