library(VennDiagram)
library(RColorBrewer)
veen1 <- venn.diagram(list(set_name1 = set1,
set_name2 = set2),
fill=c(brewer.pal(7,"Set1")[1:2]),
alpha = 0.5,cex = 2,
cat.cex = 2,cat.fontface = "bold",lty=2,cat.pos = 0,
resolution = 300,filename = NULL)
pdf('/lujing/venn.pdf', width = 10, height = 10)
grid.draw(veen1)
dev.off()
VennDiagram画venn图,保存为pdf格式
最新推荐文章于 2024-07-05 10:55:42 发布