Vennerable做韦恩图

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

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

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

3个list取交集：

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

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

plot(Vstem3,doWeight = TRUE)

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

plot(Vstem3,type="triangles")

4个list取交集

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

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

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

2.ChowRuskey

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

3.AWFE

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

参考：https://rdrr.io/rforge/Vennerable/f/inst/doc/Venn.pdf
欢迎关注~

公众号二维码.jpg