venn图

> library(VennDiagram)
载入需要的程辑包:grid
> dg1<-read.table("clipboard",header=F)
> dg2<-read.table("clipboard",header=F)
> venn.diagram(list(dg_1_nip=dg1[,1],dg_2_nip=dg2[,1]),fill=c("red","blue"),"rice.tiff")

原文地址:https://www.cnblogs.com/blueicely/p/2831108.html