如何从 VennDiagram 中删除零标签？

如何解决如何从 VennDiagram 中删除零标签？

我有一张维恩图，比较了大小不同的五个组。其中一些不共享任何元素，因为零值出现在连接内。但是，我想删除零值标签，以便共享值是唯一显示的值。有谁知道怎么做？另外，有没有办法去除黑色轮廓？谢谢。

# Load the vennDiagram package
library(vennDiagram)

# Creating the set of number of conditions in common across studies
S1 <- c(1:11,"A")
S2 <- c(1:37,"A","B","C")
S3 <- c(1:58,"D","E")
S4 <- c(1:36,"B")
S5 <- as.character(c(1:306))
colors <- c("#6b7fff","#c3db0f","#ff4059","#2cff21","#de4dff")

# Make venn diagram from list of groups
venn.diagram(x = list(S1,S2,S3,S4,S5),category.names = c("S1","S2","S3","S4","S5"),filename = 'venn_diagram.png',output=TRUE,imagetype="png",scaled = TRUE,col = "black",fill = colors,cat.col = colors,cat.cex = 2,margin = 0.15
)

# display saved image
options(repr.plot.height=12,repr.plot.width= 12)
library("png")
pp <- readpnG("venn_diagram.png")
plot.new() 
rasterImage(pp,1.1,1.1)

解决方法

我没有找到在文档或源代码中隐藏标签的任何方法。根据文档，控制大纲的方法是通过 lwd 选项：

...
cat.col = colors,cat.cex = 2,margin = 0.15,lwd = 0
...

在我的系统中，最终图片中仍然有一条微弱的线条。 还有其他软件包可以为您提供与您的问题类似的东西。使用我自己的包，名为 nVennR：

library(nVennR)
S1 <- c(1:11,"A")
S2 <- c(1:37,"A","B","C")
S3 <- c(1:58,"D","E")
S4 <- c(1:36,"B")
S5 <- as.character(c(1:306))
colors <- c("#6b7fff","#c3db0f","#ff4059","#2cff21","#de4dff")
myV <- plotVenn(list(S1=S1,S2=S2,S3=S3,S4=S4,S5=S5),setColors=colors,borderWidth=0)

这个图有点极端。您只能将 Set1 视为其描述（括号内的向量）包括 1、i.例如，(1,2,3,4,5) 和 (1,4)。