生信分析miRNA靶点预测 R语言韦恩图制作的代码

生信分析miRNA靶点预测R语言韦恩图 制作的代码

install.packages("VennDiagram")

getwd()

setwd("C:/Users/qupeng/Desktop")

getwd()

library(VennDiagram)

library(grid)

library(futile.logger)

df1<-read.csv('TargetScan7.csv',header=T,stringsAsFactors = F)

dim(df1)

df2<-read.csv('miRDB.csv',header=T,stringsAsFactors = F)

dim(df2)

df3<-read.csv('miRtarBase.csv',header=T,stringsAsFactors = F)

dim(df3)

X<-list(TargetScan7=df1$A,

        miRDB=df2$B,

        miRtarBase=df3$C)

venn.diagram(X,filename = "vennplot_1 .tiff",fil=c('red','blue','green'),alpha=1)