维恩图 - 标签空间不足

Question

这是我用于生成维恩图的代码。你知道任何解决方案我怎样才能让它更容易阅读？

 # Make data
    v3 <- venn.diagram(list(A=vec_EOD_total, B=vec_EON_total), filename=NULL, fill=c("red", "green"), cex.prop=NULL, cex=1.5, cat.cex= 1.5, alpha = c(0.5, 0.5), cat.fontface = 4, lty = 2)
    png("Overlap.png", width=4, height=4, units='in', res=150)
    grid.newpage()
    grid.draw(v3)
    dev.off()

是否可以将绿色数据集中的数字241与数字28相同（使用直线）？

还有一个问题。代码的哪一部分以斜体形式设置数据标签？

Answer 1

使用ext.percent选项，您可以指定部分区域必须小于触发外部文字放置的比例。

library(VennDiagram)
v3 <- venn.diagram(list(A=1:2309, B=29:2550), filename=NULL, fill=c("red", "green"), 
       cex.prop=NULL, cex=1.5, cat.cex= 1.5, alpha = c(0.5, 0.5), 
       cat.fontface = 4, lty = 2, ext.percent=.2)
png("Overlap.png", width=5, height=4, units='in', res=150)
grid.newpage()
grid.draw(v3)
dev.off()

cat.fontface选项控制每个类别名称的字体（1 = plain，2 = bold，3 = italic，4 = bold italic）。