venn

x<-read.table("1.txt")
y<-read.table("2.txt")
a<-x$V1
b<-y$V2
venn.plot <- venn.diagram(
    x = list(
        "3 weeks DEGs" = a,
        "4 weeks DEGs" = b
    ),
    filename = "c:\\Venn_22set_complex.tiff",
    col = "transparent",
    fill = c("red", "blue"),
    cex = 2,
    cat.cex = 1.5,
    rotation.degree = 0,
    main = "",
    main.cex = 2,
    sub.cex = 1,
    alpha = 0.50,cat.pos=c(9,12)
);

deg_venn.png