R package：VennDiagram韦恩图

install.packages("VennDiagram")
A=c(1:28)
B=c(1:21,31:48)
library(VennDiagram) 
data<-list(A,B)
venn<-venn.diagram(data,filename=NULL,
                   col ="transparent",
                   fill=c('red','green'),alpha=0.6,
                   category = c('EMX1','AAVS1'),
                   cat.pos = c(-10,0),fontfamily = "serif",
                   font="3", fontface = "bold")
grid.draw(venn)