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