Upset plot:进阶版Venn plot实现多元素可视化

if (!requireNamespace("BiocManager", quietly = TRUE))
    install.packages("BiocManager")
BiocManager::install("UpSetR")
library(UpSetR)
pathway=read.table("carp_combined_id1.xls",header=T,sep="\t")
upset(pathway,nsets = 9, nintersects = 50,mb.ratio = c(0.5, 0.5),
      order.by = "freq", decreasing = c(TRUE,FALSE),
      queries = list(list(query=intersects, params=list("datra", "caaur","meamb","onmac","ctide","cycar","sigra","sians","sirhi"), color="red", active=T)))
#详细参数查看官网
#行列转置awk '{for(i=0;++i<=NF;)a[i]=a[i]?a[i] FS $i:$i}END{for(i=0;i++ carp_combined_absentid_convert.txt