venn图ggVennDiagram

install.packages("ggVennDiagram")
library("ggVennDiagram")

library(ggplot2)

mydata2<-list(G1,G2,G3,G4,G5,G6)

p=
ggVennDiagram(mydata2,label="count",label_alpha=0,
category.names=c("G1","G2","G3","G4","G5","G6")) +
scale_fill_gradient(low="white",high= "white") +
theme(legend.position = "none")

ggsave(p, filename="ALL/out_venn_G.pdf")

label = "percent" # 只显示百分比

参考：
R语言绘图—Veen(韦恩图） 简书
R语言绘图—Veen(韦恩图）知乎