先查看原来列表元素顺序

    1. names(inputlist)
    2. # [1] "B cells" "CD4 T"   "CD8 T"   "cycling" "DC"      "Mac"     "Mono"    "NK"     
    3. # [9] "other"   "pDC" 
    5. length(inputlist[[1]])
    6. # [1] 1

    按照基因数量从大到小排序，方便后面upset图横向从大到小排列。

    1. mylist=inputlist[order(sapply(inputlist, length),decreasing = T)]

    然后查看新的列表元素顺序

    1. names(mylist)
    2. # [1] "Mac"     "DC"      "Mono"    "NK"      "other"   "CD4 T"   "CD8 T"   "pDC"    
    3. # [9] "B cells" "cycling"> 
    5. length(mylist[[1]])
    6. #[1] 451