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
Upset plot:进阶版Venn plot实现多元素可视化
by
Tags:
Leave a Reply