Vennerable做韦恩图

代码语言：javascript复制

#Install the latest version of this package by entering the following in R:
install.packages("remotes")
remotes::install_github("js229/Vennerable")

导入测试数据，StemCell数据为4个基因list.

代码语言：javascript复制

library(Vennerable)
data(StemCell)
str(StemCell)

3个list取交集：

代码语言：javascript复制

Vstem3<-Vstem[, c("OCT4", "SOX2", "NANOG")]
plot(Vstem3, doWeights = FALSE)

此外，还可以根据集合的大小改变圈圈的大小：

代码语言：javascript复制

plot(Vstem3,doWeight = TRUE)

除了常规的圆圈，还可以用三角形取交集：

代码语言：javascript复制

plot(Vstem3,type="triangles")

4个list取交集

代码语言：javascript复制

Vstem <- Venn(StemCell)
plot(Vstem, doWeights = FALSE,type="ellipses")

此外，还有各种不同的表现方式： 1.squares

代码语言：javascript复制

plot(Vstem, doWeights = FALSE,type="squares")

2.ChowRuskey

代码语言：javascript复制

plot(Vstem, doWeights = FALSE,type="ChowRuskey")

3.AWFE

代码语言：javascript复制

plot(Vstem, doWeights = FALSE,type="AWFE")

参考：https://rdrr.io/rforge/Vennerable/f/inst/doc/Venn.pdf

list 集合 数据

0 人点赞