## 做一个9个大组之间的重叠图。
## 看9个大组之间的并集和交集




## 加载包
library(readxl)
library(VIM)
## Loading required package: colorspace
## Loading required package: grid
## Loading required package: data.table
## VIM is ready to use. 
##  Since version 4.0.0 the GUI is in its own package VIMGUI.
## 
##           Please use the package to use the new (and old) GUI.
## Suggestions and bug-reports can be submitted at: https://github.com/alexkowa/VIM/issues
## 
## Attaching package: 'VIM'
## The following object is masked from 'package:datasets':
## 
##     sleep
library(ggplot2)
## Warning: package 'ggplot2' was built under R version 3.3.2
library(dplyr)
## -------------------------------------------------------------------------
## data.table + dplyr code now lives in dtplyr.
## Please library(dtplyr)!
## -------------------------------------------------------------------------
## 
## Attaching package: 'dplyr'
## The following objects are masked from 'package:data.table':
## 
##     between, last
## The following objects are masked from 'package:stats':
## 
##     filter, lag
## The following objects are masked from 'package:base':
## 
##     intersect, setdiff, setequal, union
library(Hmisc)
## Loading required package: lattice
## Loading required package: survival
## Loading required package: Formula
## 
## Attaching package: 'Hmisc'
## The following objects are masked from 'package:dplyr':
## 
##     combine, src, summarize
## The following objects are masked from 'package:base':
## 
##     format.pval, round.POSIXt, trunc.POSIXt, units
library(reshape2)
## 
## Attaching package: 'reshape2'
## The following objects are masked from 'package:data.table':
## 
##     dcast, melt
library(VennDiagram)
## Loading required package: futile.logger
theme_set(theme_bw(base_family = "STKaiti"))

## 读取数据
ansdata <- read_excel("Array_data_nobackground_normalised.xlsx")
summary(ansdata)
##     Factor          Factor_group         Array data      
##  Length:6400        Length:6400        Min.   :    0.76  
##  Class :character   Class :character   1st Qu.:   80.23  
##  Mode  :character   Mode  :character   Median :  143.06  
##                                        Mean   : 1487.96  
##                                        3rd Qu.:  316.36  
##                                        Max.   :59801.26  
##                                                          
##   Patient Id        Collection_Date     Illness_Day      Outcome         
##  Length:6400        Length:6400        Min.   : 3.00   Length:6400       
##  Class :character   Class :character   1st Qu.:11.00   Class :character  
##  Mode  :character   Mode  :character   Median :15.00   Mode  :character  
##                                        Mean   :17.89                     
##                                        3rd Qu.:23.00                     
##                                        Max.   :68.00                     
##                                        NA's   :400                       
##       Age            Sex            Disease Phase Sampling Categry  
##  Min.   : 6.00   Length:6400        Min.   :1.0   Length:6400       
##  1st Qu.:41.00   Class :character   1st Qu.:2.0   Class :character  
##  Median :55.00   Mode  :character   Median :2.0   Mode  :character  
##  Mean   :53.67                      Mean   :2.2                     
##  3rd Qu.:67.00                      3rd Qu.:3.0                     
##  Max.   :82.00                      Max.   :4.0                     
##  NA's   :400                        NA's   :400
## 处理缺失值
sum(is.na(ansdata))
## [1] 2480
par(cex = 0.8)
# VIM::aggr(ansdata)

colnames(ansdata) <- c("factor","factorgroup","arraydata","paintID",
                       "collectiondate","illnessday","outcom","age","sex",
                       "diseaPH","SampleCategry")
summary(ansdata)
##     factor          factorgroup          arraydata       
##  Length:6400        Length:6400        Min.   :    0.76  
##  Class :character   Class :character   1st Qu.:   80.23  
##  Mode  :character   Mode  :character   Median :  143.06  
##                                        Mean   : 1487.96  
##                                        3rd Qu.:  316.36  
##                                        Max.   :59801.26  
##                                                          
##    paintID          collectiondate       illnessday       outcom         
##  Length:6400        Length:6400        Min.   : 3.00   Length:6400       
##  Class :character   Class :character   1st Qu.:11.00   Class :character  
##  Mode  :character   Mode  :character   Median :15.00   Mode  :character  
##                                        Mean   :17.89                     
##                                        3rd Qu.:23.00                     
##                                        Max.   :68.00                     
##                                        NA's   :400                       
##       age            sex               diseaPH    SampleCategry     
##  Min.   : 6.00   Length:6400        Min.   :1.0   Length:6400       
##  1st Qu.:41.00   Class :character   1st Qu.:2.0   Class :character  
##  Median :55.00   Mode  :character   Median :2.0   Mode  :character  
##  Mean   :53.67                      Mean   :2.2                     
##  3rd Qu.:67.00                      3rd Qu.:3.0                     
##  Max.   :82.00                      Max.   :4.0                     
##  NA's   :400                        NA's   :400
## 对数据进行分析

# ## 剔除带有缺失值的行
# usedata <- na.omit(usedata)
# VIM::aggr(usedata)

usedata2 <- ansdata%>%
  group_by(factor,factorgroup,sex,outcom)

usedata2$outSC <- paste(usedata2$outcom,usedata2$SampleCategry,sep = "-")
## "Fatal-All other"数据表中细胞自建的相关性
## 然后把各大组的pairwusecorrelation(r>=0.8,p<=0.05)分别总结出来。
## 准备数据
table(usedata2$outSC)
## 
##  Fatal-All other      Fatal-First       Fatal-Last    Healthy-First 
##              640              480              480              400 
##   Mild-All other       Mild-First Severe-All other     Severe-First 
##              480              560             1600              880 
##      Severe-Last 
##              880
corrdata <- usedata2[usedata2$outSC == "Fatal-All other",c(1,2,3,12)]
corrdata2 <- corrdata[c("factor","arraydata")]
corrdata2$factor <- factor(corrdata2$factor)

## 查看因子的个数
table(corrdata2$factor)
## 
##      ANG     BDNF      BLC    CCL11    CCL24    CCL26  Ck-b8-1     CSF1 
##        8        8        8        8        8        8        8        8 
##     CSF2     CSF3   CX3CL1      EGF   ENA-78    FGF-4    FGF-6    FGF-7 
##        8        8        8        8        8        8        8        8 
##    FGF-9 Flt-3-LG    GCP-2     GDNF      GRO    GRO-a      HGF    I-309 
##        8        8        8        8        8        8        8        8 
##    IFN-g    IGF-I  IGFBP-1  IGFBP-2  IGFBP-3  IGFBP-4    IL-10 IL-12p70 
##        8        8        8        8        8        8        8        8 
##    IL-13    IL-15    IL-16    IL-1a    IL-1b     IL-2     IL-3     IL-4 
##        8        8        8        8        8        8        8        8 
##     IL-5     IL-6     IL-7     IL-8    IP-10   Leptin      LIF    LIGHT 
##        8        8        8        8        8        8        8        8 
##    MCP-1    MCP-2    MCP-3    MCP-4      MDC      MIF      MIG   MIP-1b 
##        8        8        8        8        8        8        8        8 
##   MIP-1d   MIP-3a    NAP-2     NT-3     NT-4      OPG      OPN      OSM 
##        8        8        8        8        8        8        8        8 
##     PARC  PDGF-BB     PIGF   RANTES      SCF    SDF-1     TARC   TGF-b1 
##        8        8        8        8        8        8        8        8 
##   TGF-b2   TGF-b3     THPO   TIMP-1   TIMP-2    TNF-a    TNF-b     VEGF 
##        8        8        8        8        8        8        8        8
n <- length(table(corrdata2$factor))
## 变换数据
corrdata3 <- as.data.frame(split(corrdata2$arraydata,corrdata2$factor))
## 计算相关系数
sper <- rcorr(as.matrix(corrdata3),type = "pearson")
## 相关系数矩阵
rellation <- as.data.frame(sper$r)
## 生成相应的基因组合
hang <- matrix(rownames(rellation), nrow = n, ncol = n,byrow = FALSE)
lie <- matrix(colnames(rellation),nrow = n,ncol = n,byrow = TRUE)
zuhe <- matrix(paste(hang,lie,sep = "~"),nrow = n)
## 对相应的数据取下三角形的数值
lowrel <- rellation[lower.tri(rellation)]
lowp <- sper$P[lower.tri(sper$P)]
lowzuhe <- zuhe[lower.tri(zuhe)]
## 找到相关系数中 r>=0.8,p<=0.05) 的基因组合
usezuhe1 <- lowzuhe[which(lowrel >=0.8 & lowzuhe !=1 & lowp <= 0.05)]
usezuhe1
##   [1] "GDNF~ANG"        "IL.4~BDNF"       "NAP.2~BDNF"     
##   [4] "PDGF.BB~BDNF"    "RANTES~BDNF"     "EGF~BLC"        
##   [7] "MCP.2~BLC"       "VEGF~BLC"        "GRO.a~CCL24"    
##  [10] "FGF.4~CCL26"     "FGF.9~CCL26"     "SDF.1~CCL26"    
##  [13] "IL.1b~Ck.b8.1"   "IL.4~CSF1"       "CSF3~CSF2"      
##  [16] "IFN.g~CSF2"      "IL.10~CSF2"      "IL.13~CSF2"     
##  [19] "IL.15~CSF2"      "IL.1a~CSF2"      "IL.2~CSF2"      
##  [22] "IL.5~CSF2"       "IL.7~CSF2"       "MCP.1~CSF2"     
##  [25] "MIG~CSF2"        "PARC~CSF2"       "TGF.b1~CSF2"    
##  [28] "TNF.a~CSF2"      "TNF.b~CSF2"      "IFN.g~CSF3"     
##  [31] "IL.10~CSF3"      "IL.13~CSF3"      "IL.15~CSF3"     
##  [34] "IL.1a~CSF3"      "IL.2~CSF3"       "IL.5~CSF3"      
##  [37] "IL.7~CSF3"       "MCP.1~CSF3"      "MIG~CSF3"       
##  [40] "PARC~CSF3"       "TGF.b1~CSF3"     "TNF.a~CSF3"     
##  [43] "TNF.b~CSF3"      "GRO~EGF"         "IL.1b~EGF"      
##  [46] "PDGF.BB~EGF"     "RANTES~EGF"      "VEGF~EGF"       
##  [49] "GDNF~ENA.78"     "IP.10~ENA.78"    "MCP.2~ENA.78"   
##  [52] "MCP.3~ENA.78"    "TIMP.1~ENA.78"   "FGF.7~FGF.4"    
##  [55] "OSM~FGF.4"       "HGF~FGF.7"       "IGFBP.3~FGF.7"  
##  [58] "IGFBP.4~FGF.7"   "IP.10~FGF.7"     "MCP.3~FGF.7"    
##  [61] "MIP.1d~FGF.7"    "OPG~FGF.7"       "OPN~FGF.7"      
##  [64] "SCF~FGF.7"       "IL.12p70~GDNF"   "IP.10~GDNF"     
##  [67] "MCP.2~GDNF"      "MCP.3~GDNF"      "PIGF~GDNF"      
##  [70] "TIMP.1~GDNF"     "IL.12p70~GRO"    "MIF~GRO"        
##  [73] "NAP.2~GRO"       "PIGF~GRO"        "RANTES~GRO"     
##  [76] "TIMP.1~GRO"      "NT.3~GRO.a"      "TARC~GRO.a"     
##  [79] "IP.10~HGF"       "MCP.3~HGF"       "OPG~HGF"        
##  [82] "OPN~HGF"         "IL.16~I.309"     "IL.10~IFN.g"    
##  [85] "IL.13~IFN.g"     "IL.15~IFN.g"     "IL.1a~IFN.g"    
##  [88] "IL.2~IFN.g"      "IL.5~IFN.g"      "IL.7~IFN.g"     
##  [91] "MCP.1~IFN.g"     "MIG~IFN.g"       "PARC~IFN.g"     
##  [94] "TGF.b1~IFN.g"    "TNF.a~IFN.g"     "TNF.b~IFN.g"    
##  [97] "MCP.4~IGF.I"     "IGFBP.2~IGFBP.1" "TIMP.2~IGFBP.1" 
## [100] "TIMP.2~IGFBP.2"  "IGFBP.4~IGFBP.3" "IP.10~IGFBP.3"  
## [103] "MCP.3~IGFBP.3"   "OPG~IGFBP.3"     "OPN~IGFBP.3"    
## [106] "SCF~IGFBP.3"     "OPG~IGFBP.4"     "OPN~IGFBP.4"    
## [109] "SCF~IGFBP.4"     "IL.13~IL.10"     "IL.15~IL.10"    
## [112] "IL.1a~IL.10"     "IL.2~IL.10"      "IL.5~IL.10"     
## [115] "IL.7~IL.10"      "MCP.1~IL.10"     "MIG~IL.10"      
## [118] "PARC~IL.10"      "TGF.b1~IL.10"    "TNF.a~IL.10"    
## [121] "TNF.b~IL.10"     "IL.16~IL.12p70"  "MCP.2~IL.12p70" 
## [124] "MIF~IL.12p70"    "PIGF~IL.12p70"   "TIMP.1~IL.12p70"
## [127] "IL.15~IL.13"     "IL.1a~IL.13"     "IL.2~IL.13"     
## [130] "IL.5~IL.13"      "IL.7~IL.13"      "MCP.1~IL.13"    
## [133] "MIG~IL.13"       "PARC~IL.13"      "TARC~IL.13"     
## [136] "TGF.b1~IL.13"    "TNF.a~IL.13"     "TNF.b~IL.13"    
## [139] "IL.1a~IL.15"     "IL.2~IL.15"      "IL.5~IL.15"     
## [142] "IL.7~IL.15"      "MCP.1~IL.15"     "MIG~IL.15"      
## [145] "PARC~IL.15"      "TGF.b1~IL.15"    "TNF.a~IL.15"    
## [148] "TNF.b~IL.15"     "MIF~IL.16"       "IL.2~IL.1a"     
## [151] "IL.5~IL.1a"      "IL.7~IL.1a"      "MCP.1~IL.1a"    
## [154] "MIG~IL.1a"       "PARC~IL.1a"      "TGF.b1~IL.1a"   
## [157] "TNF.a~IL.1a"     "TNF.b~IL.1a"     "IL.5~IL.2"      
## [160] "IL.7~IL.2"       "MCP.1~IL.2"      "MIG~IL.2"       
## [163] "PARC~IL.2"       "TGF.b1~IL.2"     "TNF.a~IL.2"     
## [166] "TNF.b~IL.2"      "NAP.2~IL.4"      "IL.7~IL.5"      
## [169] "IL.8~IL.5"       "MCP.1~IL.5"      "MIG~IL.5"       
## [172] "PARC~IL.5"       "TGF.b1~IL.5"     "TNF.a~IL.5"     
## [175] "TNF.b~IL.5"      "IL.8~IL.7"       "MCP.1~IL.7"     
## [178] "MIG~IL.7"        "PARC~IL.7"       "TGF.b1~IL.7"    
## [181] "TNF.a~IL.7"      "TNF.b~IL.7"      "MCP.2~IP.10"    
## [184] "MCP.3~IP.10"     "OPG~IP.10"       "OPN~IP.10"      
## [187] "TIMP.1~IP.10"    "NT.3~LIF"        "MIG~MCP.1"      
## [190] "TGF.b1~MCP.1"    "TNF.a~MCP.1"     "TNF.b~MCP.1"    
## [193] "MIF~MCP.2"       "TIMP.1~MCP.2"    "VEGF~MCP.2"     
## [196] "OPG~MCP.3"       "OPN~MCP.3"       "TIMP.1~MCP.3"   
## [199] "PIGF~MIF"        "TIMP.1~MIF"      "PARC~MIG"       
## [202] "TGF.b1~MIG"      "TNF.a~MIG"       "TNF.b~MIG"      
## [205] "NT.3~MIP.1b"     "TARC~MIP.1b"     "PDGF.BB~NAP.2"  
## [208] "RANTES~NAP.2"    "TARC~NT.3"       "OPN~OPG"        
## [211] "SCF~OPG"         "SCF~OPN"         "TGF.b1~PARC"    
## [214] "TNF.a~PARC"      "TNF.b~PARC"      "RANTES~PDGF.BB" 
## [217] "TIMP.1~PIGF"     "TGF.b1~TARC"     "TNF.a~TGF.b1"   
## [220] "TNF.b~TGF.b1"    "TNF.b~TNF.a"
comcor <- function(data,minre1 = 0.8,minre2 = -0.8,maxp = 0.05){
  ## 该函数用来计算相关系数,并且的高符合要求的组合
  ## data : 数据,一列为基因,另一列为相应的浓度
  ## minre = 0.8 最小的相关系数
  ## maxp = 0.05 最大的相关系数显著性值
  library(Hmisc)
  ## 查看因子的个数
  ## data <- corrdata2
  corrdata2 <- data
  names(corrdata2) <- c("factor","arraydata")
  ## 查看因子的个数
  n <- length(table(corrdata2$factor))
  ## 变换数据
  corrdata3 <- as.data.frame(split(corrdata2$arraydata,corrdata2$factor))
  ## 计算相关系数
  sper <- rcorr(as.matrix(corrdata3),type = "pearson")
  ## 相关系数矩阵
  rellation <- as.data.frame(sper$r)
  ## 生成相应的基因组合
  hang <- matrix(rownames(rellation), nrow = n, ncol = n,byrow = FALSE)
  lie <- matrix(colnames(rellation),nrow = n,ncol = n,byrow = TRUE)
  zuhe <- matrix(paste(hang,lie,sep = "~"),nrow = n)
  ## 对相应的数据取下三角形的数值
  lowrel <- rellation[lower.tri(rellation)]
  lowp <- sper$P[lower.tri(sper$P)]
  lowzuhe <- zuhe[lower.tri(zuhe)]
  ## 找到相关系数中 r>=0.8,p<=0.05) 的基因组合
  usezuhe1 <- lowzuhe[which((lowrel >=minre1 | lowrel <=minre2) & lowzuhe !=1 & lowp <= maxp)]
  return(usezuhe1)
}
## "Fatal-All other"数据表中细胞自建的相关性
## 然后把各大组的pairwusecorrelation(r>=0.8,p<=0.05)分别总结出来。
## 准备数据
table(usedata2$outSC)
## 
##  Fatal-All other      Fatal-First       Fatal-Last    Healthy-First 
##              640              480              480              400 
##   Mild-All other       Mild-First Severe-All other     Severe-First 
##              480              560             1600              880 
##      Severe-Last 
##              880
corrdata <- usedata2[usedata2$outSC == "Fatal-All other",c(1,2,3,12)]
corrdata2 <- corrdata[c("factor","arraydata")]
corrdata2$factor <- factor(corrdata2$factor)
## 找出组合
zuheFA <- comcor(corrdata2)
zuheFA
##   [1] "GDNF~ANG"        "IL.4~BDNF"       "NAP.2~BDNF"     
##   [4] "PDGF.BB~BDNF"    "RANTES~BDNF"     "EGF~BLC"        
##   [7] "MCP.2~BLC"       "VEGF~BLC"        "OSM~CCL11"      
##  [10] "GRO.a~CCL24"     "FGF.4~CCL26"     "FGF.9~CCL26"    
##  [13] "SDF.1~CCL26"     "IL.1b~Ck.b8.1"   "IL.4~CSF1"      
##  [16] "CSF3~CSF2"       "IFN.g~CSF2"      "IL.10~CSF2"     
##  [19] "IL.13~CSF2"      "IL.15~CSF2"      "IL.1a~CSF2"     
##  [22] "IL.2~CSF2"       "IL.5~CSF2"       "IL.7~CSF2"      
##  [25] "MCP.1~CSF2"      "MIG~CSF2"        "PARC~CSF2"      
##  [28] "TGF.b1~CSF2"     "TNF.a~CSF2"      "TNF.b~CSF2"     
##  [31] "IFN.g~CSF3"      "IL.10~CSF3"      "IL.13~CSF3"     
##  [34] "IL.15~CSF3"      "IL.1a~CSF3"      "IL.2~CSF3"      
##  [37] "IL.5~CSF3"       "IL.7~CSF3"       "MCP.1~CSF3"     
##  [40] "MIG~CSF3"        "PARC~CSF3"       "TGF.b1~CSF3"    
##  [43] "TNF.a~CSF3"      "TNF.b~CSF3"      "SDF.1~CX3CL1"   
##  [46] "GRO~EGF"         "IL.1b~EGF"       "PDGF.BB~EGF"    
##  [49] "RANTES~EGF"      "VEGF~EGF"        "GDNF~ENA.78"    
##  [52] "IP.10~ENA.78"    "MCP.2~ENA.78"    "MCP.3~ENA.78"   
##  [55] "TIMP.1~ENA.78"   "FGF.7~FGF.4"     "OSM~FGF.4"      
##  [58] "HGF~FGF.7"       "IGFBP.3~FGF.7"   "IGFBP.4~FGF.7"  
##  [61] "IP.10~FGF.7"     "MCP.3~FGF.7"     "MIP.1d~FGF.7"   
##  [64] "OPG~FGF.7"       "OPN~FGF.7"       "SCF~FGF.7"      
##  [67] "IL.12p70~GDNF"   "IP.10~GDNF"      "MCP.2~GDNF"     
##  [70] "MCP.3~GDNF"      "PIGF~GDNF"       "TIMP.1~GDNF"    
##  [73] "IL.12p70~GRO"    "MIF~GRO"         "NAP.2~GRO"      
##  [76] "PIGF~GRO"        "RANTES~GRO"      "TIMP.1~GRO"     
##  [79] "NT.3~GRO.a"      "TARC~GRO.a"      "IP.10~HGF"      
##  [82] "MCP.3~HGF"       "OPG~HGF"         "OPN~HGF"        
##  [85] "IL.16~I.309"     "TGF.b2~I.309"    "IL.10~IFN.g"    
##  [88] "IL.13~IFN.g"     "IL.15~IFN.g"     "IL.1a~IFN.g"    
##  [91] "IL.2~IFN.g"      "IL.5~IFN.g"      "IL.7~IFN.g"     
##  [94] "MCP.1~IFN.g"     "MIG~IFN.g"       "PARC~IFN.g"     
##  [97] "TGF.b1~IFN.g"    "TNF.a~IFN.g"     "TNF.b~IFN.g"    
## [100] "MCP.4~IGF.I"     "IGFBP.2~IGFBP.1" "IL.1b~IGFBP.1"  
## [103] "TIMP.2~IGFBP.1"  "TIMP.2~IGFBP.2"  "IGFBP.4~IGFBP.3"
## [106] "IP.10~IGFBP.3"   "MCP.3~IGFBP.3"   "OPG~IGFBP.3"    
## [109] "OPN~IGFBP.3"     "SCF~IGFBP.3"     "OPG~IGFBP.4"    
## [112] "OPN~IGFBP.4"     "SCF~IGFBP.4"     "IL.13~IL.10"    
## [115] "IL.15~IL.10"     "IL.1a~IL.10"     "IL.2~IL.10"     
## [118] "IL.5~IL.10"      "IL.7~IL.10"      "MCP.1~IL.10"    
## [121] "MIG~IL.10"       "PARC~IL.10"      "TGF.b1~IL.10"   
## [124] "THPO~IL.10"      "TNF.a~IL.10"     "TNF.b~IL.10"    
## [127] "IL.16~IL.12p70"  "MCP.2~IL.12p70"  "MIF~IL.12p70"   
## [130] "PIGF~IL.12p70"   "TIMP.1~IL.12p70" "IL.15~IL.13"    
## [133] "IL.1a~IL.13"     "IL.2~IL.13"      "IL.5~IL.13"     
## [136] "IL.7~IL.13"      "MCP.1~IL.13"     "MIG~IL.13"      
## [139] "PARC~IL.13"      "TARC~IL.13"      "TGF.b1~IL.13"   
## [142] "TNF.a~IL.13"     "TNF.b~IL.13"     "IL.1a~IL.15"    
## [145] "IL.2~IL.15"      "IL.5~IL.15"      "IL.7~IL.15"     
## [148] "MCP.1~IL.15"     "MIG~IL.15"       "PARC~IL.15"     
## [151] "TGF.b1~IL.15"    "TNF.a~IL.15"     "TNF.b~IL.15"    
## [154] "MIF~IL.16"       "TGF.b2~IL.16"    "IL.2~IL.1a"     
## [157] "IL.5~IL.1a"      "IL.7~IL.1a"      "MCP.1~IL.1a"    
## [160] "MIG~IL.1a"       "PARC~IL.1a"      "TGF.b1~IL.1a"   
## [163] "THPO~IL.1a"      "TNF.a~IL.1a"     "TNF.b~IL.1a"    
## [166] "IL.5~IL.2"       "IL.7~IL.2"       "MCP.1~IL.2"     
## [169] "MIG~IL.2"        "PARC~IL.2"       "TGF.b1~IL.2"    
## [172] "TNF.a~IL.2"      "TNF.b~IL.2"      "NAP.2~IL.4"     
## [175] "IL.7~IL.5"       "IL.8~IL.5"       "MCP.1~IL.5"     
## [178] "MIG~IL.5"        "PARC~IL.5"       "TGF.b1~IL.5"    
## [181] "TNF.a~IL.5"      "TNF.b~IL.5"      "IL.8~IL.7"      
## [184] "MCP.1~IL.7"      "MIG~IL.7"        "PARC~IL.7"      
## [187] "TGF.b1~IL.7"     "TNF.a~IL.7"      "TNF.b~IL.7"     
## [190] "TGF.b3~IL.8"     "MCP.2~IP.10"     "MCP.3~IP.10"    
## [193] "OPG~IP.10"       "OPN~IP.10"       "TIMP.1~IP.10"   
## [196] "NT.3~LIF"        "MIG~MCP.1"       "TGF.b1~MCP.1"   
## [199] "THPO~MCP.1"      "TNF.a~MCP.1"     "TNF.b~MCP.1"    
## [202] "MIF~MCP.2"       "TIMP.1~MCP.2"    "VEGF~MCP.2"     
## [205] "OPG~MCP.3"       "OPN~MCP.3"       "TIMP.1~MCP.3"   
## [208] "PIGF~MDC"        "PIGF~MIF"        "TIMP.1~MIF"     
## [211] "PARC~MIG"        "TGF.b1~MIG"      "TNF.a~MIG"      
## [214] "TNF.b~MIG"       "NT.3~MIP.1b"     "TARC~MIP.1b"    
## [217] "PDGF.BB~NAP.2"   "RANTES~NAP.2"    "TARC~NT.3"      
## [220] "OPN~OPG"         "SCF~OPG"         "SCF~OPN"        
## [223] "TGF.b1~PARC"     "TNF.a~PARC"      "TNF.b~PARC"     
## [226] "RANTES~PDGF.BB"  "TIMP.1~PIGF"     "TGF.b1~TARC"    
## [229] "TNF.a~TGF.b1"    "TNF.b~TGF.b1"    "TNF.b~TNF.a"
## "Fatal-All other"数据表中细胞自建的相关性
## 然后把各大组的pairwusecorrelation(r>=0.8,p<=0.05)分别总结出来。
## 准备数据
table(usedata2$outSC)
## 
##  Fatal-All other      Fatal-First       Fatal-Last    Healthy-First 
##              640              480              480              400 
##   Mild-All other       Mild-First Severe-All other     Severe-First 
##              480              560             1600              880 
##      Severe-Last 
##              880
corrdata <- usedata2[usedata2$outSC == "Fatal-First",c(1,2,3,12)]
corrdata2 <- corrdata[c("factor","arraydata")]
corrdata2$factor <- factor(corrdata2$factor)
table(corrdata2$factor)
## 
##      ANG     BDNF      BLC    CCL11    CCL24    CCL26  Ck-b8-1     CSF1 
##        6        6        6        6        6        6        6        6 
##     CSF2     CSF3   CX3CL1      EGF   ENA-78    FGF-4    FGF-6    FGF-7 
##        6        6        6        6        6        6        6        6 
##    FGF-9 Flt-3-LG    GCP-2     GDNF      GRO    GRO-a      HGF    I-309 
##        6        6        6        6        6        6        6        6 
##    IFN-g    IGF-I  IGFBP-1  IGFBP-2  IGFBP-3  IGFBP-4    IL-10 IL-12p70 
##        6        6        6        6        6        6        6        6 
##    IL-13    IL-15    IL-16    IL-1a    IL-1b     IL-2     IL-3     IL-4 
##        6        6        6        6        6        6        6        6 
##     IL-5     IL-6     IL-7     IL-8    IP-10   Leptin      LIF    LIGHT 
##        6        6        6        6        6        6        6        6 
##    MCP-1    MCP-2    MCP-3    MCP-4      MDC      MIF      MIG   MIP-1b 
##        6        6        6        6        6        6        6        6 
##   MIP-1d   MIP-3a    NAP-2     NT-3     NT-4      OPG      OPN      OSM 
##        6        6        6        6        6        6        6        6 
##     PARC  PDGF-BB     PIGF   RANTES      SCF    SDF-1     TARC   TGF-b1 
##        6        6        6        6        6        6        6        6 
##   TGF-b2   TGF-b3     THPO   TIMP-1   TIMP-2    TNF-a    TNF-b     VEGF 
##        6        6        6        6        6        6        6        6
## 找出组合
zuheFF <- comcor(corrdata2)
zuheFF
##   [1] "IL.12p70~ANG"     "IP.10~ANG"        "IGFBP.1~BDNF"    
##   [4] "LIF~BDNF"         "MCP.3~BDNF"       "MIP.1b~BDNF"     
##   [7] "PDGF.BB~BDNF"     "LIGHT~BLC"        "OPN~CCL11"       
##  [10] "TGF.b2~CCL24"     "CX3CL1~CCL26"     "FGF.9~CCL26"     
##  [13] "IL.12p70~CCL26"   "IL.3~CCL26"       "IL.4~CCL26"      
##  [16] "MCP.4~CCL26"      "MDC~CCL26"        "MIP.1d~CCL26"    
##  [19] "PIGF~CCL26"       "SDF.1~CCL26"      "FGF.4~Ck.b8.1"   
##  [22] "FGF.7~Ck.b8.1"    "HGF~Ck.b8.1"      "I.309~Ck.b8.1"   
##  [25] "IGFBP.4~Ck.b8.1"  "MCP.4~Ck.b8.1"    "MIP.3a~Ck.b8.1"  
##  [28] "SCF~Ck.b8.1"      "IGFBP.1~CSF1"     "IP.10~CSF1"      
##  [31] "TIMP.2~CSF1"      "CSF3~CSF2"        "IFN.g~CSF2"      
##  [34] "IL.10~CSF2"       "IL.13~CSF2"       "IL.15~CSF2"      
##  [37] "IL.1a~CSF2"       "IL.2~CSF2"        "IL.5~CSF2"       
##  [40] "IL.7~CSF2"        "MCP.1~CSF2"       "MDC~CSF2"        
##  [43] "MIG~CSF2"         "NT.3~CSF2"        "TGF.b1~CSF2"     
##  [46] "TNF.a~CSF2"       "TNF.b~CSF2"       "IFN.g~CSF3"      
##  [49] "IL.10~CSF3"       "IL.13~CSF3"       "IL.15~CSF3"      
##  [52] "IL.1a~CSF3"       "IL.2~CSF3"        "IL.5~CSF3"       
##  [55] "IL.7~CSF3"        "MCP.1~CSF3"       "MIG~CSF3"        
##  [58] "NT.3~CSF3"        "TGF.b1~CSF3"      "TNF.a~CSF3"      
##  [61] "TNF.b~CSF3"       "FGF.9~CX3CL1"     "LIF~CX3CL1"      
##  [64] "MCP.4~CX3CL1"     "MDC~CX3CL1"       "PIGF~CX3CL1"     
##  [67] "THPO~CX3CL1"      "VEGF~CX3CL1"      "MCP.2~EGF"       
##  [70] "FGF.7~FGF.4"      "HGF~FGF.4"        "I.309~FGF.4"     
##  [73] "IGFBP.3~FGF.4"    "IGFBP.4~FGF.4"    "MIP.3a~FGF.4"    
##  [76] "OPG~FGF.4"        "SCF~FGF.4"        "TIMP.2~FGF.4"    
##  [79] "LIGHT~FGF.6"      "MIP.1d~FGF.6"     "HGF~FGF.7"       
##  [82] "I.309~FGF.7"      "IGFBP.3~FGF.7"    "MIF~FGF.7"       
##  [85] "MIP.3a~FGF.7"     "OPG~FGF.7"        "RANTES~FGF.7"    
##  [88] "SCF~FGF.7"        "TIMP.2~FGF.7"     "IL.3~FGF.9"      
##  [91] "NT.4~FGF.9"       "PIGF~FGF.9"       "SDF.1~FGF.9"     
##  [94] "THPO~FGF.9"       "VEGF~FGF.9"       "GDNF~Flt.3.LG"   
##  [97] "IGFBP.1~Flt.3.LG" "MCP.2~Flt.3.LG"   "NAP.2~Flt.3.LG"  
## [100] "HGF~GCP.2"        "IGFBP.3~GCP.2"    "MCP.3~GCP.2"     
## [103] "MIP.1b~GCP.2"     "MIP.3a~GCP.2"     "OPG~GCP.2"       
## [106] "TIMP.2~GCP.2"     "MCP.2~GDNF"       "IGFBP.2~GRO"     
## [109] "Leptin~GRO"       "PARC~GRO"         "IL.10~GRO.a"     
## [112] "IL.1a~GRO.a"      "IL.2~GRO.a"       "IL.6~GRO.a"      
## [115] "MIG~GRO.a"        "NT.3~GRO.a"       "PARC~GRO.a"      
## [118] "TNF.a~GRO.a"      "TNF.b~GRO.a"      "I.309~HGF"       
## [121] "IGFBP.3~HGF"      "MCP.3~HGF"        "MIF~HGF"         
## [124] "MIP.1b~HGF"       "MIP.3a~HGF"       "OPG~HGF"         
## [127] "RANTES~HGF"       "SCF~HGF"          "TIMP.2~HGF"      
## [130] "IGFBP.3~I.309"    "MCP.4~I.309"      "MIP.3a~I.309"    
## [133] "OPG~I.309"        "SCF~I.309"        "TIMP.2~I.309"    
## [136] "IL.10~IFN.g"      "IL.13~IFN.g"      "IL.15~IFN.g"     
## [139] "IL.1a~IFN.g"      "IL.2~IFN.g"       "IL.5~IFN.g"      
## [142] "IL.7~IFN.g"       "MCP.1~IFN.g"      "MIG~IFN.g"       
## [145] "NT.3~IFN.g"       "TGF.b1~IFN.g"     "TNF.a~IFN.g"     
## [148] "TNF.b~IFN.g"      "LIGHT~IGF.I"      "MIP.1d~IGF.I"    
## [151] "NT.4~IGF.I"       "IGFBP.3~IGFBP.1"  "IP.10~IGFBP.1"   
## [154] "MCP.3~IGFBP.1"    "MIP.1b~IGFBP.1"   "NAP.2~IGFBP.1"   
## [157] "OPG~IGFBP.1"      "IL.4~IGFBP.2"     "Leptin~IGFBP.2"  
## [160] "PARC~IGFBP.2"     "IP.10~IGFBP.3"    "MCP.3~IGFBP.3"   
## [163] "MIP.1b~IGFBP.3"   "MIP.3a~IGFBP.3"   "OPG~IGFBP.3"     
## [166] "SCF~IGFBP.3"      "TIMP.2~IGFBP.3"   "LIF~IGFBP.4"     
## [169] "NT.4~IGFBP.4"     "OSM~IGFBP.4"      "SCF~IGFBP.4"     
## [172] "TGF.b3~IGFBP.4"   "THPO~IGFBP.4"     "IL.13~IL.10"     
## [175] "IL.15~IL.10"      "IL.1a~IL.10"      "IL.2~IL.10"      
## [178] "IL.5~IL.10"       "IL.7~IL.10"       "MCP.1~IL.10"     
## [181] "MIG~IL.10"        "NT.3~IL.10"       "TGF.b1~IL.10"    
## [184] "TNF.a~IL.10"      "TNF.b~IL.10"      "IL.4~IL.12p70"   
## [187] "IP.10~IL.12p70"   "Leptin~IL.12p70"  "SDF.1~IL.12p70"  
## [190] "IL.15~IL.13"      "IL.1a~IL.13"      "IL.2~IL.13"      
## [193] "IL.5~IL.13"       "IL.7~IL.13"       "MCP.1~IL.13"     
## [196] "MIG~IL.13"        "NT.3~IL.13"       "TGF.b1~IL.13"    
## [199] "TNF.a~IL.13"      "TNF.b~IL.13"      "IL.1a~IL.15"     
## [202] "IL.2~IL.15"       "IL.5~IL.15"       "IL.7~IL.15"      
## [205] "MIG~IL.15"        "NT.3~IL.15"       "TGF.b1~IL.15"    
## [208] "TNF.a~IL.15"      "TNF.b~IL.15"      "MIF~IL.16"       
## [211] "RANTES~IL.16"     "IL.2~IL.1a"       "IL.6~IL.1a"      
## [214] "MIG~IL.1a"        "NT.3~IL.1a"       "TGF.b1~IL.1a"    
## [217] "TNF.a~IL.1a"      "TNF.b~IL.1a"      "IL.7~IL.1b"      
## [220] "IL.8~IL.1b"       "IL.5~IL.2"        "IL.7~IL.2"       
## [223] "MCP.1~IL.2"       "MIG~IL.2"         "NT.3~IL.2"       
## [226] "TGF.b1~IL.2"      "TNF.a~IL.2"       "TNF.b~IL.2"      
## [229] "PIGF~IL.3"        "SDF.1~IL.3"       "VEGF~IL.3"       
## [232] "Leptin~IL.4"      "SDF.1~IL.4"       "IL.7~IL.5"       
## [235] "MCP.1~IL.5"       "MIG~IL.5"         "NT.3~IL.5"       
## [238] "TGF.b1~IL.5"      "TNF.a~IL.5"       "TNF.b~IL.5"      
## [241] "MCP.1~IL.7"       "MIG~IL.7"         "TGF.b1~IL.7"     
## [244] "TNF.a~IL.7"       "TNF.b~IL.7"       "MCP.3~IP.10"     
## [247] "OPG~IP.10"        "TIMP.2~IP.10"     "PARC~Leptin"     
## [250] "MCP.3~LIF"        "OSM~LIF"          "THPO~LIF"        
## [253] "MIP.1d~LIGHT"     "NT.4~LIGHT"       "MIG~MCP.1"       
## [256] "TGF.b1~MCP.1"     "TNF.a~MCP.1"      "TNF.b~MCP.1"     
## [259] "NAP.2~MCP.2"      "MIP.1b~MCP.3"     "MIP.3a~MCP.3"    
## [262] "OPG~MCP.3"        "SCF~MCP.3"        "TIMP.2~MCP.3"    
## [265] "MDC~MCP.4"        "PIGF~MDC"         "MIP.3a~MIF"      
## [268] "RANTES~MIF"       "NT.3~MIG"         "TGF.b1~MIG"      
## [271] "TNF.a~MIG"        "TNF.b~MIG"        "MIP.3a~MIP.1b"   
## [274] "OPG~MIP.1b"       "SCF~MIP.1b"       "SDF.1~MIP.1d"    
## [277] "OPG~MIP.3a"       "RANTES~MIP.3a"    "SCF~MIP.3a"      
## [280] "TARC~MIP.3a"      "TIMP.2~MIP.3a"    "PDGF.BB~NT.3"    
## [283] "TGF.b1~NT.3"      "TNF.a~NT.3"       "TNF.b~NT.3"      
## [286] "THPO~NT.4"        "VEGF~NT.4"        "SCF~OPG"         
## [289] "TIMP.2~OPG"       "TGF.b3~OSM"       "THPO~OSM"        
## [292] "TIMP.1~OSM"       "SDF.1~PIGF"       "THPO~PIGF"       
## [295] "VEGF~PIGF"        "TARC~RANTES"      "TIMP.2~SCF"      
## [298] "TNF.a~TGF.b1"     "TNF.b~TGF.b1"     "TGF.b3~TGF.b2"   
## [301] "VEGF~THPO"        "TNF.b~TNF.a"
## "Fatal-Last"数据表中细胞自建的相关性
## 然后把各大组的pairwusecorrelation(r>=0.8,p<=0.05)分别总结出来。
## 准备数据
table(usedata2$outSC)
## 
##  Fatal-All other      Fatal-First       Fatal-Last    Healthy-First 
##              640              480              480              400 
##   Mild-All other       Mild-First Severe-All other     Severe-First 
##              480              560             1600              880 
##      Severe-Last 
##              880
corrdata <- usedata2[usedata2$outSC == "Fatal-Last",c(1,2,3,12)]
corrdata2 <- corrdata[c("factor","arraydata")]
corrdata2$factor <- factor(corrdata2$factor)
table(corrdata2$factor)
## 
##      ANG     BDNF      BLC    CCL11    CCL24    CCL26  Ck-b8-1     CSF1 
##        6        6        6        6        6        6        6        6 
##     CSF2     CSF3   CX3CL1      EGF   ENA-78    FGF-4    FGF-6    FGF-7 
##        6        6        6        6        6        6        6        6 
##    FGF-9 Flt-3-LG    GCP-2     GDNF      GRO    GRO-a      HGF    I-309 
##        6        6        6        6        6        6        6        6 
##    IFN-g    IGF-I  IGFBP-1  IGFBP-2  IGFBP-3  IGFBP-4    IL-10 IL-12p70 
##        6        6        6        6        6        6        6        6 
##    IL-13    IL-15    IL-16    IL-1a    IL-1b     IL-2     IL-3     IL-4 
##        6        6        6        6        6        6        6        6 
##     IL-5     IL-6     IL-7     IL-8    IP-10   Leptin      LIF    LIGHT 
##        6        6        6        6        6        6        6        6 
##    MCP-1    MCP-2    MCP-3    MCP-4      MDC      MIF      MIG   MIP-1b 
##        6        6        6        6        6        6        6        6 
##   MIP-1d   MIP-3a    NAP-2     NT-3     NT-4      OPG      OPN      OSM 
##        6        6        6        6        6        6        6        6 
##     PARC  PDGF-BB     PIGF   RANTES      SCF    SDF-1     TARC   TGF-b1 
##        6        6        6        6        6        6        6        6 
##   TGF-b2   TGF-b3     THPO   TIMP-1   TIMP-2    TNF-a    TNF-b     VEGF 
##        6        6        6        6        6        6        6        6
## 找出组合
zuheFL <- comcor(corrdata2)
zuheFL
##   [1] "IGFBP.2~ANG"      "GRO~BDNF"         "PDGF.BB~BDNF"    
##   [4] "TARC~BDNF"        "CSF2~CCL11"       "CSF3~CCL11"      
##   [7] "GCP.2~CCL11"      "IFN.g~CCL11"      "IL.13~CCL11"     
##  [10] "IL.15~CCL11"      "IL.1a~CCL11"      "IL.2~CCL11"      
##  [13] "IL.5~CCL11"       "IL.7~CCL11"       "MIG~CCL11"       
##  [16] "TGF.b1~CCL11"     "TNF.a~CCL11"      "TNF.b~CCL11"     
##  [19] "NT.3~CCL24"       "Ck.b8.1~CCL26"    "CX3CL1~CCL26"    
##  [22] "IGFBP.1~CCL26"    "Leptin~CCL26"     "OSM~CCL26"       
##  [25] "PARC~CCL26"       "CX3CL1~Ck.b8.1"   "FGF.6~Ck.b8.1"   
##  [28] "I.309~Ck.b8.1"    "IL.16~Ck.b8.1"    "IL.1b~Ck.b8.1"   
##  [31] "LIF~Ck.b8.1"      "LIGHT~Ck.b8.1"    "MCP.3~Ck.b8.1"   
##  [34] "MDC~Ck.b8.1"      "NT.4~Ck.b8.1"     "OSM~Ck.b8.1"     
##  [37] "PARC~Ck.b8.1"     "TGF.b3~Ck.b8.1"   "THPO~Ck.b8.1"    
##  [40] "SCF~CSF1"         "CSF3~CSF2"        "GCP.2~CSF2"      
##  [43] "IFN.g~CSF2"       "IL.13~CSF2"       "IL.15~CSF2"      
##  [46] "IL.1a~CSF2"       "IL.2~CSF2"        "IL.5~CSF2"       
##  [49] "IL.7~CSF2"        "PIGF~CSF2"        "TGF.b1~CSF2"     
##  [52] "TNF.a~CSF2"       "TNF.b~CSF2"       "GCP.2~CSF3"      
##  [55] "IFN.g~CSF3"       "IL.13~CSF3"       "IL.15~CSF3"      
##  [58] "IL.1a~CSF3"       "IL.2~CSF3"        "IL.5~CSF3"       
##  [61] "IL.7~CSF3"        "MIG~CSF3"         "PIGF~CSF3"       
##  [64] "TGF.b1~CSF3"      "TNF.a~CSF3"       "TNF.b~CSF3"      
##  [67] "FGF.6~CX3CL1"     "GDNF~CX3CL1"      "LIGHT~CX3CL1"    
##  [70] "OSM~CX3CL1"       "TGF.b3~CX3CL1"    "FGF.9~EGF"       
##  [73] "IP.10~EGF"        "LIF~EGF"          "MCP.3~EGF"       
##  [76] "MIP.1b~EGF"       "TGF.b2~EGF"       "RANTES~ENA.78"   
##  [79] "TIMP.1~ENA.78"    "GDNF~FGF.4"       "IL.3~FGF.4"      
##  [82] "PIGF~FGF.4"       "I.309~FGF.6"      "IL.10~FGF.6"     
##  [85] "IL.16~FGF.6"      "LIGHT~FGF.6"      "MDC~FGF.6"       
##  [88] "MIP.1d~FGF.6"     "NT.4~FGF.6"       "OPN~FGF.6"       
##  [91] "OSM~FGF.6"        "PARC~FGF.6"       "HGF~FGF.7"       
##  [94] "IGF.I~FGF.7"      "MCP.2~FGF.7"      "MCP.4~FGF.7"     
##  [97] "I.309~FGF.9"      "IL.1b~FGF.9"      "LIF~FGF.9"       
## [100] "MCP.3~FGF.9"      "MDC~FGF.9"        "MIP.1b~FGF.9"    
## [103] "TGF.b2~FGF.9"     "VEGF~FGF.9"       "IGFBP.4~Flt.3.LG"
## [106] "IL.6~Flt.3.LG"    "IL.8~Flt.3.LG"    "MIP.3a~Flt.3.LG" 
## [109] "IFN.g~GCP.2"      "IL.13~GCP.2"      "IL.15~GCP.2"     
## [112] "IL.1a~GCP.2"      "IL.5~GCP.2"       "IL.7~GCP.2"      
## [115] "MIG~GCP.2"        "PDGF.BB~GCP.2"    "TGF.b1~GCP.2"    
## [118] "TNF.a~GCP.2"      "TNF.b~GCP.2"      "IL.3~GDNF"       
## [121] "LIGHT~GDNF"       "PIGF~GDNF"        "TGF.b3~GDNF"     
## [124] "NAP.2~GRO"        "PDGF.BB~GRO"      "TARC~GRO"        
## [127] "IL.12p70~GRO.a"   "MCP.2~GRO.a"      "MCP.2~HGF"       
## [130] "MCP.4~HGF"        "OPG~HGF"          "IL.16~I.309"     
## [133] "IL.1b~I.309"      "LIF~I.309"        "LIGHT~I.309"     
## [136] "MCP.3~I.309"      "MDC~I.309"        "MIP.1d~I.309"    
## [139] "NT.4~I.309"       "OSM~I.309"        "TGF.b2~I.309"    
## [142] "TGF.b3~I.309"     "THPO~I.309"       "IL.13~IFN.g"     
## [145] "IL.15~IFN.g"      "IL.1a~IFN.g"      "IL.2~IFN.g"      
## [148] "IL.5~IFN.g"       "IL.7~IFN.g"       "PIGF~IFN.g"      
## [151] "TGF.b1~IFN.g"     "TNF.a~IFN.g"      "TNF.b~IFN.g"     
## [154] "IL.13~IGF.I"      "IL.1a~IGF.I"      "MIG~IGF.I"       
## [157] "Leptin~IGFBP.1"   "PARC~IGFBP.1"     "OPN~IGFBP.2"     
## [160] "SCF~IGFBP.2"      "IGFBP.4~IGFBP.3"  "IL.4~IGFBP.3"    
## [163] "IL.8~IGFBP.3"     "IL.6~IGFBP.4"     "IL.8~IGFBP.4"    
## [166] "MIP.3a~IGFBP.4"   "IL.3~IL.10"       "LIGHT~IL.10"     
## [169] "MIP.1d~IL.10"     "TIMP.2~IL.10"     "TIMP.1~IL.12p70" 
## [172] "IL.15~IL.13"      "IL.1a~IL.13"      "IL.2~IL.13"      
## [175] "IL.5~IL.13"       "IL.7~IL.13"       "MIG~IL.13"       
## [178] "TGF.b1~IL.13"     "TNF.a~IL.13"      "TNF.b~IL.13"     
## [181] "IL.1a~IL.15"      "IL.2~IL.15"       "IL.5~IL.15"      
## [184] "IL.7~IL.15"       "TGF.b1~IL.15"     "TNF.a~IL.15"     
## [187] "TNF.b~IL.15"      "IL.1b~IL.16"      "LIF~IL.16"       
## [190] "LIGHT~IL.16"      "MCP.3~IL.16"      "MDC~IL.16"       
## [193] "MIP.1d~IL.16"     "NT.4~IL.16"       "OSM~IL.16"       
## [196] "TGF.b2~IL.16"     "TGF.b3~IL.16"     "THPO~IL.16"      
## [199] "IL.2~IL.1a"       "IL.5~IL.1a"       "IL.7~IL.1a"      
## [202] "MIG~IL.1a"        "TGF.b1~IL.1a"     "TNF.a~IL.1a"     
## [205] "TNF.b~IL.1a"      "LIF~IL.1b"        "LIGHT~IL.1b"     
## [208] "MDC~IL.1b"        "MIF~IL.1b"        "NT.4~IL.1b"      
## [211] "VEGF~IL.1b"       "IL.5~IL.2"        "IL.7~IL.2"       
## [214] "TGF.b1~IL.2"      "TNF.a~IL.2"       "TNF.b~IL.2"      
## [217] "PIGF~IL.3"        "TIMP.2~IL.3"      "MIP.1b~IL.4"     
## [220] "VEGF~IL.4"        "IL.7~IL.5"        "MIG~IL.5"        
## [223] "TGF.b1~IL.5"      "TNF.a~IL.5"       "TNF.b~IL.5"      
## [226] "IL.8~IL.6"        "MIP.3a~IL.6"      "OPN~IL.6"        
## [229] "TGF.b1~IL.7"      "TNF.a~IL.7"       "TNF.b~IL.7"      
## [232] "MIP.3a~IL.8"      "RANTES~IP.10"     "PARC~Leptin"     
## [235] "SDF.1~Leptin"     "MCP.3~LIF"        "MDC~LIF"         
## [238] "MIP.1b~LIF"       "TGF.b2~LIF"       "THPO~LIF"        
## [241] "VEGF~LIF"         "MDC~LIGHT"        "MIF~LIGHT"       
## [244] "MIP.1d~LIGHT"     "NT.4~LIGHT"       "OSM~LIGHT"       
## [247] "TGF.b3~LIGHT"     "NT.3~MCP.1"       "MCP.4~MCP.2"     
## [250] "OPG~MCP.2"        "MDC~MCP.3"        "OSM~MCP.3"       
## [253] "TGF.b2~MCP.3"     "TGF.b3~MCP.3"     "THPO~MCP.3"      
## [256] "OPG~MCP.4"        "MIP.1d~MDC"       "NT.4~MDC"        
## [259] "OSM~MDC"          "TGF.b2~MDC"       "TGF.b3~MDC"      
## [262] "THPO~MDC"         "NT.4~MIF"         "TGF.b1~MIG"      
## [265] "TNF.a~MIG"        "TARC~MIP.1b"      "VEGF~MIP.1b"     
## [268] "NT.4~MIP.1d"      "OPN~MIP.1d"       "PDGF.BB~NAP.2"   
## [271] "RANTES~NAP.2"     "TIMP.1~NAP.2"     "OSM~NT.4"        
## [274] "THPO~NT.4"        "TGF.b3~OSM"       "THPO~OSM"        
## [277] "TARC~PDGF.BB"     "TGF.b1~PIGF"      "TIMP.2~PIGF"     
## [280] "TNF.a~PIGF"       "TNF.b~PIGF"       "TIMP.1~RANTES"   
## [283] "VEGF~TARC"        "TNF.a~TGF.b1"     "TNF.b~TGF.b1"    
## [286] "THPO~TGF.b2"      "THPO~TGF.b3"      "TNF.b~TNF.a"
## "Healthy-First"数据表中细胞自建的相关性
## 然后把各大组的pairwusecorrelation(r>=0.8,p<=0.05)分别总结出来。
## 准备数据
table(usedata2$outSC)
## 
##  Fatal-All other      Fatal-First       Fatal-Last    Healthy-First 
##              640              480              480              400 
##   Mild-All other       Mild-First Severe-All other     Severe-First 
##              480              560             1600              880 
##      Severe-Last 
##              880
corrdata <- usedata2[usedata2$outSC == "Healthy-First",c(1,2,3,12)]
corrdata2 <- corrdata[c("factor","arraydata")]
corrdata2$factor <- factor(corrdata2$factor)
table(corrdata2$factor)
## 
##      ANG     BDNF      BLC    CCL11    CCL24    CCL26  Ck-b8-1     CSF1 
##        5        5        5        5        5        5        5        5 
##     CSF2     CSF3   CX3CL1      EGF   ENA-78    FGF-4    FGF-6    FGF-7 
##        5        5        5        5        5        5        5        5 
##    FGF-9 Flt-3-LG    GCP-2     GDNF      GRO    GRO-a      HGF    I-309 
##        5        5        5        5        5        5        5        5 
##    IFN-g    IGF-I  IGFBP-1  IGFBP-2  IGFBP-3  IGFBP-4    IL-10 IL-12p70 
##        5        5        5        5        5        5        5        5 
##    IL-13    IL-15    IL-16    IL-1a    IL-1b     IL-2     IL-3     IL-4 
##        5        5        5        5        5        5        5        5 
##     IL-5     IL-6     IL-7     IL-8    IP-10   Leptin      LIF    LIGHT 
##        5        5        5        5        5        5        5        5 
##    MCP-1    MCP-2    MCP-3    MCP-4      MDC      MIF      MIG   MIP-1b 
##        5        5        5        5        5        5        5        5 
##   MIP-1d   MIP-3a    NAP-2     NT-3     NT-4      OPG      OPN      OSM 
##        5        5        5        5        5        5        5        5 
##     PARC  PDGF-BB     PIGF   RANTES      SCF    SDF-1     TARC   TGF-b1 
##        5        5        5        5        5        5        5        5 
##   TGF-b2   TGF-b3     THPO   TIMP-1   TIMP-2    TNF-a    TNF-b     VEGF 
##        5        5        5        5        5        5        5        5
## 找出组合
zuheHF <- comcor(corrdata2)
zuheHF
##   [1] "GRO~ANG"          "IL.2~ANG"         "MCP.1~ANG"       
##   [4] "SCF~ANG"          "EGF~BDNF"         "ENA.78~BDNF"     
##   [7] "GRO.a~BDNF"       "IL.2~BDNF"        "IL.6~BDNF"       
##  [10] "MCP.1~BDNF"       "MIP.3a~BDNF"      "NT.4~BDNF"       
##  [13] "PDGF.BB~BDNF"     "TARC~BDNF"        "IGF.I~BLC"       
##  [16] "MIF~BLC"          "EGF~CCL24"        "GRO.a~CCL24"     
##  [19] "RANTES~CCL24"     "IL.12p70~CCL26"   "NT.4~CCL26"      
##  [22] "OSM~CCL26"        "TARC~CCL26"       "THPO~CCL26"      
##  [25] "CSF2~Ck.b8.1"     "IGFBP.4~Ck.b8.1"  "IL.7~Ck.b8.1"    
##  [28] "SDF.1~Ck.b8.1"    "VEGF~Ck.b8.1"     "IGF.I~CSF1"      
##  [31] "MDC~CSF1"         "SCF~CSF1"         "NT.4~CSF2"       
##  [34] "VEGF~CSF2"        "IL.12p70~CSF3"    "IL.15~CSF3"      
##  [37] "IL.7~CSF3"        "SDF.1~CSF3"       "FGF.6~CX3CL1"    
##  [40] "LIF~CX3CL1"       "LIGHT~CX3CL1"     "MCP.3~CX3CL1"    
##  [43] "PIGF~CX3CL1"      "ENA.78~EGF"       "GRO~EGF"         
##  [46] "GRO.a~EGF"        "IL.2~EGF"         "MIP.3a~EGF"      
##  [49] "NT.4~EGF"         "PDGF.BB~EGF"      "RANTES~EGF"      
##  [52] "SCF~EGF"          "TARC~EGF"         "IL.2~ENA.78"     
##  [55] "MIP.3a~ENA.78"    "NT.4~ENA.78"      "PDGF.BB~ENA.78"  
##  [58] "RANTES~ENA.78"    "SCF~ENA.78"       "TARC~ENA.78"     
##  [61] "THPO~ENA.78"      "IL.16~FGF.4"      "PARC~FGF.4"      
##  [64] "FGF.9~FGF.6"      "LIF~FGF.6"        "LIGHT~FGF.6"     
##  [67] "MCP.3~FGF.6"      "IGFBP.1~FGF.7"    "IGFBP.2~FGF.7"   
##  [70] "MIG~FGF.9"        "TGF.b3~FGF.9"     "IGFBP.1~Flt.3.LG"
##  [73] "IGFBP.3~GCP.2"    "IL.4~GCP.2"       "IL.5~GCP.2"      
##  [76] "IL.8~GCP.2"       "MCP.1~GCP.2"      "NAP.2~GCP.2"     
##  [79] "TNF.a~GCP.2"      "Leptin~GDNF"      "MIP.1b~GDNF"     
##  [82] "IL.2~GRO"         "SCF~GRO"          "IL.6~GRO.a"      
##  [85] "MCP.1~GRO.a"      "NT.4~GRO.a"       "MCP.4~HGF"       
##  [88] "PARC~I.309"       "OSM~IFN.g"        "IGFBP.2~IGFBP.1" 
##  [91] "MIF~IGFBP.2"      "IL.4~IGFBP.3"     "IL.5~IGFBP.3"    
##  [94] "IL.8~IGFBP.3"     "MCP.3~IGFBP.3"    "TNF.a~IGFBP.3"   
##  [97] "IL.7~IGFBP.4"     "MIG~IGFBP.4"      "MIP.1b~IGFBP.4"  
## [100] "TGF.b2~IGFBP.4"   "MCP.4~IL.10"      "OPG~IL.10"       
## [103] "IL.15~IL.12p70"   "OSM~IL.12p70"     "IL.15~IL.13"     
## [106] "NT.3~IL.13"       "TARC~IL.13"       "IL.7~IL.15"      
## [109] "NT.3~IL.15"       "OSM~IL.15"        "SDF.1~IL.15"     
## [112] "LIGHT~IL.16"      "NAP.2~IL.1a"      "OPN~IL.1a"       
## [115] "IL.3~IL.1b"       "MCP.1~IL.2"       "MIP.3a~IL.2"     
## [118] "PDGF.BB~IL.2"     "RANTES~IL.2"      "SCF~IL.2"        
## [121] "TARC~IL.2"        "IL.5~IL.4"        "IL.6~IL.4"       
## [124] "IL.8~IL.4"        "MCP.1~IL.4"       "MIG~IL.4"        
## [127] "NAP.2~IL.4"       "NT.3~IL.4"        "VEGF~IL.4"       
## [130] "IL.6~IL.5"        "IL.8~IL.5"        "MCP.1~IL.5"      
## [133] "NAP.2~IL.5"       "TNF.a~IL.5"       "VEGF~IL.5"       
## [136] "MCP.1~IL.6"       "NAP.2~IL.6"       "NT.4~IL.6"       
## [139] "VEGF~IL.6"        "NT.3~IL.7"        "SDF.1~IL.7"      
## [142] "TGF.b1~IL.7"      "TGF.b2~IL.7"      "MCP.1~IL.8"      
## [145] "MCP.3~IL.8"       "TNF.a~IL.8"       "MIP.1d~IP.10"    
## [148] "TIMP.2~IP.10"     "MCP.3~LIF"        "PIGF~LIF"        
## [151] "PIGF~LIGHT"       "NAP.2~MCP.1"      "MDC~MCP.2"       
## [154] "TNF.a~MCP.3"      "MIP.1d~MCP.4"     "OPG~MCP.4"       
## [157] "NAP.2~MIG"        "NT.3~MIG"         "VEGF~MIG"        
## [160] "TIMP.2~MIP.1d"    "PDGF.BB~MIP.3a"   "RANTES~MIP.3a"   
## [163] "SCF~MIP.3a"       "TARC~MIP.3a"      "VEGF~NAP.2"      
## [166] "SDF.1~NT.3"       "TGF.b1~NT.3"      "TGF.b2~NT.3"     
## [169] "VEGF~NT.3"        "OSM~NT.4"         "PDGF.BB~NT.4"    
## [172] "TGF.b3~PARC"      "RANTES~PDGF.BB"   "SCF~PDGF.BB"     
## [175] "TARC~PDGF.BB"     "SCF~RANTES"       "THPO~RANTES"     
## [178] "TGF.b1~SDF.1"     "TGF.b2~SDF.1"     "THPO~TARC"       
## [181] "TIMP.1~TARC"      "TGF.b2~TGF.b1"    "TIMP.1~THPO"
## "Mild-All other"数据表中细胞自建的相关性
## 然后把各大组的pairwusecorrelation(r>=0.8,p<=0.05)分别总结出来。
## 准备数据
table(usedata2$outSC)
## 
##  Fatal-All other      Fatal-First       Fatal-Last    Healthy-First 
##              640              480              480              400 
##   Mild-All other       Mild-First Severe-All other     Severe-First 
##              480              560             1600              880 
##      Severe-Last 
##              880
corrdata <- usedata2[usedata2$outSC == "Mild-All other",c(1,2,3,12)]
corrdata2 <- corrdata[c("factor","arraydata")]
corrdata2$factor <- factor(corrdata2$factor)
table(corrdata2$factor)
## 
##      ANG     BDNF      BLC    CCL11    CCL24    CCL26  Ck-b8-1     CSF1 
##        6        6        6        6        6        6        6        6 
##     CSF2     CSF3   CX3CL1      EGF   ENA-78    FGF-4    FGF-6    FGF-7 
##        6        6        6        6        6        6        6        6 
##    FGF-9 Flt-3-LG    GCP-2     GDNF      GRO    GRO-a      HGF    I-309 
##        6        6        6        6        6        6        6        6 
##    IFN-g    IGF-I  IGFBP-1  IGFBP-2  IGFBP-3  IGFBP-4    IL-10 IL-12p70 
##        6        6        6        6        6        6        6        6 
##    IL-13    IL-15    IL-16    IL-1a    IL-1b     IL-2     IL-3     IL-4 
##        6        6        6        6        6        6        6        6 
##     IL-5     IL-6     IL-7     IL-8    IP-10   Leptin      LIF    LIGHT 
##        6        6        6        6        6        6        6        6 
##    MCP-1    MCP-2    MCP-3    MCP-4      MDC      MIF      MIG   MIP-1b 
##        6        6        6        6        6        6        6        6 
##   MIP-1d   MIP-3a    NAP-2     NT-3     NT-4      OPG      OPN      OSM 
##        6        6        6        6        6        6        6        6 
##     PARC  PDGF-BB     PIGF   RANTES      SCF    SDF-1     TARC   TGF-b1 
##        6        6        6        6        6        6        6        6 
##   TGF-b2   TGF-b3     THPO   TIMP-1   TIMP-2    TNF-a    TNF-b     VEGF 
##        6        6        6        6        6        6        6        6
## 找出组合
zuheMA <- comcor(corrdata2)
zuheMA
##   [1] "CX3CL1~ANG"     "FGF.4~ANG"      "RANTES~ANG"     "CSF2~BDNF"     
##   [5] "ENA.78~BDNF"    "IL.10~BDNF"     "IL.15~BDNF"     "MCP.2~BDNF"    
##   [9] "MIP.3a~BDNF"    "NAP.2~BDNF"     "PDGF.BB~BDNF"   "SCF~BDNF"      
##  [13] "TARC~BDNF"      "CCL26~BLC"      "GDNF~BLC"       "GRO.a~BLC"     
##  [17] "IGF.I~BLC"      "IGFBP.2~BLC"    "MCP.4~BLC"      "PARC~BLC"      
##  [21] "PIGF~BLC"       "THPO~BLC"       "IL.12p70~CCL11" "RANTES~CCL11"  
##  [25] "TIMP.1~CCL11"   "FGF.9~CCL24"    "IGFBP.4~CCL24"  "LIF~CCL24"     
##  [29] "LIGHT~CCL24"    "MIP.1d~CCL24"   "NT.4~CCL24"     "FGF.7~CCL26"   
##  [33] "I.309~CCL26"    "PARC~CCL26"     "CX3CL1~Ck.b8.1" "FGF.6~Ck.b8.1" 
##  [37] "IGF.I~Ck.b8.1"  "IL.1a~Ck.b8.1"  "IL.3~Ck.b8.1"   "IL.4~Ck.b8.1"  
##  [41] "IP.10~Ck.b8.1"  "MCP.1~Ck.b8.1"  "MIF~Ck.b8.1"    "TIMP.2~Ck.b8.1"
##  [45] "TGF.b2~CSF1"    "CSF3~CSF2"      "EGF~CSF2"       "ENA.78~CSF2"   
##  [49] "GRO~CSF2"       "IGFBP.3~CSF2"   "IL.10~CSF2"     "IL.15~CSF2"    
##  [53] "IL.5~CSF2"      "IL.6~CSF2"      "NAP.2~CSF2"     "SCF~CSF2"      
##  [57] "TARC~CSF2"      "GRO~CSF3"       "IGFBP.3~CSF3"   "IL.13~CSF3"    
##  [61] "IL.15~CSF3"     "IL.5~CSF3"      "FGF.6~CX3CL1"   "MCP.1~CX3CL1"  
##  [65] "SDF.1~CX3CL1"   "ENA.78~EGF"     "GRO~EGF"        "IGFBP.3~EGF"   
##  [69] "IL.15~EGF"      "IL.6~EGF"       "MDC~EGF"        "MIG~EGF"       
##  [73] "PDGF.BB~EGF"    "TARC~EGF"       "TGF.b1~EGF"     "GRO~ENA.78"    
##  [77] "IL.10~ENA.78"   "IL.15~ENA.78"   "IL.5~ENA.78"    "IL.6~ENA.78"   
##  [81] "MCP.2~ENA.78"   "NAP.2~ENA.78"   "SCF~ENA.78"     "TARC~ENA.78"   
##  [85] "FGF.6~FGF.4"    "IL.1a~FGF.4"    "IL.4~FGF.4"     "IP.10~FGF.4"   
##  [89] "MCP.1~FGF.4"    "MCP.3~FGF.4"    "MIP.1b~FGF.4"   "NT.3~FGF.4"    
##  [93] "TNF.a~FGF.4"    "TNF.b~FGF.4"    "VEGF~FGF.4"     "IL.1a~FGF.6"   
##  [97] "IL.4~FGF.6"     "IP.10~FGF.6"    "MCP.1~FGF.6"    "MCP.3~FGF.6"   
## [101] "MIP.1b~FGF.6"   "SDF.1~FGF.6"    "TIMP.2~FGF.6"   "TNF.a~FGF.6"   
## [105] "TNF.b~FGF.6"    "HGF~FGF.7"      "IL.2~FGF.7"     "GRO.a~FGF.9"   
## [109] "IGF.I~FGF.9"    "IL.1a~FGF.9"    "LIF~FGF.9"      "LIGHT~FGF.9"   
## [113] "MIF~FGF.9"      "OSM~FGF.9"      "GRO.a~GCP.2"    "NT.4~GCP.2"    
## [117] "OPG~GCP.2"      "THPO~GCP.2"     "I.309~GDNF"     "IL.13~GDNF"    
## [121] "IL.3~GDNF"      "IL.8~GDNF"      "PARC~GDNF"      "PIGF~GDNF"     
## [125] "IGFBP.3~GRO"    "IL.10~GRO"      "IL.15~GRO"      "IL.5~GRO"      
## [129] "IL.6~GRO"       "IL.8~GRO"       "PIGF~GRO"       "SCF~GRO"       
## [133] "TARC~GRO"       "IGF.I~GRO.a"    "IGFBP.2~GRO.a"  "LIGHT~GRO.a"   
## [137] "MCP.4~GRO.a"    "OSM~GRO.a"      "PARC~GRO.a"     "IGFBP.4~HGF"   
## [141] "IL.2~HGF"       "Leptin~HGF"     "MDC~HGF"        "OPN~HGF"       
## [145] "IGFBP.1~I.309"  "IL.3~I.309"     "PARC~I.309"     "IGFBP.4~IFN.g" 
## [149] "IL.1a~IFN.g"    "IL.2~IFN.g"     "IP.10~IFN.g"    "Leptin~IFN.g"  
## [153] "MCP.1~IFN.g"    "MCP.3~IFN.g"    "MDC~IFN.g"      "MIG~IFN.g"     
## [157] "MIP.1b~IFN.g"   "MIP.1d~IFN.g"   "NT.3~IFN.g"     "OPN~IFN.g"     
## [161] "PDGF.BB~IFN.g"  "SDF.1~IFN.g"    "TGF.b1~IFN.g"   "TNF.a~IFN.g"   
## [165] "IGFBP.2~IGF.I"  "IL.3~IGF.I"     "MIF~IGF.I"      "OSM~IGF.I"     
## [169] "PARC~IGF.I"     "NT.4~IGFBP.1"   "OPG~IGFBP.1"    "MCP.4~IGFBP.2" 
## [173] "MIF~IGFBP.2"    "OSM~IGFBP.2"    "PARC~IGFBP.2"   "TGF.b3~IGFBP.2"
## [177] "IL.15~IGFBP.3"  "IL.5~IGFBP.3"   "IL.6~IGFBP.3"   "Leptin~IGFBP.4"
## [181] "MDC~IGFBP.4"    "MIG~IGFBP.4"    "MIP.1d~IGFBP.4" "OPN~IGFBP.4"   
## [185] "TGF.b1~IGFBP.4" "IL.15~IL.10"    "IL.5~IL.10"     "IL.8~IL.10"    
## [189] "MCP.2~IL.10"    "SCF~IL.10"      "TARC~IL.10"     "IL.16~IL.12p70"
## [193] "IL.15~IL.13"    "IL.8~IL.13"     "PIGF~IL.13"     "IL.5~IL.15"    
## [197] "IL.6~IL.15"     "IL.8~IL.15"     "SCF~IL.15"      "TARC~IL.15"    
## [201] "LIGHT~IL.16"    "MIF~IL.16"      "TGF.b3~IL.16"   "TIMP.2~IL.16"  
## [205] "IL.4~IL.1a"     "IP.10~IL.1a"    "LIF~IL.1a"      "MCP.1~IL.1a"   
## [209] "MCP.3~IL.1a"    "MIF~IL.1a"      "MIP.1b~IL.1a"   "NT.3~IL.1a"    
## [213] "TIMP.2~IL.1a"   "TNF.a~IL.1a"    "TNF.b~IL.1a"    "TGF.b2~IL.1b"  
## [217] "Leptin~IL.2"    "MDC~IL.2"       "MIG~IL.2"       "MIP.1b~IL.2"   
## [221] "OPN~IL.2"       "TNF.a~IL.2"     "IL.4~IL.3"      "PARC~IL.3"     
## [225] "SDF.1~IL.3"     "TIMP.2~IL.3"    "IP.10~IL.4"     "MCP.1~IL.4"    
## [229] "MCP.3~IL.4"     "MIP.1b~IL.4"    "SDF.1~IL.4"     "TIMP.2~IL.4"   
## [233] "TNF.a~IL.4"     "SCF~IL.5"       "TARC~IL.5"      "MDC~IL.6"      
## [237] "PDGF.BB~IL.6"   "TARC~IL.6"      "PIGF~IL.8"      "Leptin~IP.10"  
## [241] "MCP.1~IP.10"    "MCP.3~IP.10"    "MIG~IP.10"      "MIP.1b~IP.10"  
## [245] "NT.3~IP.10"     "OPN~IP.10"      "SDF.1~IP.10"    "TIMP.2~IP.10"  
## [249] "TNF.a~IP.10"    "TNF.b~IP.10"    "MCP.3~Leptin"   "MDC~Leptin"    
## [253] "MIG~Leptin"     "MIP.1b~Leptin"  "MIP.1d~Leptin"  "OPN~Leptin"    
## [257] "TGF.b1~Leptin"  "TNF.a~Leptin"   "MIG~LIF"        "MIP.1d~LIF"    
## [261] "NT.3~LIF"       "TGF.b1~LIF"     "TNF.a~LIF"      "TNF.b~LIF"     
## [265] "MIF~LIGHT"      "NT.4~LIGHT"     "OSM~LIGHT"      "MCP.3~MCP.1"   
## [269] "MIP.1b~MCP.1"   "NT.3~MCP.1"     "SDF.1~MCP.1"    "TIMP.2~MCP.1"  
## [273] "TNF.a~MCP.1"    "TNF.b~MCP.1"    "SCF~MCP.2"      "TARC~MCP.2"    
## [277] "MIG~MCP.3"      "MIP.1b~MCP.3"   "NT.3~MCP.3"     "SDF.1~MCP.3"   
## [281] "TGF.b1~MCP.3"   "TNF.a~MCP.3"    "TNF.b~MCP.3"    "PIGF~MCP.4"    
## [285] "THPO~MCP.4"     "MIG~MDC"        "MIP.1b~MDC"     "MIP.1d~MDC"    
## [289] "OPN~MDC"        "TGF.b1~MDC"     "TNF.a~MDC"      "OSM~MIF"       
## [293] "TGF.b3~MIF"     "TIMP.2~MIF"     "MIP.1b~MIG"     "MIP.1d~MIG"    
## [297] "NAP.2~MIG"      "NT.3~MIG"       "OPN~MIG"        "PDGF.BB~MIG"   
## [301] "TGF.b1~MIG"     "TNF.a~MIG"      "NT.3~MIP.1b"    "SDF.1~MIP.1b"  
## [305] "TNF.a~MIP.1b"   "TNF.b~MIP.1b"   "OPN~MIP.1d"     "TGF.b1~MIP.1d" 
## [309] "NAP.2~MIP.3a"   "VEGF~MIP.3a"    "NT.3~NAP.2"     "PDGF.BB~NAP.2" 
## [313] "TARC~NAP.2"     "VEGF~NAP.2"     "PDGF.BB~NT.3"   "TGF.b1~NT.3"   
## [317] "TNF.a~NT.3"     "TNF.b~NT.3"     "VEGF~NT.3"      "OPG~NT.4"      
## [321] "TGF.b1~OPN"     "TNF.a~OPN"      "PIGF~PARC"      "TARC~PDGF.BB"  
## [325] "TGF.b1~PDGF.BB" "TNF.a~PDGF.BB"  "TIMP.1~RANTES"  "TARC~SCF"      
## [329] "TNF.a~SDF.1"    "TNF.a~TGF.b1"   "TIMP.2~TGF.b3"  "TNF.b~TNF.a"   
## [333] "VEGF~TNF.b"
## "Mild-First"数据表中细胞自建的相关性
## 然后把各大组的pairwusecorrelation(r>=0.8,p<=0.05)分别总结出来。
## 准备数据
table(usedata2$outSC)
## 
##  Fatal-All other      Fatal-First       Fatal-Last    Healthy-First 
##              640              480              480              400 
##   Mild-All other       Mild-First Severe-All other     Severe-First 
##              480              560             1600              880 
##      Severe-Last 
##              880
corrdata <- usedata2[usedata2$outSC == "Mild-First",c(1,2,3,12)]
corrdata2 <- corrdata[c("factor","arraydata")]
corrdata2$factor <- factor(corrdata2$factor)
table(corrdata2$factor)
## 
##      ANG     BDNF      BLC    CCL11    CCL24    CCL26  Ck-b8-1     CSF1 
##        7        7        7        7        7        7        7        7 
##     CSF2     CSF3   CX3CL1      EGF   ENA-78    FGF-4    FGF-6    FGF-7 
##        7        7        7        7        7        7        7        7 
##    FGF-9 Flt-3-LG    GCP-2     GDNF      GRO    GRO-a      HGF    I-309 
##        7        7        7        7        7        7        7        7 
##    IFN-g    IGF-I  IGFBP-1  IGFBP-2  IGFBP-3  IGFBP-4    IL-10 IL-12p70 
##        7        7        7        7        7        7        7        7 
##    IL-13    IL-15    IL-16    IL-1a    IL-1b     IL-2     IL-3     IL-4 
##        7        7        7        7        7        7        7        7 
##     IL-5     IL-6     IL-7     IL-8    IP-10   Leptin      LIF    LIGHT 
##        7        7        7        7        7        7        7        7 
##    MCP-1    MCP-2    MCP-3    MCP-4      MDC      MIF      MIG   MIP-1b 
##        7        7        7        7        7        7        7        7 
##   MIP-1d   MIP-3a    NAP-2     NT-3     NT-4      OPG      OPN      OSM 
##        7        7        7        7        7        7        7        7 
##     PARC  PDGF-BB     PIGF   RANTES      SCF    SDF-1     TARC   TGF-b1 
##        7        7        7        7        7        7        7        7 
##   TGF-b2   TGF-b3     THPO   TIMP-1   TIMP-2    TNF-a    TNF-b     VEGF 
##        7        7        7        7        7        7        7        7
## 找出组合
zuheMF <- comcor(corrdata2)
zuheMF
##   [1] "GRO.a~ANG"        "IFN.g~ANG"        "IL.15~ANG"       
##   [4] "IL.3~ANG"         "IL.4~ANG"         "MCP.1~ANG"       
##   [7] "MCP.2~ANG"        "TIMP.2~ANG"       "IL.1a~BDNF"      
##  [10] "MCP.4~BDNF"       "NT.4~BDNF"        "TIMP.2~BDNF"     
##  [13] "TNF.b~BDNF"       "MDC~BLC"          "ENA.78~CCL11"    
##  [16] "OPN~CCL11"        "GDNF~CCL24"       "MIG~CCL24"       
##  [19] "NAP.2~CCL24"      "SCF~CCL24"        "GDNF~CCL26"      
##  [22] "I.309~CCL26"      "IGFBP.2~CCL26"    "IL.15~CCL26"     
##  [25] "IL.3~CCL26"       "MIG~CCL26"        "PARC~CCL26"      
##  [28] "RANTES~CCL26"     "SCF~CCL26"        "IGF.I~Ck.b8.1"   
##  [31] "FGF.4~CSF1"       "TGF.b2~CSF1"      "MCP.2~CSF2"      
##  [34] "I.309~CSF3"       "IL.2~CSF3"        "IL.6~CSF3"       
##  [37] "IL.8~CSF3"        "MCP.3~CSF3"       "TGF.b1~CSF3"     
##  [40] "PDGF.BB~EGF"      "TNF.b~ENA.78"     "TGF.b2~FGF.4"    
##  [43] "IL.13~FGF.6"      "IL.4~FGF.6"       "NT.3~FGF.6"      
##  [46] "GRO~FGF.7"        "GRO.a~FGF.7"      "IGFBP.3~FGF.7"   
##  [49] "IL.16~FGF.7"      "IL.2~FGF.7"       "IL.8~FGF.7"      
##  [52] "MCP.1~FGF.7"      "NAP.2~FGF.7"      "TNF.a~FGF.7"     
##  [55] "Flt.3.LG~FGF.9"   "NT.3~GCP.2"       "TARC~GCP.2"      
##  [58] "IL.15~GDNF"       "MIG~GDNF"         "PARC~GDNF"       
##  [61] "RANTES~GDNF"      "SCF~GDNF"         "IL.16~GRO"       
##  [64] "NAP.2~GRO"        "TNF.a~GRO"        "IFN.g~GRO.a"     
##  [67] "MCP.1~GRO.a"      "IL.5~HGF"         "IFN.g~I.309"     
##  [70] "IGFBP.2~I.309"    "IL.10~I.309"      "IL.13~I.309"     
##  [73] "IL.2~I.309"       "IL.3~I.309"       "IL.8~I.309"      
##  [76] "MCP.3~I.309"      "MIG~I.309"        "RANTES~I.309"    
##  [79] "TGF.b1~I.309"     "TGF.b3~I.309"     "IL.10~IFN.g"     
##  [82] "IL.13~IFN.g"      "IL.2~IFN.g"       "IL.3~IFN.g"      
##  [85] "IL.4~IFN.g"       "MCP.1~IFN.g"      "MCP.2~IFN.g"     
##  [88] "TIMP.2~IFN.g"     "MDC~IGF.I"        "OPG~IGFBP.1"     
##  [91] "TGF.b3~IGFBP.1"   "IL.3~IGFBP.2"     "RANTES~IGFBP.2"  
##  [94] "VEGF~IGFBP.2"     "IL.12p70~IGFBP.3" "IL.8~IGFBP.3"    
##  [97] "TIMP.1~IGFBP.3"   "IL.2~IL.10"       "TGF.b3~IL.10"    
## [100] "MCP.4~IL.12p70"   "TIMP.1~IL.12p70"  "IL.3~IL.13"      
## [103] "IL.4~IL.13"       "TGF.b1~IL.13"     "TIMP.2~IL.13"    
## [106] "IL.3~IL.15"       "MIG~IL.15"        "PARC~IL.15"      
## [109] "SCF~IL.15"        "MCP.1~IL.16"      "NAP.2~IL.16"     
## [112] "TNF.a~IL.16"      "OPN~IL.1a"        "TGF.b1~IL.1a"    
## [115] "TIMP.2~IL.1a"     "TNF.b~IL.1a"      "SDF.1~IL.1b"     
## [118] "TNF.a~IL.1b"      "IL.8~IL.2"        "MCP.3~IL.2"      
## [121] "MIG~IL.2"         "TGF.b1~IL.2"      "IL.4~IL.3"       
## [124] "MCP.1~IL.3"       "PARC~IL.3"        "MCP.2~IL.4"      
## [127] "TIMP.2~IL.4"      "IL.6~IL.5"        "IL.7~IL.5"       
## [130] "IL.7~IL.6"        "VEGF~IL.6"        "OPG~IL.7"        
## [133] "TGF.b3~IL.7"      "VEGF~IL.7"        "MCP.3~IL.8"      
## [136] "TGF.b1~IL.8"      "TNF.a~IL.8"       "MIP.1d~LIF"      
## [139] "MCP.4~LIGHT"      "MIP.1b~LIGHT"     "PARC~MCP.1"      
## [142] "TNF.a~MCP.1"      "OPN~MCP.3"        "TGF.b1~MCP.3"    
## [145] "TGF.b1~MCP.4"     "TIMP.1~MCP.4"     "TGF.b2~MDC"      
## [148] "NAP.2~MIG"        "RANTES~MIG"       "THPO~MIP.1b"     
## [151] "TNF.a~NAP.2"      "TARC~NT.3"        "TARC~NT.4"       
## [154] "TIMP.2~NT.4"      "TNF.b~NT.4"       "TGF.b3~OPG"      
## [157] "VEGF~OPG"         "PDGF.BB~OSM"      "SCF~PARC"        
## [160] "TNF.b~TARC"       "VEGF~TGF.b3"
## "Severe-All other"数据表中细胞自建的相关性
## 然后把各大组的pairwusecorrelation(r>=0.8,p<=0.05)分别总结出来。
## 准备数据
table(usedata2$outSC)
## 
##  Fatal-All other      Fatal-First       Fatal-Last    Healthy-First 
##              640              480              480              400 
##   Mild-All other       Mild-First Severe-All other     Severe-First 
##              480              560             1600              880 
##      Severe-Last 
##              880
corrdata <- usedata2[usedata2$outSC == "Severe-All other",c(1,2,3,12)]
corrdata2 <- corrdata[c("factor","arraydata")]
corrdata2$factor <- factor(corrdata2$factor)
table(corrdata2$factor)
## 
##      ANG     BDNF      BLC    CCL11    CCL24    CCL26  Ck-b8-1     CSF1 
##       20       20       20       20       20       20       20       20 
##     CSF2     CSF3   CX3CL1      EGF   ENA-78    FGF-4    FGF-6    FGF-7 
##       20       20       20       20       20       20       20       20 
##    FGF-9 Flt-3-LG    GCP-2     GDNF      GRO    GRO-a      HGF    I-309 
##       20       20       20       20       20       20       20       20 
##    IFN-g    IGF-I  IGFBP-1  IGFBP-2  IGFBP-3  IGFBP-4    IL-10 IL-12p70 
##       20       20       20       20       20       20       20       20 
##    IL-13    IL-15    IL-16    IL-1a    IL-1b     IL-2     IL-3     IL-4 
##       20       20       20       20       20       20       20       20 
##     IL-5     IL-6     IL-7     IL-8    IP-10   Leptin      LIF    LIGHT 
##       20       20       20       20       20       20       20       20 
##    MCP-1    MCP-2    MCP-3    MCP-4      MDC      MIF      MIG   MIP-1b 
##       20       20       20       20       20       20       20       20 
##   MIP-1d   MIP-3a    NAP-2     NT-3     NT-4      OPG      OPN      OSM 
##       20       20       20       20       20       20       20       20 
##     PARC  PDGF-BB     PIGF   RANTES      SCF    SDF-1     TARC   TGF-b1 
##       20       20       20       20       20       20       20       20 
##   TGF-b2   TGF-b3     THPO   TIMP-1   TIMP-2    TNF-a    TNF-b     VEGF 
##       20       20       20       20       20       20       20       20
## 找出组合
zuheSA <- comcor(corrdata2)
zuheSA
##   [1] "PDGF.BB~BDNF"   "Ck.b8.1~BLC"    "CSF1~BLC"       "GCP.2~BLC"     
##   [5] "I.309~BLC"      "IGF.I~BLC"      "IGFBP.4~BLC"    "IL.1a~BLC"     
##   [9] "MCP.4~BLC"      "CSF1~CCL26"     "CSF3~CCL26"     "FGF.4~CCL26"   
##  [13] "FGF.6~CCL26"    "FGF.7~CCL26"    "FGF.9~CCL26"    "GCP.2~CCL26"   
##  [17] "GDNF~CCL26"     "I.309~CCL26"    "IGFBP.4~CCL26"  "IL.1a~CCL26"   
##  [21] "IL.3~CCL26"     "IL.4~CCL26"     "LIF~CCL26"      "LIGHT~CCL26"   
##  [25] "MCP.3~CCL26"    "MCP.4~CCL26"    "MDC~CCL26"      "NT.4~CCL26"    
##  [29] "OSM~CCL26"      "PARC~CCL26"     "PIGF~CCL26"     "SCF~CCL26"     
##  [33] "SDF.1~CCL26"    "TGF.b2~CCL26"   "THPO~CCL26"     "TNF.b~CCL26"   
##  [37] "CSF1~Ck.b8.1"   "IGF.I~Ck.b8.1"  "MCP.4~Ck.b8.1"  "VEGF~Ck.b8.1"  
##  [41] "FGF.4~CSF1"     "FGF.6~CSF1"     "FGF.7~CSF1"     "GCP.2~CSF1"    
##  [45] "GDNF~CSF1"      "I.309~CSF1"     "IGF.I~CSF1"     "IGFBP.4~CSF1"  
##  [49] "IL.1a~CSF1"     "IL.3~CSF1"      "MCP.3~CSF1"     "MCP.4~CSF1"    
##  [53] "MDC~CSF1"       "NT.4~CSF1"      "OSM~CSF1"       "PARC~CSF1"     
##  [57] "PIGF~CSF1"      "CSF3~CSF2"      "GDNF~CSF2"      "IFN.g~CSF2"    
##  [61] "IL.13~CSF2"     "IL.15~CSF2"     "IL.2~CSF2"      "IL.6~CSF2"     
##  [65] "MIG~CSF2"       "TGF.b1~CSF2"    "TNF.a~CSF2"     "FGF.4~CSF3"    
##  [69] "FGF.7~CSF3"     "GDNF~CSF3"      "I.309~CSF3"     "IFN.g~CSF3"    
##  [73] "IL.13~CSF3"     "IL.15~CSF3"     "IL.1a~CSF3"     "IL.2~CSF3"     
##  [77] "IL.3~CSF3"      "IL.6~CSF3"      "LIGHT~CSF3"     "PARC~CSF3"     
##  [81] "PIGF~CSF3"      "TNF.a~CSF3"     "IGFBP.4~CX3CL1" "MCP.4~CX3CL1"  
##  [85] "THPO~CX3CL1"    "FGF.6~FGF.4"    "FGF.7~FGF.4"    "FGF.9~FGF.4"   
##  [89] "GDNF~FGF.4"     "I.309~FGF.4"    "IGFBP.4~FGF.4"  "IL.1a~FGF.4"   
##  [93] "IL.3~FGF.4"     "IL.4~FGF.4"     "IL.6~FGF.4"     "LIF~FGF.4"     
##  [97] "LIGHT~FGF.4"    "MCP.3~FGF.4"    "MCP.4~FGF.4"    "MDC~FGF.4"     
## [101] "NT.4~FGF.4"     "OSM~FGF.4"      "PARC~FGF.4"     "PIGF~FGF.4"    
## [105] "SCF~FGF.4"      "SDF.1~FGF.4"    "TGF.b2~FGF.4"   "THPO~FGF.4"    
## [109] "TNF.b~FGF.4"    "FGF.7~FGF.6"    "FGF.9~FGF.6"    "GDNF~FGF.6"    
## [113] "I.309~FGF.6"    "IGFBP.4~FGF.6"  "IL.1a~FGF.6"    "IL.3~FGF.6"    
## [117] "IL.4~FGF.6"     "LIF~FGF.6"      "LIGHT~FGF.6"    "MCP.3~FGF.6"   
## [121] "MDC~FGF.6"      "NT.3~FGF.6"     "NT.4~FGF.6"     "OSM~FGF.6"     
## [125] "PIGF~FGF.6"     "SCF~FGF.6"      "SDF.1~FGF.6"    "TGF.b2~FGF.6"  
## [129] "THPO~FGF.6"     "TNF.b~FGF.6"    "FGF.9~FGF.7"    "GCP.2~FGF.7"   
## [133] "GDNF~FGF.7"     "I.309~FGF.7"    "IGFBP.4~FGF.7"  "IL.1a~FGF.7"   
## [137] "IL.3~FGF.7"     "IL.4~FGF.7"     "LIF~FGF.7"      "LIGHT~FGF.7"   
## [141] "MCP.3~FGF.7"    "MDC~FGF.7"      "NT.4~FGF.7"     "OSM~FGF.7"     
## [145] "PARC~FGF.7"     "PIGF~FGF.7"     "SCF~FGF.7"      "SDF.1~FGF.7"   
## [149] "TGF.b2~FGF.7"   "THPO~FGF.7"     "TNF.b~FGF.7"    "IL.3~FGF.9"    
## [153] "IL.4~FGF.9"     "MCP.3~FGF.9"    "MDC~FGF.9"      "NT.4~FGF.9"    
## [157] "OSM~FGF.9"      "PIGF~FGF.9"     "SCF~FGF.9"      "SDF.1~FGF.9"   
## [161] "TGF.b2~FGF.9"   "GDNF~GCP.2"     "I.309~GCP.2"    "IGF.I~GCP.2"   
## [165] "IGFBP.4~GCP.2"  "IL.1a~GCP.2"    "IL.3~GCP.2"     "IL.6~GCP.2"    
## [169] "MCP.4~GCP.2"    "OSM~GCP.2"      "PARC~GCP.2"     "THPO~GCP.2"    
## [173] "I.309~GDNF"     "IFN.g~GDNF"     "IGFBP.4~GDNF"   "IL.13~GDNF"    
## [177] "IL.15~GDNF"     "IL.1a~GDNF"     "IL.2~GDNF"      "IL.3~GDNF"     
## [181] "IL.6~GDNF"      "LIGHT~GDNF"     "MCP.3~GDNF"     "MDC~GDNF"      
## [185] "NT.4~GDNF"      "OSM~GDNF"       "PARC~GDNF"      "PIGF~GDNF"     
## [189] "SCF~GDNF"       "TNF.b~GDNF"     "IGFBP.4~I.309"  "IL.1a~I.309"   
## [193] "IL.3~I.309"     "IL.4~I.309"     "LIF~I.309"      "MCP.3~I.309"   
## [197] "MCP.4~I.309"    "MDC~I.309"      "NT.4~I.309"     "OSM~I.309"     
## [201] "PARC~I.309"     "PIGF~I.309"     "SCF~I.309"      "TGF.b2~I.309"  
## [205] "THPO~I.309"     "TNF.b~I.309"    "IL.13~IFN.g"    "IL.15~IFN.g"   
## [209] "IL.1a~IFN.g"    "IL.2~IFN.g"     "IGFBP.4~IGF.I"  "IL.1a~IGF.I"   
## [213] "MCP.4~IGF.I"    "IL.1a~IGFBP.4"  "IL.1b~IGFBP.4"  "IL.3~IGFBP.4"  
## [217] "IL.4~IGFBP.4"   "MCP.4~IGFBP.4"  "MDC~IGFBP.4"    "NT.4~IGFBP.4"  
## [221] "OSM~IGFBP.4"    "PIGF~IGFBP.4"   "TGF.b3~IGFBP.4" "THPO~IGFBP.4"  
## [225] "IL.15~IL.13"    "IL.2~IL.13"     "MIG~IL.13"      "TGF.b1~IL.13"  
## [229] "TNF.a~IL.13"    "IL.1a~IL.15"    "IL.2~IL.15"     "PARC~IL.15"    
## [233] "TNF.a~IL.15"    "IL.3~IL.1a"     "IL.4~IL.1a"     "IL.6~IL.1a"    
## [237] "LIGHT~IL.1a"    "MCP.3~IL.1a"    "MCP.4~IL.1a"    "MDC~IL.1a"     
## [241] "MIP.3a~IL.1a"   "NT.4~IL.1a"     "OSM~IL.1a"      "PARC~IL.1a"    
## [245] "PIGF~IL.1a"     "SCF~IL.1a"      "TGF.b2~IL.1a"   "THPO~IL.1a"    
## [249] "TNF.b~IL.1a"    "MCP.4~IL.1b"    "TNF.a~IL.2"     "IL.4~IL.3"     
## [253] "LIF~IL.3"       "LIGHT~IL.3"     "MCP.3~IL.3"     "MDC~IL.3"      
## [257] "NT.4~IL.3"      "OSM~IL.3"       "PARC~IL.3"      "PIGF~IL.3"     
## [261] "SCF~IL.3"       "SDF.1~IL.3"     "TGF.b2~IL.3"    "THPO~IL.3"     
## [265] "TNF.b~IL.3"     "LIF~IL.4"       "MCP.3~IL.4"     "MDC~IL.4"      
## [269] "NT.3~IL.4"      "NT.4~IL.4"      "OSM~IL.4"       "PIGF~IL.4"     
## [273] "SCF~IL.4"       "SDF.1~IL.4"     "TGF.b2~IL.4"    "THPO~IL.4"     
## [277] "TNF.b~IL.4"     "IL.7~IL.5"      "MIG~IL.5"       "TNF.a~IL.5"    
## [281] "PARC~IL.6"      "TNF.a~IL.6"     "MIG~IL.7"       "NAP.2~IL.7"    
## [285] "TNF.a~IL.7"     "MCP.3~LIF"      "MDC~LIF"        "NT.4~LIF"      
## [289] "OSM~LIF"        "PIGF~LIF"       "SCF~LIF"        "SDF.1~LIF"     
## [293] "TGF.b2~LIF"     "TNF.b~LIF"      "MDC~LIGHT"      "PARC~LIGHT"    
## [297] "PIGF~LIGHT"     "SCF~LIGHT"      "TGF.b2~LIGHT"   "TNF.b~LIGHT"   
## [301] "MDC~MCP.3"      "MIP.3a~MCP.3"   "NT.3~MCP.3"     "NT.4~MCP.3"    
## [305] "OSM~MCP.3"      "PIGF~MCP.3"     "SCF~MCP.3"      "SDF.1~MCP.3"   
## [309] "TGF.b2~MCP.3"   "TNF.b~MCP.3"    "NT.4~MCP.4"     "OSM~MCP.4"     
## [313] "TGF.b3~MCP.4"   "THPO~MCP.4"     "NT.4~MDC"       "OSM~MDC"       
## [317] "PIGF~MDC"       "SCF~MDC"        "SDF.1~MDC"      "TGF.b2~MDC"    
## [321] "THPO~MDC"       "TNF.b~MDC"      "TNF.a~MIG"      "VEGF~MIG"      
## [325] "NT.3~MIP.3a"    "PDGF.BB~NAP.2"  "OSM~NT.3"       "SCF~NT.3"      
## [329] "TNF.b~NT.3"     "OSM~NT.4"       "PARC~NT.4"      "PIGF~NT.4"     
## [333] "SCF~NT.4"       "SDF.1~NT.4"     "TGF.b2~NT.4"    "TNF.b~NT.4"    
## [337] "PARC~OSM"       "PIGF~OSM"       "SCF~OSM"        "TGF.b2~OSM"    
## [341] "THPO~OSM"       "TNF.b~OSM"      "PIGF~PARC"      "TNF.a~PARC"    
## [345] "RANTES~PDGF.BB" "SCF~PIGF"       "SDF.1~PIGF"     "TGF.b2~PIGF"   
## [349] "THPO~PIGF"      "TNF.b~PIGF"     "SDF.1~SCF"      "TGF.b2~SCF"    
## [353] "THPO~SCF"       "TNF.b~SCF"      "TGF.b2~SDF.1"   "TNF.b~SDF.1"   
## [357] "TNF.a~TGF.b1"   "TNF.b~TGF.b2"
## "Severe-First"数据表中细胞自建的相关性
## 然后把各大组的pairwusecorrelation(r>=0.8,p<=0.05)分别总结出来。
## 准备数据
table(usedata2$outSC)
## 
##  Fatal-All other      Fatal-First       Fatal-Last    Healthy-First 
##              640              480              480              400 
##   Mild-All other       Mild-First Severe-All other     Severe-First 
##              480              560             1600              880 
##      Severe-Last 
##              880
corrdata <- usedata2[usedata2$outSC == "Severe-First",c(1,2,3,12)]
corrdata2 <- corrdata[c("factor","arraydata")]
corrdata2$factor <- factor(corrdata2$factor)
table(corrdata2$factor)
## 
##      ANG     BDNF      BLC    CCL11    CCL24    CCL26  Ck-b8-1     CSF1 
##       11       11       11       11       11       11       11       11 
##     CSF2     CSF3   CX3CL1      EGF   ENA-78    FGF-4    FGF-6    FGF-7 
##       11       11       11       11       11       11       11       11 
##    FGF-9 Flt-3-LG    GCP-2     GDNF      GRO    GRO-a      HGF    I-309 
##       11       11       11       11       11       11       11       11 
##    IFN-g    IGF-I  IGFBP-1  IGFBP-2  IGFBP-3  IGFBP-4    IL-10 IL-12p70 
##       11       11       11       11       11       11       11       11 
##    IL-13    IL-15    IL-16    IL-1a    IL-1b     IL-2     IL-3     IL-4 
##       11       11       11       11       11       11       11       11 
##     IL-5     IL-6     IL-7     IL-8    IP-10   Leptin      LIF    LIGHT 
##       11       11       11       11       11       11       11       11 
##    MCP-1    MCP-2    MCP-3    MCP-4      MDC      MIF      MIG   MIP-1b 
##       11       11       11       11       11       11       11       11 
##   MIP-1d   MIP-3a    NAP-2     NT-3     NT-4      OPG      OPN      OSM 
##       11       11       11       11       11       11       11       11 
##     PARC  PDGF-BB     PIGF   RANTES      SCF    SDF-1     TARC   TGF-b1 
##       11       11       11       11       11       11       11       11 
##   TGF-b2   TGF-b3     THPO   TIMP-1   TIMP-2    TNF-a    TNF-b     VEGF 
##       11       11       11       11       11       11       11       11
## 找出组合
zuheSF <- comcor(corrdata2)
zuheSF
##   [1] "CSF3~BLC"       "FGF.6~BLC"      "FGF.7~BLC"      "GRO~BLC"       
##   [5] "GRO.a~BLC"      "MCP.3~BLC"      "MDC~BLC"        "TNF.b~BLC"     
##   [9] "CX3CL1~CCL26"   "IGFBP.1~CCL26"  "FGF.4~Ck.b8.1"  "IL.1a~Ck.b8.1" 
##  [13] "IL.5~Ck.b8.1"   "NT.4~Ck.b8.1"   "PARC~Ck.b8.1"   "PIGF~Ck.b8.1"  
##  [17] "SDF.1~Ck.b8.1"  "TGF.b2~Ck.b8.1" "TGF.b3~Ck.b8.1" "THPO~Ck.b8.1"  
##  [21] "FGF.6~CSF1"     "FGF.7~CSF1"     "GDNF~CSF1"      "I.309~CSF1"    
##  [25] "IGF.I~CSF1"     "IGFBP.4~CSF1"   "IL.1a~CSF1"     "IL.3~CSF1"     
##  [29] "IL.4~CSF1"      "IL.5~CSF1"      "MCP.3~CSF1"     "MIG~CSF1"      
##  [33] "NT.4~CSF1"      "TGF.b2~CSF1"    "TGF.b3~CSF1"    "THPO~CSF1"     
##  [37] "CSF3~CSF2"      "FGF.6~CSF2"     "FGF.7~CSF2"     "GRO.a~CSF2"    
##  [41] "IFN.g~CSF2"     "IL.13~CSF2"     "IL.15~CSF2"     "IL.2~CSF2"     
##  [45] "IL.5~CSF2"      "IL.7~CSF2"      "LIGHT~CSF2"     "MIG~CSF2"      
##  [49] "PARC~CSF2"      "PDGF.BB~CSF2"   "TGF.b1~CSF2"    "TNF.a~CSF2"    
##  [53] "TNF.b~CSF2"     "FGF.6~CSF3"     "FGF.7~CSF3"     "GRO.a~CSF3"    
##  [57] "IL.13~CSF3"     "IL.15~CSF3"     "IL.7~CSF3"      "MDC~CSF3"      
##  [61] "TNF.b~CSF3"     "IGFBP.1~CX3CL1" "MIP.1b~CX3CL1"  "ENA.78~EGF"    
##  [65] "GDNF~FGF.4"     "I.309~FGF.4"    "IGFBP.4~FGF.4"  "IL.1a~FGF.4"   
##  [69] "IL.5~FGF.4"     "NT.4~FGF.4"     "PIGF~FGF.4"     "SDF.1~FGF.4"   
##  [73] "TGF.b3~FGF.4"   "TIMP.2~FGF.4"   "VEGF~FGF.4"     "FGF.7~FGF.6"   
##  [77] "FGF.9~FGF.6"    "GDNF~FGF.6"     "GRO.a~FGF.6"    "I.309~FGF.6"   
##  [81] "IL.13~FGF.6"    "IL.15~FGF.6"    "IL.1a~FGF.6"    "IL.2~FGF.6"    
##  [85] "IL.3~FGF.6"     "IL.4~FGF.6"     "IL.5~FGF.6"     "LIGHT~FGF.6"   
##  [89] "MCP.3~FGF.6"    "MDC~FGF.6"      "MIG~FGF.6"      "NT.4~FGF.6"    
##  [93] "PARC~FGF.6"     "TGF.b1~FGF.6"   "TGF.b3~FGF.6"   "THPO~FGF.6"    
##  [97] "TNF.b~FGF.6"    "FGF.9~FGF.7"    "GDNF~FGF.7"     "GRO.a~FGF.7"   
## [101] "I.309~FGF.7"    "IFN.g~FGF.7"    "IGF.I~FGF.7"    "IL.13~FGF.7"   
## [105] "IL.15~FGF.7"    "IL.1a~FGF.7"    "IL.2~FGF.7"     "IL.3~FGF.7"    
## [109] "IL.4~FGF.7"     "IL.5~FGF.7"     "LIGHT~FGF.7"    "MCP.3~FGF.7"   
## [113] "MDC~FGF.7"      "MIG~FGF.7"      "NT.4~FGF.7"     "TGF.b3~FGF.7"  
## [117] "LIF~FGF.9"      "LIGHT~FGF.9"    "MCP.3~FGF.9"    "OSM~FGF.9"     
## [121] "IFN.g~GCP.2"    "IL.2~GCP.2"     "IL.5~GCP.2"     "MIG~GCP.2"     
## [125] "PARC~GCP.2"     "PIGF~GCP.2"     "TGF.b1~GCP.2"   "I.309~GDNF"    
## [129] "IGF.I~GDNF"     "IGFBP.4~GDNF"   "IL.1a~GDNF"     "IL.2~GDNF"     
## [133] "IL.3~GDNF"      "IL.4~GDNF"      "IL.5~GDNF"      "LIGHT~GDNF"    
## [137] "MIG~GDNF"       "NT.4~GDNF"      "SDF.1~GDNF"     "TGF.b2~GDNF"   
## [141] "TGF.b3~GDNF"    "THPO~GDNF"      "VEGF~GDNF"      "MDC~GRO"       
## [145] "IFN.g~GRO.a"    "IL.13~GRO.a"    "IL.15~GRO.a"    "IL.2~GRO.a"    
## [149] "LIGHT~GRO.a"    "MDC~GRO.a"      "PARC~GRO.a"     "TGF.b1~GRO.a"  
## [153] "TGF.b2~GRO.a"   "TNF.b~GRO.a"    "IGF.I~I.309"    "IGFBP.4~I.309" 
## [157] "IL.1a~I.309"    "IL.1b~I.309"    "IL.3~I.309"     "LIF~I.309"     
## [161] "MIG~I.309"      "NT.3~I.309"     "NT.4~I.309"     "OSM~I.309"     
## [165] "SDF.1~I.309"    "TGF.b3~I.309"   "THPO~I.309"     "VEGF~I.309"    
## [169] "IL.13~IFN.g"    "IL.15~IFN.g"    "IL.1a~IFN.g"    "IL.2~IFN.g"    
## [173] "IL.4~IFN.g"     "IL.5~IFN.g"     "MIG~IFN.g"      "PARC~IFN.g"    
## [177] "TGF.b1~IFN.g"   "TNF.a~IFN.g"    "IGFBP.4~IGF.I"  "IL.1a~IGF.I"   
## [181] "IL.1b~IGF.I"    "IL.2~IGF.I"     "IL.3~IGF.I"     "IL.4~IGF.I"    
## [185] "IL.5~IGF.I"     "MIG~IGF.I"      "NT.4~IGF.I"     "OSM~IGF.I"     
## [189] "PARC~IGF.I"     "SDF.1~IGF.I"    "TGF.b2~IGF.I"   "TGF.b3~IGF.I"  
## [193] "VEGF~IGF.I"     "IL.8~IGFBP.3"   "OPG~IGFBP.3"    "IL.1a~IGFBP.4" 
## [197] "IL.1b~IGFBP.4"  "IL.3~IGFBP.4"   "IL.4~IGFBP.4"   "MIG~IGFBP.4"   
## [201] "NT.3~IGFBP.4"   "NT.4~IGFBP.4"   "OSM~IGFBP.4"    "SDF.1~IGFBP.4" 
## [205] "TGF.b3~IGFBP.4" "THPO~IGFBP.4"   "VEGF~IGFBP.4"   "IL.16~IL.10"   
## [209] "IL.15~IL.13"    "IL.2~IL.13"     "IL.5~IL.13"     "IL.7~IL.13"    
## [213] "PDGF.BB~IL.13"  "TGF.b1~IL.13"   "TNF.a~IL.13"    "TNF.b~IL.13"   
## [217] "IL.2~IL.15"     "IL.5~IL.15"     "IL.7~IL.15"     "MIG~IL.15"     
## [221] "PARC~IL.15"     "PDGF.BB~IL.15"  "TGF.b1~IL.15"   "TNF.a~IL.15"   
## [225] "TNF.b~IL.15"    "MIF~IL.16"      "IL.1b~IL.1a"    "IL.2~IL.1a"    
## [229] "IL.3~IL.1a"     "IL.4~IL.1a"     "IL.5~IL.1a"     "LIGHT~IL.1a"   
## [233] "MCP.3~IL.1a"    "MIG~IL.1a"      "NT.3~IL.1a"     "NT.4~IL.1a"    
## [237] "OSM~IL.1a"      "PARC~IL.1a"     "SDF.1~IL.1a"    "TGF.b2~IL.1a"  
## [241] "TGF.b3~IL.1a"   "THPO~IL.1a"     "VEGF~IL.1a"     "IL.2~IL.1b"    
## [245] "IL.4~IL.1b"     "MIG~IL.1b"      "NT.3~IL.1b"     "OSM~IL.1b"     
## [249] "PARC~IL.1b"     "SDF.1~IL.1b"    "THPO~IL.1b"     "VEGF~IL.1b"    
## [253] "IL.4~IL.2"      "IL.5~IL.2"      "IL.7~IL.2"      "MIG~IL.2"      
## [257] "PARC~IL.2"      "TGF.b1~IL.2"    "TGF.b2~IL.2"    "THPO~IL.2"     
## [261] "TNF.a~IL.2"     "VEGF~IL.2"      "IL.4~IL.3"      "IL.5~IL.3"     
## [265] "MCP.3~IL.3"     "MIG~IL.3"       "NT.4~IL.3"      "SDF.1~IL.3"    
## [269] "TGF.b3~IL.3"    "THPO~IL.3"      "VEGF~IL.3"      "MIG~IL.4"      
## [273] "NT.4~IL.4"      "PARC~IL.4"      "SDF.1~IL.4"     "TGF.b3~IL.4"   
## [277] "THPO~IL.4"      "VEGF~IL.4"      "IL.7~IL.5"      "LIGHT~IL.5"    
## [281] "MIG~IL.5"       "NT.4~IL.5"      "PARC~IL.5"      "PIGF~IL.5"     
## [285] "TGF.b1~IL.5"    "TGF.b2~IL.5"    "TGF.b3~IL.5"    "THPO~IL.5"     
## [289] "TNF.a~IL.5"     "VEGF~IL.5"      "IL.8~IL.6"      "PARC~IL.6"     
## [293] "PARC~IL.7"      "PDGF.BB~IL.7"   "TGF.b1~IL.7"    "THPO~IL.7"     
## [297] "TNF.a~IL.7"     "TNF.b~IL.7"     "NT.3~LIF"       "OSM~LIF"       
## [301] "TGF.b2~LIF"     "THPO~LIF"       "NT.4~LIGHT"     "TGF.b2~LIGHT"  
## [305] "MCP.4~MCP.3"    "MIG~MCP.3"      "OSM~MCP.3"      "TGF.b3~MCP.3"  
## [309] "THPO~MCP.3"     "TNF.b~MDC"      "NT.4~MIG"       "OSM~MIG"       
## [313] "PARC~MIG"       "PIGF~MIG"       "SDF.1~MIG"      "TGF.b1~MIG"    
## [317] "TGF.b2~MIG"     "TGF.b3~MIG"     "THPO~MIG"       "TNF.a~MIG"     
## [321] "VEGF~MIG"       "OPG~MIP.3a"     "OSM~NT.3"       "SDF.1~NT.3"    
## [325] "TGF.b3~NT.3"    "SDF.1~NT.4"     "TGF.b2~NT.4"    "TGF.b3~NT.4"   
## [329] "THPO~NT.4"      "PARC~OSM"       "TGF.b2~OSM"     "THPO~OSM"      
## [333] "PIGF~PARC"      "SDF.1~PARC"     "TGF.b1~PARC"    "TGF.b2~PARC"   
## [337] "TGF.b3~PARC"    "THPO~PARC"      "TNF.a~PARC"     "TGF.b1~PDGF.BB"
## [341] "TNF.a~PDGF.BB"  "TNF.b~PDGF.BB"  "TGF.b2~PIGF"    "THPO~PIGF"     
## [345] "VEGF~PIGF"      "TGF.b3~SDF.1"   "THPO~SDF.1"     "VEGF~SDF.1"    
## [349] "TNF.a~TGF.b1"   "THPO~TGF.b2"    "THPO~TGF.b3"    "VEGF~TGF.b3"   
## [353] "VEGF~THPO"
## "Severe-Last"数据表中细胞自建的相关性
## 然后把各大组的pairwusecorrelation(r>=0.8,p<=0.05)分别总结出来。
## 准备数据
table(usedata2$outSC)
## 
##  Fatal-All other      Fatal-First       Fatal-Last    Healthy-First 
##              640              480              480              400 
##   Mild-All other       Mild-First Severe-All other     Severe-First 
##              480              560             1600              880 
##      Severe-Last 
##              880
corrdata <- usedata2[usedata2$outSC == "Severe-Last",c(1,2,3,12)]
corrdata2 <- corrdata[c("factor","arraydata")]
corrdata2$factor <- factor(corrdata2$factor)
table(corrdata2$factor)
## 
##      ANG     BDNF      BLC    CCL11    CCL24    CCL26  Ck-b8-1     CSF1 
##       11       11       11       11       11       11       11       11 
##     CSF2     CSF3   CX3CL1      EGF   ENA-78    FGF-4    FGF-6    FGF-7 
##       11       11       11       11       11       11       11       11 
##    FGF-9 Flt-3-LG    GCP-2     GDNF      GRO    GRO-a      HGF    I-309 
##       11       11       11       11       11       11       11       11 
##    IFN-g    IGF-I  IGFBP-1  IGFBP-2  IGFBP-3  IGFBP-4    IL-10 IL-12p70 
##       11       11       11       11       11       11       11       11 
##    IL-13    IL-15    IL-16    IL-1a    IL-1b     IL-2     IL-3     IL-4 
##       11       11       11       11       11       11       11       11 
##     IL-5     IL-6     IL-7     IL-8    IP-10   Leptin      LIF    LIGHT 
##       11       11       11       11       11       11       11       11 
##    MCP-1    MCP-2    MCP-3    MCP-4      MDC      MIF      MIG   MIP-1b 
##       11       11       11       11       11       11       11       11 
##   MIP-1d   MIP-3a    NAP-2     NT-3     NT-4      OPG      OPN      OSM 
##       11       11       11       11       11       11       11       11 
##     PARC  PDGF-BB     PIGF   RANTES      SCF    SDF-1     TARC   TGF-b1 
##       11       11       11       11       11       11       11       11 
##   TGF-b2   TGF-b3     THPO   TIMP-1   TIMP-2    TNF-a    TNF-b     VEGF 
##       11       11       11       11       11       11       11       11
## 找出组合
zuheSL <- comcor(corrdata2)
zuheSL
##  [1] "MIP.1d~CCL11"    "SCF~CCL11"       "TARC~CCL24"     
##  [4] "OSM~CSF1"        "TNF.b~CSF1"      "IL.13~CSF3"     
##  [7] "IL.8~CX3CL1"     "MIP.1b~CX3CL1"   "MCP.4~FGF.4"    
## [10] "IGF.I~FGF.7"     "NT.4~FGF.7"      "TARC~FGF.9"     
## [13] "OPG~I.309"       "IL.4~IGFBP.1"    "OPG~IGFBP.4"    
## [16] "TIMP.1~IL.12p70" "IL.15~IL.13"     "IL.6~IL.13"     
## [19] "TGF.b1~IL.15"    "TNF.a~IL.5"      "TNF.a~IL.6"     
## [22] "MCP.2~IL.7"      "NAP.2~IL.7"      "PDGF.BB~IL.7"   
## [25] "TNF.a~IL.7"      "MIP.1b~IL.8"     "PIGF~MCP.4"     
## [28] "SCF~MIP.1d"      "SDF.1~MIP.3a"    "TNF.a~NAP.2"    
## [31] "TNF.b~NT.3"      "TGF.b3~OPG"      "SDF.1~OPN"      
## [34] "TGF.b3~PARC"
## 计算9个组合的并集
zuheall <- sort(union(union(union(union(union(union(union(union(zuheFA,zuheFF),
                                          zuheFL),zuheHF),zuheMF),
                        zuheMA),zuheSA),zuheSF),zuheSL))

length(zuheall)
## [1] 1372
zuheall
##    [1] "CCL26~BLC"        "Ck.b8.1~BLC"      "Ck.b8.1~CCL26"   
##    [4] "CSF1~BLC"         "CSF1~CCL26"       "CSF1~Ck.b8.1"    
##    [7] "CSF2~BDNF"        "CSF2~CCL11"       "CSF2~Ck.b8.1"    
##   [10] "CSF3~BLC"         "CSF3~CCL11"       "CSF3~CCL26"      
##   [13] "CSF3~CSF2"        "CX3CL1~ANG"       "CX3CL1~CCL26"    
##   [16] "CX3CL1~Ck.b8.1"   "EGF~BDNF"         "EGF~BLC"         
##   [19] "EGF~CCL24"        "EGF~CSF2"         "ENA.78~BDNF"     
##   [22] "ENA.78~CCL11"     "ENA.78~CSF2"      "ENA.78~EGF"      
##   [25] "FGF.4~ANG"        "FGF.4~CCL26"      "FGF.4~Ck.b8.1"   
##   [28] "FGF.4~CSF1"       "FGF.4~CSF3"       "FGF.6~BLC"       
##   [31] "FGF.6~CCL26"      "FGF.6~Ck.b8.1"    "FGF.6~CSF1"      
##   [34] "FGF.6~CSF2"       "FGF.6~CSF3"       "FGF.6~CX3CL1"    
##   [37] "FGF.6~FGF.4"      "FGF.7~BLC"        "FGF.7~CCL26"     
##   [40] "FGF.7~Ck.b8.1"    "FGF.7~CSF1"       "FGF.7~CSF2"      
##   [43] "FGF.7~CSF3"       "FGF.7~FGF.4"      "FGF.7~FGF.6"     
##   [46] "FGF.9~CCL24"      "FGF.9~CCL26"      "FGF.9~CX3CL1"    
##   [49] "FGF.9~EGF"        "FGF.9~FGF.4"      "FGF.9~FGF.6"     
##   [52] "FGF.9~FGF.7"      "Flt.3.LG~FGF.9"   "GCP.2~BLC"       
##   [55] "GCP.2~CCL11"      "GCP.2~CCL26"      "GCP.2~CSF1"      
##   [58] "GCP.2~CSF2"       "GCP.2~CSF3"       "GCP.2~FGF.7"     
##   [61] "GDNF~ANG"         "GDNF~BLC"         "GDNF~CCL24"      
##   [64] "GDNF~CCL26"       "GDNF~CSF1"        "GDNF~CSF2"       
##   [67] "GDNF~CSF3"        "GDNF~CX3CL1"      "GDNF~ENA.78"     
##   [70] "GDNF~FGF.4"       "GDNF~FGF.6"       "GDNF~FGF.7"      
##   [73] "GDNF~Flt.3.LG"    "GDNF~GCP.2"       "GRO.a~ANG"       
##   [76] "GRO.a~BDNF"       "GRO.a~BLC"        "GRO.a~CCL24"     
##   [79] "GRO.a~CSF2"       "GRO.a~CSF3"       "GRO.a~EGF"       
##   [82] "GRO.a~FGF.6"      "GRO.a~FGF.7"      "GRO.a~FGF.9"     
##   [85] "GRO.a~GCP.2"      "GRO~ANG"          "GRO~BDNF"        
##   [88] "GRO~BLC"          "GRO~CSF2"         "GRO~CSF3"        
##   [91] "GRO~EGF"          "GRO~ENA.78"       "GRO~FGF.7"       
##   [94] "HGF~Ck.b8.1"      "HGF~FGF.4"        "HGF~FGF.7"       
##   [97] "HGF~GCP.2"        "I.309~BLC"        "I.309~CCL26"     
##  [100] "I.309~Ck.b8.1"    "I.309~CSF1"       "I.309~CSF3"      
##  [103] "I.309~FGF.4"      "I.309~FGF.6"      "I.309~FGF.7"     
##  [106] "I.309~FGF.9"      "I.309~GCP.2"      "I.309~GDNF"      
##  [109] "I.309~HGF"        "IFN.g~ANG"        "IFN.g~CCL11"     
##  [112] "IFN.g~CSF2"       "IFN.g~CSF3"       "IFN.g~FGF.7"     
##  [115] "IFN.g~GCP.2"      "IFN.g~GDNF"       "IFN.g~GRO.a"     
##  [118] "IFN.g~I.309"      "IGF.I~BLC"        "IGF.I~Ck.b8.1"   
##  [121] "IGF.I~CSF1"       "IGF.I~FGF.7"      "IGF.I~FGF.9"     
##  [124] "IGF.I~GCP.2"      "IGF.I~GDNF"       "IGF.I~GRO.a"     
##  [127] "IGF.I~I.309"      "IGFBP.1~BDNF"     "IGFBP.1~CCL26"   
##  [130] "IGFBP.1~CSF1"     "IGFBP.1~CX3CL1"   "IGFBP.1~FGF.7"   
##  [133] "IGFBP.1~Flt.3.LG" "IGFBP.1~I.309"    "IGFBP.2~ANG"     
##  [136] "IGFBP.2~BLC"      "IGFBP.2~CCL26"    "IGFBP.2~FGF.7"   
##  [139] "IGFBP.2~GRO"      "IGFBP.2~GRO.a"    "IGFBP.2~I.309"   
##  [142] "IGFBP.2~IGF.I"    "IGFBP.2~IGFBP.1"  "IGFBP.3~CSF2"    
##  [145] "IGFBP.3~CSF3"     "IGFBP.3~EGF"      "IGFBP.3~FGF.4"   
##  [148] "IGFBP.3~FGF.7"    "IGFBP.3~GCP.2"    "IGFBP.3~GRO"     
##  [151] "IGFBP.3~HGF"      "IGFBP.3~I.309"    "IGFBP.3~IGFBP.1" 
##  [154] "IGFBP.4~BLC"      "IGFBP.4~CCL24"    "IGFBP.4~CCL26"   
##  [157] "IGFBP.4~Ck.b8.1"  "IGFBP.4~CSF1"     "IGFBP.4~CX3CL1"  
##  [160] "IGFBP.4~FGF.4"    "IGFBP.4~FGF.6"    "IGFBP.4~FGF.7"   
##  [163] "IGFBP.4~Flt.3.LG" "IGFBP.4~GCP.2"    "IGFBP.4~GDNF"    
##  [166] "IGFBP.4~HGF"      "IGFBP.4~I.309"    "IGFBP.4~IFN.g"   
##  [169] "IGFBP.4~IGF.I"    "IGFBP.4~IGFBP.3"  "IL.10~BDNF"      
##  [172] "IL.10~CSF2"       "IL.10~CSF3"       "IL.10~ENA.78"    
##  [175] "IL.10~FGF.6"      "IL.10~GRO"        "IL.10~GRO.a"     
##  [178] "IL.10~I.309"      "IL.10~IFN.g"      "IL.12p70~ANG"    
##  [181] "IL.12p70~CCL11"   "IL.12p70~CCL26"   "IL.12p70~CSF3"   
##  [184] "IL.12p70~GDNF"    "IL.12p70~GRO"     "IL.12p70~GRO.a"  
##  [187] "IL.12p70~IGFBP.3" "IL.13~CCL11"      "IL.13~CSF2"      
##  [190] "IL.13~CSF3"       "IL.13~FGF.6"      "IL.13~FGF.7"     
##  [193] "IL.13~GCP.2"      "IL.13~GDNF"       "IL.13~GRO.a"     
##  [196] "IL.13~I.309"      "IL.13~IFN.g"      "IL.13~IGF.I"     
##  [199] "IL.13~IL.10"      "IL.15~ANG"        "IL.15~BDNF"      
##  [202] "IL.15~CCL11"      "IL.15~CCL26"      "IL.15~CSF2"      
##  [205] "IL.15~CSF3"       "IL.15~EGF"        "IL.15~ENA.78"    
##  [208] "IL.15~FGF.6"      "IL.15~FGF.7"      "IL.15~GCP.2"     
##  [211] "IL.15~GDNF"       "IL.15~GRO"        "IL.15~GRO.a"     
##  [214] "IL.15~IFN.g"      "IL.15~IGFBP.3"    "IL.15~IL.10"     
##  [217] "IL.15~IL.12p70"   "IL.15~IL.13"      "IL.16~Ck.b8.1"   
##  [220] "IL.16~FGF.4"      "IL.16~FGF.6"      "IL.16~FGF.7"     
##  [223] "IL.16~GRO"        "IL.16~I.309"      "IL.16~IL.10"     
##  [226] "IL.16~IL.12p70"   "IL.1a~BDNF"       "IL.1a~BLC"       
##  [229] "IL.1a~CCL11"      "IL.1a~CCL26"      "IL.1a~Ck.b8.1"   
##  [232] "IL.1a~CSF1"       "IL.1a~CSF2"       "IL.1a~CSF3"      
##  [235] "IL.1a~FGF.4"      "IL.1a~FGF.6"      "IL.1a~FGF.7"     
##  [238] "IL.1a~FGF.9"      "IL.1a~GCP.2"      "IL.1a~GDNF"      
##  [241] "IL.1a~GRO.a"      "IL.1a~I.309"      "IL.1a~IFN.g"     
##  [244] "IL.1a~IGF.I"      "IL.1a~IGFBP.4"    "IL.1a~IL.10"     
##  [247] "IL.1a~IL.13"      "IL.1a~IL.15"      "IL.1b~Ck.b8.1"   
##  [250] "IL.1b~EGF"        "IL.1b~FGF.9"      "IL.1b~I.309"     
##  [253] "IL.1b~IGF.I"      "IL.1b~IGFBP.1"    "IL.1b~IGFBP.4"   
##  [256] "IL.1b~IL.16"      "IL.1b~IL.1a"      "IL.2~ANG"        
##  [259] "IL.2~BDNF"        "IL.2~CCL11"       "IL.2~CSF2"       
##  [262] "IL.2~CSF3"        "IL.2~EGF"         "IL.2~ENA.78"     
##  [265] "IL.2~FGF.6"       "IL.2~FGF.7"       "IL.2~GCP.2"      
##  [268] "IL.2~GDNF"        "IL.2~GRO"         "IL.2~GRO.a"      
##  [271] "IL.2~HGF"         "IL.2~I.309"       "IL.2~IFN.g"      
##  [274] "IL.2~IGF.I"       "IL.2~IL.10"       "IL.2~IL.13"      
##  [277] "IL.2~IL.15"       "IL.2~IL.1a"       "IL.2~IL.1b"      
##  [280] "IL.3~ANG"         "IL.3~CCL26"       "IL.3~Ck.b8.1"    
##  [283] "IL.3~CSF1"        "IL.3~CSF3"        "IL.3~FGF.4"      
##  [286] "IL.3~FGF.6"       "IL.3~FGF.7"       "IL.3~FGF.9"      
##  [289] "IL.3~GCP.2"       "IL.3~GDNF"        "IL.3~I.309"      
##  [292] "IL.3~IFN.g"       "IL.3~IGF.I"       "IL.3~IGFBP.2"    
##  [295] "IL.3~IGFBP.4"     "IL.3~IL.10"       "IL.3~IL.13"      
##  [298] "IL.3~IL.15"       "IL.3~IL.1a"       "IL.3~IL.1b"      
##  [301] "IL.4~ANG"         "IL.4~BDNF"        "IL.4~CCL26"      
##  [304] "IL.4~Ck.b8.1"     "IL.4~CSF1"        "IL.4~FGF.4"      
##  [307] "IL.4~FGF.6"       "IL.4~FGF.7"       "IL.4~FGF.9"      
##  [310] "IL.4~GCP.2"       "IL.4~GDNF"        "IL.4~I.309"      
##  [313] "IL.4~IFN.g"       "IL.4~IGF.I"       "IL.4~IGFBP.1"    
##  [316] "IL.4~IGFBP.2"     "IL.4~IGFBP.3"     "IL.4~IGFBP.4"    
##  [319] "IL.4~IL.12p70"    "IL.4~IL.13"       "IL.4~IL.1a"      
##  [322] "IL.4~IL.1b"       "IL.4~IL.2"        "IL.4~IL.3"       
##  [325] "IL.5~CCL11"       "IL.5~Ck.b8.1"     "IL.5~CSF1"       
##  [328] "IL.5~CSF2"        "IL.5~CSF3"        "IL.5~ENA.78"     
##  [331] "IL.5~FGF.4"       "IL.5~FGF.6"       "IL.5~FGF.7"      
##  [334] "IL.5~GCP.2"       "IL.5~GDNF"        "IL.5~GRO"        
##  [337] "IL.5~HGF"         "IL.5~IFN.g"       "IL.5~IGF.I"      
##  [340] "IL.5~IGFBP.3"     "IL.5~IL.10"       "IL.5~IL.13"      
##  [343] "IL.5~IL.15"       "IL.5~IL.1a"       "IL.5~IL.2"       
##  [346] "IL.5~IL.3"        "IL.5~IL.4"        "IL.6~BDNF"       
##  [349] "IL.6~CSF2"        "IL.6~CSF3"        "IL.6~EGF"        
##  [352] "IL.6~ENA.78"      "IL.6~FGF.4"       "IL.6~Flt.3.LG"   
##  [355] "IL.6~GCP.2"       "IL.6~GDNF"        "IL.6~GRO"        
##  [358] "IL.6~GRO.a"       "IL.6~IGFBP.3"     "IL.6~IGFBP.4"    
##  [361] "IL.6~IL.13"       "IL.6~IL.15"       "IL.6~IL.1a"      
##  [364] "IL.6~IL.4"        "IL.6~IL.5"        "IL.7~CCL11"      
##  [367] "IL.7~Ck.b8.1"     "IL.7~CSF2"        "IL.7~CSF3"       
##  [370] "IL.7~GCP.2"       "IL.7~IFN.g"       "IL.7~IGFBP.4"    
##  [373] "IL.7~IL.10"       "IL.7~IL.13"       "IL.7~IL.15"      
##  [376] "IL.7~IL.1a"       "IL.7~IL.1b"       "IL.7~IL.2"       
##  [379] "IL.7~IL.5"        "IL.7~IL.6"        "IL.8~CSF3"       
##  [382] "IL.8~CX3CL1"      "IL.8~FGF.7"       "IL.8~Flt.3.LG"   
##  [385] "IL.8~GCP.2"       "IL.8~GDNF"        "IL.8~GRO"        
##  [388] "IL.8~I.309"       "IL.8~IGFBP.3"     "IL.8~IGFBP.4"    
##  [391] "IL.8~IL.10"       "IL.8~IL.13"       "IL.8~IL.15"      
##  [394] "IL.8~IL.1b"       "IL.8~IL.2"        "IL.8~IL.4"       
##  [397] "IL.8~IL.5"        "IL.8~IL.6"        "IL.8~IL.7"       
##  [400] "IP.10~ANG"        "IP.10~Ck.b8.1"    "IP.10~CSF1"      
##  [403] "IP.10~EGF"        "IP.10~ENA.78"     "IP.10~FGF.4"     
##  [406] "IP.10~FGF.6"      "IP.10~FGF.7"      "IP.10~GDNF"      
##  [409] "IP.10~HGF"        "IP.10~IFN.g"      "IP.10~IGFBP.1"   
##  [412] "IP.10~IGFBP.3"    "IP.10~IL.12p70"   "IP.10~IL.1a"     
##  [415] "IP.10~IL.4"       "Leptin~CCL26"     "Leptin~GDNF"     
##  [418] "Leptin~GRO"       "Leptin~HGF"       "Leptin~IFN.g"    
##  [421] "Leptin~IGFBP.1"   "Leptin~IGFBP.2"   "Leptin~IGFBP.4"  
##  [424] "Leptin~IL.12p70"  "Leptin~IL.2"      "Leptin~IL.4"     
##  [427] "Leptin~IP.10"     "LIF~BDNF"         "LIF~CCL24"       
##  [430] "LIF~CCL26"        "LIF~Ck.b8.1"      "LIF~CX3CL1"      
##  [433] "LIF~EGF"          "LIF~FGF.4"        "LIF~FGF.6"       
##  [436] "LIF~FGF.7"        "LIF~FGF.9"        "LIF~I.309"       
##  [439] "LIF~IGFBP.4"      "LIF~IL.16"        "LIF~IL.1a"       
##  [442] "LIF~IL.1b"        "LIF~IL.3"         "LIF~IL.4"        
##  [445] "LIGHT~BLC"        "LIGHT~CCL24"      "LIGHT~CCL26"     
##  [448] "LIGHT~Ck.b8.1"    "LIGHT~CSF2"       "LIGHT~CSF3"      
##  [451] "LIGHT~CX3CL1"     "LIGHT~FGF.4"      "LIGHT~FGF.6"     
##  [454] "LIGHT~FGF.7"      "LIGHT~FGF.9"      "LIGHT~GDNF"      
##  [457] "LIGHT~GRO.a"      "LIGHT~I.309"      "LIGHT~IGF.I"     
##  [460] "LIGHT~IL.10"      "LIGHT~IL.16"      "LIGHT~IL.1a"     
##  [463] "LIGHT~IL.1b"      "LIGHT~IL.3"       "LIGHT~IL.5"      
##  [466] "MCP.1~ANG"        "MCP.1~BDNF"       "MCP.1~Ck.b8.1"   
##  [469] "MCP.1~CSF2"       "MCP.1~CSF3"       "MCP.1~CX3CL1"    
##  [472] "MCP.1~FGF.4"      "MCP.1~FGF.6"      "MCP.1~FGF.7"     
##  [475] "MCP.1~GCP.2"      "MCP.1~GRO.a"      "MCP.1~IFN.g"     
##  [478] "MCP.1~IL.10"      "MCP.1~IL.13"      "MCP.1~IL.15"     
##  [481] "MCP.1~IL.16"      "MCP.1~IL.1a"      "MCP.1~IL.2"      
##  [484] "MCP.1~IL.3"       "MCP.1~IL.4"       "MCP.1~IL.5"      
##  [487] "MCP.1~IL.6"       "MCP.1~IL.7"       "MCP.1~IL.8"      
##  [490] "MCP.1~IP.10"      "MCP.2~ANG"        "MCP.2~BDNF"      
##  [493] "MCP.2~BLC"        "MCP.2~CSF2"       "MCP.2~EGF"       
##  [496] "MCP.2~ENA.78"     "MCP.2~FGF.7"      "MCP.2~Flt.3.LG"  
##  [499] "MCP.2~GDNF"       "MCP.2~GRO.a"      "MCP.2~HGF"       
##  [502] "MCP.2~IFN.g"      "MCP.2~IL.10"      "MCP.2~IL.12p70"  
##  [505] "MCP.2~IL.4"       "MCP.2~IL.7"       "MCP.2~IP.10"     
##  [508] "MCP.3~BDNF"       "MCP.3~BLC"        "MCP.3~CCL26"     
##  [511] "MCP.3~Ck.b8.1"    "MCP.3~CSF1"       "MCP.3~CSF3"      
##  [514] "MCP.3~CX3CL1"     "MCP.3~EGF"        "MCP.3~ENA.78"    
##  [517] "MCP.3~FGF.4"      "MCP.3~FGF.6"      "MCP.3~FGF.7"     
##  [520] "MCP.3~FGF.9"      "MCP.3~GCP.2"      "MCP.3~GDNF"      
##  [523] "MCP.3~HGF"        "MCP.3~I.309"      "MCP.3~IFN.g"     
##  [526] "MCP.3~IGFBP.1"    "MCP.3~IGFBP.3"    "MCP.3~IL.16"     
##  [529] "MCP.3~IL.1a"      "MCP.3~IL.2"       "MCP.3~IL.3"      
##  [532] "MCP.3~IL.4"       "MCP.3~IL.8"       "MCP.3~IP.10"     
##  [535] "MCP.3~Leptin"     "MCP.3~LIF"        "MCP.3~MCP.1"     
##  [538] "MCP.4~BDNF"       "MCP.4~BLC"        "MCP.4~CCL26"     
##  [541] "MCP.4~Ck.b8.1"    "MCP.4~CSF1"       "MCP.4~CX3CL1"    
##  [544] "MCP.4~FGF.4"      "MCP.4~FGF.7"      "MCP.4~GCP.2"     
##  [547] "MCP.4~GRO.a"      "MCP.4~HGF"        "MCP.4~I.309"     
##  [550] "MCP.4~IGF.I"      "MCP.4~IGFBP.2"    "MCP.4~IGFBP.4"   
##  [553] "MCP.4~IL.10"      "MCP.4~IL.12p70"   "MCP.4~IL.1a"     
##  [556] "MCP.4~IL.1b"      "MCP.4~LIGHT"      "MCP.4~MCP.2"     
##  [559] "MCP.4~MCP.3"      "MDC~BLC"          "MDC~CCL26"       
##  [562] "MDC~Ck.b8.1"      "MDC~CSF1"         "MDC~CSF2"        
##  [565] "MDC~CSF3"         "MDC~CX3CL1"       "MDC~EGF"         
##  [568] "MDC~FGF.4"        "MDC~FGF.6"        "MDC~FGF.7"       
##  [571] "MDC~FGF.9"        "MDC~GDNF"         "MDC~GRO"         
##  [574] "MDC~GRO.a"        "MDC~HGF"          "MDC~I.309"       
##  [577] "MDC~IFN.g"        "MDC~IGF.I"        "MDC~IGFBP.4"     
##  [580] "MDC~IL.16"        "MDC~IL.1a"        "MDC~IL.1b"       
##  [583] "MDC~IL.2"         "MDC~IL.3"         "MDC~IL.4"        
##  [586] "MDC~IL.6"         "MDC~Leptin"       "MDC~LIF"         
##  [589] "MDC~LIGHT"        "MDC~MCP.2"        "MDC~MCP.3"       
##  [592] "MDC~MCP.4"        "MIF~BLC"          "MIF~Ck.b8.1"     
##  [595] "MIF~FGF.7"        "MIF~FGF.9"        "MIF~GRO"         
##  [598] "MIF~HGF"          "MIF~IGF.I"        "MIF~IGFBP.2"     
##  [601] "MIF~IL.12p70"     "MIF~IL.16"        "MIF~IL.1a"       
##  [604] "MIF~IL.1b"        "MIF~LIGHT"        "MIF~MCP.2"       
##  [607] "MIG~CCL11"        "MIG~CCL24"        "MIG~CCL26"       
##  [610] "MIG~CSF1"         "MIG~CSF2"         "MIG~CSF3"        
##  [613] "MIG~EGF"          "MIG~FGF.6"        "MIG~FGF.7"       
##  [616] "MIG~FGF.9"        "MIG~GCP.2"        "MIG~GDNF"        
##  [619] "MIG~GRO.a"        "MIG~I.309"        "MIG~IFN.g"       
##  [622] "MIG~IGF.I"        "MIG~IGFBP.4"      "MIG~IL.10"       
##  [625] "MIG~IL.13"        "MIG~IL.15"        "MIG~IL.1a"       
##  [628] "MIG~IL.1b"        "MIG~IL.2"         "MIG~IL.3"        
##  [631] "MIG~IL.4"         "MIG~IL.5"         "MIG~IL.7"        
##  [634] "MIG~IP.10"        "MIG~Leptin"       "MIG~LIF"         
##  [637] "MIG~MCP.1"        "MIG~MCP.3"        "MIG~MDC"         
##  [640] "MIP.1b~BDNF"      "MIP.1b~CX3CL1"    "MIP.1b~EGF"      
##  [643] "MIP.1b~FGF.4"     "MIP.1b~FGF.6"     "MIP.1b~FGF.9"    
##  [646] "MIP.1b~GCP.2"     "MIP.1b~GDNF"      "MIP.1b~HGF"      
##  [649] "MIP.1b~IFN.g"     "MIP.1b~IGFBP.1"   "MIP.1b~IGFBP.3"  
##  [652] "MIP.1b~IGFBP.4"   "MIP.1b~IL.1a"     "MIP.1b~IL.2"     
##  [655] "MIP.1b~IL.4"      "MIP.1b~IL.8"      "MIP.1b~IP.10"    
##  [658] "MIP.1b~Leptin"    "MIP.1b~LIF"       "MIP.1b~LIGHT"    
##  [661] "MIP.1b~MCP.1"     "MIP.1b~MCP.3"     "MIP.1b~MDC"      
##  [664] "MIP.1b~MIG"       "MIP.1d~CCL11"     "MIP.1d~CCL24"    
##  [667] "MIP.1d~CCL26"     "MIP.1d~FGF.6"     "MIP.1d~FGF.7"    
##  [670] "MIP.1d~I.309"     "MIP.1d~IFN.g"     "MIP.1d~IGF.I"    
##  [673] "MIP.1d~IGFBP.4"   "MIP.1d~IL.10"     "MIP.1d~IL.16"    
##  [676] "MIP.1d~IP.10"     "MIP.1d~Leptin"    "MIP.1d~LIF"      
##  [679] "MIP.1d~LIGHT"     "MIP.1d~MCP.4"     "MIP.1d~MDC"      
##  [682] "MIP.1d~MIG"       "MIP.3a~BDNF"      "MIP.3a~Ck.b8.1"  
##  [685] "MIP.3a~EGF"       "MIP.3a~ENA.78"    "MIP.3a~FGF.4"    
##  [688] "MIP.3a~FGF.7"     "MIP.3a~Flt.3.LG"  "MIP.3a~GCP.2"    
##  [691] "MIP.3a~HGF"       "MIP.3a~I.309"     "MIP.3a~IGFBP.3"  
##  [694] "MIP.3a~IGFBP.4"   "MIP.3a~IL.1a"     "MIP.3a~IL.2"     
##  [697] "MIP.3a~IL.6"      "MIP.3a~IL.8"      "MIP.3a~MCP.3"    
##  [700] "MIP.3a~MIF"       "MIP.3a~MIP.1b"    "NAP.2~BDNF"      
##  [703] "NAP.2~CCL24"      "NAP.2~CSF2"       "NAP.2~ENA.78"    
##  [706] "NAP.2~FGF.7"      "NAP.2~Flt.3.LG"   "NAP.2~GCP.2"     
##  [709] "NAP.2~GRO"        "NAP.2~IGFBP.1"    "NAP.2~IL.16"     
##  [712] "NAP.2~IL.1a"      "NAP.2~IL.4"       "NAP.2~IL.5"      
##  [715] "NAP.2~IL.6"       "NAP.2~IL.7"       "NAP.2~MCP.1"     
##  [718] "NAP.2~MCP.2"      "NAP.2~MIG"        "NAP.2~MIP.3a"    
##  [721] "NT.3~CCL24"       "NT.3~CSF2"        "NT.3~CSF3"       
##  [724] "NT.3~FGF.4"       "NT.3~FGF.6"       "NT.3~GCP.2"      
##  [727] "NT.3~GRO.a"       "NT.3~I.309"       "NT.3~IFN.g"      
##  [730] "NT.3~IGFBP.4"     "NT.3~IL.10"       "NT.3~IL.13"      
##  [733] "NT.3~IL.15"       "NT.3~IL.1a"       "NT.3~IL.1b"      
##  [736] "NT.3~IL.2"        "NT.3~IL.4"        "NT.3~IL.5"       
##  [739] "NT.3~IL.7"        "NT.3~IP.10"       "NT.3~LIF"        
##  [742] "NT.3~MCP.1"       "NT.3~MCP.3"       "NT.3~MIG"        
##  [745] "NT.3~MIP.1b"      "NT.3~MIP.3a"      "NT.3~NAP.2"      
##  [748] "NT.4~BDNF"        "NT.4~CCL24"       "NT.4~CCL26"      
##  [751] "NT.4~Ck.b8.1"     "NT.4~CSF1"        "NT.4~CSF2"       
##  [754] "NT.4~EGF"         "NT.4~ENA.78"      "NT.4~FGF.4"      
##  [757] "NT.4~FGF.6"       "NT.4~FGF.7"       "NT.4~FGF.9"      
##  [760] "NT.4~GCP.2"       "NT.4~GDNF"        "NT.4~GRO.a"      
##  [763] "NT.4~I.309"       "NT.4~IGF.I"       "NT.4~IGFBP.1"    
##  [766] "NT.4~IGFBP.4"     "NT.4~IL.16"       "NT.4~IL.1a"      
##  [769] "NT.4~IL.1b"       "NT.4~IL.3"        "NT.4~IL.4"       
##  [772] "NT.4~IL.5"        "NT.4~IL.6"        "NT.4~LIF"        
##  [775] "NT.4~LIGHT"       "NT.4~MCP.3"       "NT.4~MCP.4"      
##  [778] "NT.4~MDC"         "NT.4~MIF"         "NT.4~MIG"        
##  [781] "NT.4~MIP.1d"      "OPG~FGF.4"        "OPG~FGF.7"       
##  [784] "OPG~GCP.2"        "OPG~HGF"          "OPG~I.309"       
##  [787] "OPG~IGFBP.1"      "OPG~IGFBP.3"      "OPG~IGFBP.4"     
##  [790] "OPG~IL.10"        "OPG~IL.7"         "OPG~IP.10"       
##  [793] "OPG~MCP.2"        "OPG~MCP.3"        "OPG~MCP.4"       
##  [796] "OPG~MIP.1b"       "OPG~MIP.3a"       "OPG~NT.4"        
##  [799] "OPN~CCL11"        "OPN~FGF.6"        "OPN~FGF.7"       
##  [802] "OPN~HGF"          "OPN~IFN.g"        "OPN~IGFBP.2"     
##  [805] "OPN~IGFBP.3"      "OPN~IGFBP.4"      "OPN~IL.1a"       
##  [808] "OPN~IL.2"         "OPN~IL.6"         "OPN~IP.10"       
##  [811] "OPN~Leptin"       "OPN~MCP.3"        "OPN~MDC"         
##  [814] "OPN~MIG"          "OPN~MIP.1d"       "OPN~OPG"         
##  [817] "OSM~CCL11"        "OSM~CCL26"        "OSM~Ck.b8.1"     
##  [820] "OSM~CSF1"         "OSM~CX3CL1"       "OSM~FGF.4"       
##  [823] "OSM~FGF.6"        "OSM~FGF.7"        "OSM~FGF.9"       
##  [826] "OSM~GCP.2"        "OSM~GDNF"         "OSM~GRO.a"       
##  [829] "OSM~I.309"        "OSM~IFN.g"        "OSM~IGF.I"       
##  [832] "OSM~IGFBP.2"      "OSM~IGFBP.4"      "OSM~IL.12p70"    
##  [835] "OSM~IL.15"        "OSM~IL.16"        "OSM~IL.1a"       
##  [838] "OSM~IL.1b"        "OSM~IL.3"         "OSM~IL.4"        
##  [841] "OSM~LIF"          "OSM~LIGHT"        "OSM~MCP.3"       
##  [844] "OSM~MCP.4"        "OSM~MDC"          "OSM~MIF"         
##  [847] "OSM~MIG"          "OSM~NT.3"         "OSM~NT.4"        
##  [850] "PARC~BLC"         "PARC~CCL26"       "PARC~Ck.b8.1"    
##  [853] "PARC~CSF1"        "PARC~CSF2"        "PARC~CSF3"       
##  [856] "PARC~FGF.4"       "PARC~FGF.6"       "PARC~FGF.7"      
##  [859] "PARC~GCP.2"       "PARC~GDNF"        "PARC~GRO"        
##  [862] "PARC~GRO.a"       "PARC~I.309"       "PARC~IFN.g"      
##  [865] "PARC~IGF.I"       "PARC~IGFBP.1"     "PARC~IGFBP.2"    
##  [868] "PARC~IL.10"       "PARC~IL.13"       "PARC~IL.15"      
##  [871] "PARC~IL.1a"       "PARC~IL.1b"       "PARC~IL.2"       
##  [874] "PARC~IL.3"        "PARC~IL.4"        "PARC~IL.5"       
##  [877] "PARC~IL.6"        "PARC~IL.7"        "PARC~Leptin"     
##  [880] "PARC~LIGHT"       "PARC~MCP.1"       "PARC~MIG"        
##  [883] "PARC~NT.4"        "PARC~OSM"         "PDGF.BB~BDNF"    
##  [886] "PDGF.BB~CSF2"     "PDGF.BB~EGF"      "PDGF.BB~ENA.78"  
##  [889] "PDGF.BB~GCP.2"    "PDGF.BB~GRO"      "PDGF.BB~IFN.g"   
##  [892] "PDGF.BB~IL.13"    "PDGF.BB~IL.15"    "PDGF.BB~IL.2"    
##  [895] "PDGF.BB~IL.6"     "PDGF.BB~IL.7"     "PDGF.BB~MIG"     
##  [898] "PDGF.BB~MIP.3a"   "PDGF.BB~NAP.2"    "PDGF.BB~NT.3"    
##  [901] "PDGF.BB~NT.4"     "PDGF.BB~OSM"      "PIGF~BLC"        
##  [904] "PIGF~CCL26"       "PIGF~Ck.b8.1"     "PIGF~CSF1"       
##  [907] "PIGF~CSF2"        "PIGF~CSF3"        "PIGF~CX3CL1"     
##  [910] "PIGF~FGF.4"       "PIGF~FGF.6"       "PIGF~FGF.7"      
##  [913] "PIGF~FGF.9"       "PIGF~GCP.2"       "PIGF~GDNF"       
##  [916] "PIGF~GRO"         "PIGF~I.309"       "PIGF~IFN.g"      
##  [919] "PIGF~IGFBP.4"     "PIGF~IL.12p70"    "PIGF~IL.13"      
##  [922] "PIGF~IL.1a"       "PIGF~IL.3"        "PIGF~IL.4"       
##  [925] "PIGF~IL.5"        "PIGF~IL.8"        "PIGF~LIF"        
##  [928] "PIGF~LIGHT"       "PIGF~MCP.3"       "PIGF~MCP.4"      
##  [931] "PIGF~MDC"         "PIGF~MIF"         "PIGF~MIG"        
##  [934] "PIGF~NT.4"        "PIGF~OSM"         "PIGF~PARC"       
##  [937] "RANTES~ANG"       "RANTES~BDNF"      "RANTES~CCL11"    
##  [940] "RANTES~CCL24"     "RANTES~CCL26"     "RANTES~EGF"      
##  [943] "RANTES~ENA.78"    "RANTES~FGF.7"     "RANTES~GDNF"     
##  [946] "RANTES~GRO"       "RANTES~HGF"       "RANTES~I.309"    
##  [949] "RANTES~IGFBP.2"   "RANTES~IL.16"     "RANTES~IL.2"     
##  [952] "RANTES~IP.10"     "RANTES~MIF"       "RANTES~MIG"      
##  [955] "RANTES~MIP.3a"    "RANTES~NAP.2"     "RANTES~PDGF.BB"  
##  [958] "SCF~ANG"          "SCF~BDNF"         "SCF~CCL11"       
##  [961] "SCF~CCL24"        "SCF~CCL26"        "SCF~Ck.b8.1"     
##  [964] "SCF~CSF1"         "SCF~CSF2"         "SCF~EGF"         
##  [967] "SCF~ENA.78"       "SCF~FGF.4"        "SCF~FGF.6"       
##  [970] "SCF~FGF.7"        "SCF~FGF.9"        "SCF~GDNF"        
##  [973] "SCF~GRO"          "SCF~HGF"          "SCF~I.309"       
##  [976] "SCF~IGFBP.2"      "SCF~IGFBP.3"      "SCF~IGFBP.4"     
##  [979] "SCF~IL.10"        "SCF~IL.15"        "SCF~IL.1a"       
##  [982] "SCF~IL.2"         "SCF~IL.3"         "SCF~IL.4"        
##  [985] "SCF~IL.5"         "SCF~LIF"          "SCF~LIGHT"       
##  [988] "SCF~MCP.2"        "SCF~MCP.3"        "SCF~MDC"         
##  [991] "SCF~MIP.1b"       "SCF~MIP.1d"       "SCF~MIP.3a"      
##  [994] "SCF~NT.3"         "SCF~NT.4"         "SCF~OPG"         
##  [997] "SCF~OPN"          "SCF~OSM"          "SCF~PARC"        
## [1000] "SCF~PDGF.BB"      "SCF~PIGF"         "SCF~RANTES"      
## [1003] "SDF.1~CCL26"      "SDF.1~Ck.b8.1"    "SDF.1~CSF3"      
## [1006] "SDF.1~CX3CL1"     "SDF.1~FGF.4"      "SDF.1~FGF.6"     
## [1009] "SDF.1~FGF.7"      "SDF.1~FGF.9"      "SDF.1~GDNF"      
## [1012] "SDF.1~I.309"      "SDF.1~IFN.g"      "SDF.1~IGF.I"     
## [1015] "SDF.1~IGFBP.4"    "SDF.1~IL.12p70"   "SDF.1~IL.15"     
## [1018] "SDF.1~IL.1a"      "SDF.1~IL.1b"      "SDF.1~IL.3"      
## [1021] "SDF.1~IL.4"       "SDF.1~IL.7"       "SDF.1~IP.10"     
## [1024] "SDF.1~Leptin"     "SDF.1~LIF"        "SDF.1~MCP.1"     
## [1027] "SDF.1~MCP.3"      "SDF.1~MDC"        "SDF.1~MIG"       
## [1030] "SDF.1~MIP.1b"     "SDF.1~MIP.1d"     "SDF.1~MIP.3a"    
## [1033] "SDF.1~NT.3"       "SDF.1~NT.4"       "SDF.1~OPN"       
## [1036] "SDF.1~PARC"       "SDF.1~PIGF"       "SDF.1~SCF"       
## [1039] "TARC~BDNF"        "TARC~CCL24"       "TARC~CCL26"      
## [1042] "TARC~CSF2"        "TARC~EGF"         "TARC~ENA.78"     
## [1045] "TARC~FGF.9"       "TARC~GCP.2"       "TARC~GRO"        
## [1048] "TARC~GRO.a"       "TARC~IL.10"       "TARC~IL.13"      
## [1051] "TARC~IL.15"       "TARC~IL.2"        "TARC~IL.5"       
## [1054] "TARC~IL.6"        "TARC~MCP.2"       "TARC~MIP.1b"     
## [1057] "TARC~MIP.3a"      "TARC~NAP.2"       "TARC~NT.3"       
## [1060] "TARC~NT.4"        "TARC~PDGF.BB"     "TARC~RANTES"     
## [1063] "TARC~SCF"         "TGF.b1~CCL11"     "TGF.b1~CSF2"     
## [1066] "TGF.b1~CSF3"      "TGF.b1~EGF"       "TGF.b1~FGF.6"    
## [1069] "TGF.b1~GCP.2"     "TGF.b1~GRO.a"     "TGF.b1~I.309"    
## [1072] "TGF.b1~IFN.g"     "TGF.b1~IGFBP.4"   "TGF.b1~IL.10"    
## [1075] "TGF.b1~IL.13"     "TGF.b1~IL.15"     "TGF.b1~IL.1a"    
## [1078] "TGF.b1~IL.2"      "TGF.b1~IL.5"      "TGF.b1~IL.7"     
## [1081] "TGF.b1~IL.8"      "TGF.b1~Leptin"    "TGF.b1~LIF"      
## [1084] "TGF.b1~MCP.1"     "TGF.b1~MCP.3"     "TGF.b1~MCP.4"    
## [1087] "TGF.b1~MDC"       "TGF.b1~MIG"       "TGF.b1~MIP.1d"   
## [1090] "TGF.b1~NT.3"      "TGF.b1~OPN"       "TGF.b1~PARC"     
## [1093] "TGF.b1~PDGF.BB"   "TGF.b1~PIGF"      "TGF.b1~SDF.1"    
## [1096] "TGF.b1~TARC"      "TGF.b2~CCL24"     "TGF.b2~CCL26"    
## [1099] "TGF.b2~Ck.b8.1"   "TGF.b2~CSF1"      "TGF.b2~EGF"      
## [1102] "TGF.b2~FGF.4"     "TGF.b2~FGF.6"     "TGF.b2~FGF.7"    
## [1105] "TGF.b2~FGF.9"     "TGF.b2~GDNF"      "TGF.b2~GRO.a"    
## [1108] "TGF.b2~I.309"     "TGF.b2~IGF.I"     "TGF.b2~IGFBP.4"  
## [1111] "TGF.b2~IL.16"     "TGF.b2~IL.1a"     "TGF.b2~IL.1b"    
## [1114] "TGF.b2~IL.2"      "TGF.b2~IL.3"      "TGF.b2~IL.4"     
## [1117] "TGF.b2~IL.5"      "TGF.b2~IL.7"      "TGF.b2~LIF"      
## [1120] "TGF.b2~LIGHT"     "TGF.b2~MCP.3"     "TGF.b2~MDC"      
## [1123] "TGF.b2~MIG"       "TGF.b2~NT.3"      "TGF.b2~NT.4"     
## [1126] "TGF.b2~OSM"       "TGF.b2~PARC"      "TGF.b2~PIGF"     
## [1129] "TGF.b2~SCF"       "TGF.b2~SDF.1"     "TGF.b2~TGF.b1"   
## [1132] "TGF.b3~Ck.b8.1"   "TGF.b3~CSF1"      "TGF.b3~CX3CL1"   
## [1135] "TGF.b3~FGF.4"     "TGF.b3~FGF.6"     "TGF.b3~FGF.7"    
## [1138] "TGF.b3~FGF.9"     "TGF.b3~GDNF"      "TGF.b3~I.309"    
## [1141] "TGF.b3~IGF.I"     "TGF.b3~IGFBP.1"   "TGF.b3~IGFBP.2"  
## [1144] "TGF.b3~IGFBP.4"   "TGF.b3~IL.10"     "TGF.b3~IL.16"    
## [1147] "TGF.b3~IL.1a"     "TGF.b3~IL.3"      "TGF.b3~IL.4"     
## [1150] "TGF.b3~IL.5"      "TGF.b3~IL.7"      "TGF.b3~IL.8"     
## [1153] "TGF.b3~LIGHT"     "TGF.b3~MCP.3"     "TGF.b3~MCP.4"    
## [1156] "TGF.b3~MDC"       "TGF.b3~MIF"       "TGF.b3~MIG"      
## [1159] "TGF.b3~NT.3"      "TGF.b3~NT.4"      "TGF.b3~OPG"      
## [1162] "TGF.b3~OSM"       "TGF.b3~PARC"      "TGF.b3~SDF.1"    
## [1165] "TGF.b3~TGF.b2"    "THPO~BLC"         "THPO~CCL26"      
## [1168] "THPO~Ck.b8.1"     "THPO~CSF1"        "THPO~CX3CL1"     
## [1171] "THPO~ENA.78"      "THPO~FGF.4"       "THPO~FGF.6"      
## [1174] "THPO~FGF.7"       "THPO~FGF.9"       "THPO~GCP.2"      
## [1177] "THPO~GDNF"        "THPO~I.309"       "THPO~IGFBP.4"    
## [1180] "THPO~IL.10"       "THPO~IL.16"       "THPO~IL.1a"      
## [1183] "THPO~IL.1b"       "THPO~IL.2"        "THPO~IL.3"       
## [1186] "THPO~IL.4"        "THPO~IL.5"        "THPO~IL.7"       
## [1189] "THPO~LIF"         "THPO~MCP.1"       "THPO~MCP.3"      
## [1192] "THPO~MCP.4"       "THPO~MDC"         "THPO~MIG"        
## [1195] "THPO~MIP.1b"      "THPO~NT.4"        "THPO~OSM"        
## [1198] "THPO~PARC"        "THPO~PIGF"        "THPO~RANTES"     
## [1201] "THPO~SCF"         "THPO~SDF.1"       "THPO~TARC"       
## [1204] "THPO~TGF.b2"      "THPO~TGF.b3"      "TIMP.1~CCL11"    
## [1207] "TIMP.1~ENA.78"    "TIMP.1~GDNF"      "TIMP.1~GRO"      
## [1210] "TIMP.1~IGFBP.3"   "TIMP.1~IL.12p70"  "TIMP.1~IP.10"    
## [1213] "TIMP.1~MCP.2"     "TIMP.1~MCP.3"     "TIMP.1~MCP.4"    
## [1216] "TIMP.1~MIF"       "TIMP.1~NAP.2"     "TIMP.1~OSM"      
## [1219] "TIMP.1~PIGF"      "TIMP.1~RANTES"    "TIMP.1~TARC"     
## [1222] "TIMP.1~THPO"      "TIMP.2~ANG"       "TIMP.2~BDNF"     
## [1225] "TIMP.2~Ck.b8.1"   "TIMP.2~CSF1"      "TIMP.2~FGF.4"    
## [1228] "TIMP.2~FGF.6"     "TIMP.2~FGF.7"     "TIMP.2~GCP.2"    
## [1231] "TIMP.2~HGF"       "TIMP.2~I.309"     "TIMP.2~IFN.g"    
## [1234] "TIMP.2~IGFBP.1"   "TIMP.2~IGFBP.2"   "TIMP.2~IGFBP.3"  
## [1237] "TIMP.2~IL.10"     "TIMP.2~IL.13"     "TIMP.2~IL.16"    
## [1240] "TIMP.2~IL.1a"     "TIMP.2~IL.3"      "TIMP.2~IL.4"     
## [1243] "TIMP.2~IP.10"     "TIMP.2~MCP.1"     "TIMP.2~MCP.3"    
## [1246] "TIMP.2~MIF"       "TIMP.2~MIP.1d"    "TIMP.2~MIP.3a"   
## [1249] "TIMP.2~NT.4"      "TIMP.2~OPG"       "TIMP.2~PIGF"     
## [1252] "TIMP.2~SCF"       "TIMP.2~TGF.b3"    "TNF.a~CCL11"     
## [1255] "TNF.a~CSF2"       "TNF.a~CSF3"       "TNF.a~FGF.4"     
## [1258] "TNF.a~FGF.6"      "TNF.a~FGF.7"      "TNF.a~GCP.2"     
## [1261] "TNF.a~GRO"        "TNF.a~GRO.a"      "TNF.a~IFN.g"     
## [1264] "TNF.a~IGFBP.3"    "TNF.a~IL.10"      "TNF.a~IL.13"     
## [1267] "TNF.a~IL.15"      "TNF.a~IL.16"      "TNF.a~IL.1a"     
## [1270] "TNF.a~IL.1b"      "TNF.a~IL.2"       "TNF.a~IL.4"      
## [1273] "TNF.a~IL.5"       "TNF.a~IL.6"       "TNF.a~IL.7"      
## [1276] "TNF.a~IL.8"       "TNF.a~IP.10"      "TNF.a~Leptin"    
## [1279] "TNF.a~LIF"        "TNF.a~MCP.1"      "TNF.a~MCP.3"     
## [1282] "TNF.a~MDC"        "TNF.a~MIG"        "TNF.a~MIP.1b"    
## [1285] "TNF.a~NAP.2"      "TNF.a~NT.3"       "TNF.a~OPN"       
## [1288] "TNF.a~PARC"       "TNF.a~PDGF.BB"    "TNF.a~PIGF"      
## [1291] "TNF.a~SDF.1"      "TNF.a~TGF.b1"     "TNF.b~BDNF"      
## [1294] "TNF.b~BLC"        "TNF.b~CCL11"      "TNF.b~CCL26"     
## [1297] "TNF.b~CSF1"       "TNF.b~CSF2"       "TNF.b~CSF3"      
## [1300] "TNF.b~ENA.78"     "TNF.b~FGF.4"      "TNF.b~FGF.6"     
## [1303] "TNF.b~FGF.7"      "TNF.b~GCP.2"      "TNF.b~GDNF"      
## [1306] "TNF.b~GRO.a"      "TNF.b~I.309"      "TNF.b~IFN.g"     
## [1309] "TNF.b~IL.10"      "TNF.b~IL.13"      "TNF.b~IL.15"     
## [1312] "TNF.b~IL.1a"      "TNF.b~IL.2"       "TNF.b~IL.3"      
## [1315] "TNF.b~IL.4"       "TNF.b~IL.5"       "TNF.b~IL.7"      
## [1318] "TNF.b~IP.10"      "TNF.b~LIF"        "TNF.b~LIGHT"     
## [1321] "TNF.b~MCP.1"      "TNF.b~MCP.3"      "TNF.b~MDC"       
## [1324] "TNF.b~MIG"        "TNF.b~MIP.1b"     "TNF.b~NT.3"      
## [1327] "TNF.b~NT.4"       "TNF.b~OSM"        "TNF.b~PARC"      
## [1330] "TNF.b~PDGF.BB"    "TNF.b~PIGF"       "TNF.b~SCF"       
## [1333] "TNF.b~SDF.1"      "TNF.b~TARC"       "TNF.b~TGF.b1"    
## [1336] "TNF.b~TGF.b2"     "TNF.b~TNF.a"      "VEGF~BLC"        
## [1339] "VEGF~Ck.b8.1"     "VEGF~CSF2"        "VEGF~CX3CL1"     
## [1342] "VEGF~EGF"         "VEGF~FGF.4"       "VEGF~FGF.9"      
## [1345] "VEGF~GDNF"        "VEGF~I.309"       "VEGF~IGF.I"      
## [1348] "VEGF~IGFBP.2"     "VEGF~IGFBP.4"     "VEGF~IL.1a"      
## [1351] "VEGF~IL.1b"       "VEGF~IL.2"        "VEGF~IL.3"       
## [1354] "VEGF~IL.4"        "VEGF~IL.5"        "VEGF~IL.6"       
## [1357] "VEGF~IL.7"        "VEGF~LIF"         "VEGF~MCP.2"      
## [1360] "VEGF~MIG"         "VEGF~MIP.1b"      "VEGF~MIP.3a"     
## [1363] "VEGF~NAP.2"       "VEGF~NT.3"        "VEGF~NT.4"       
## [1366] "VEGF~OPG"         "VEGF~PIGF"        "VEGF~SDF.1"      
## [1369] "VEGF~TARC"        "VEGF~TGF.b3"      "VEGF~THPO"       
## [1372] "VEGF~TNF.b"
## 计算9个组合的交集
zuheunique <- intersect(intersect(intersect(intersect(intersect(intersect(intersect(intersect(zuheFA,zuheFF),
                                          zuheFL),zuheHF),zuheMF),
                        zuheMA),zuheSA),zuheSF),zuheSL)

length(zuheunique)
## [1] 0
zuheunique
## character(0)
## 没有交集

# ## 将每个集合的情况整理为数据表
# zuhemt <- data.frame(matrix(nrow = length(zuheall),ncol = 10))
# colnames(zuhemt) <- c("RPname","Fatal_Allother","Fatal_First","Fatal_Last",
#                       "Healthy_First","Mild_Allother","Mild_First",
#                       "Severe_Allother","Severe_First","Severe_Last")
# zuhemt[,1] <- zuheall
# for (i in 1:length(zuheall)) {
#   zuhemt[i,2] <- zuheall[i] %in% zuheFA
#   zuhemt[i,3] <- zuheall[i] %in% zuheFF
#   zuhemt[i,4] <- zuheall[i] %in% zuheFL
#   zuhemt[i,5] <- zuheall[i] %in% zuheHF
#   zuhemt[i,6] <- zuheall[i] %in% zuheMA
#   zuhemt[i,7] <- zuheall[i] %in% zuheMF
#   zuhemt[i,8] <- zuheall[i] %in% zuheSA
#   zuhemt[i,9] <- zuheall[i] %in% zuheSF
#   zuhemt[i,10] <- zuheall[i] %in% zuheSL
# }
# ## 查看数据
# zuhemt
# 
# ## 将每个集合的情况整理为数据表,数据为0-1表示
# zuhemt01 <- data.frame(matrix(nrow = length(zuheall),ncol = 10))
# colnames(zuhemt01) <- c("RPname","Fatal_Allother","Fatal_First","Fatal_Last",
#                       "Healthy_First","Mild_Allother","Mild_First",
#                       "Severe_Allother","Severe_First","Severe_Last")
# zuhemt01[,1] <- zuheall
# for (i in 1:length(zuheall)) {
#   zuhemt01[i,2] <- ifelse(zuheall[i] %in% zuheFA,1,0)
#   zuhemt01[i,3] <- ifelse(zuheall[i] %in% zuheFF,1,0)
#   zuhemt01[i,4] <- ifelse(zuheall[i] %in% zuheFL,1,0)
#   zuhemt01[i,5] <- ifelse(zuheall[i] %in% zuheHF,1,0)
#   zuhemt01[i,6] <- ifelse(zuheall[i] %in% zuheMA,1,0)
#   zuhemt01[i,7] <- ifelse(zuheall[i] %in% zuheMF,1,0)
#   zuhemt01[i,8] <- ifelse(zuheall[i] %in% zuheSA,1,0)
#   zuhemt01[i,9] <- ifelse(zuheall[i] %in% zuheSF,1,0)
#   zuhemt01[i,10] <- ifelse(zuheall[i] %in% zuheSL,1,0)
# }
# ## 查看数据
# zuhemt01

# image(as.matrix(zuhemt01[,2:10]))


## 在显示集合交集的venn图中,因为集合过多会增加阅读的困难,
## 所以veen图也最多只能查看5个集合的交集情况。

## 因为该包最多能有效绘制5个集合的ween图
## 图形的颜色
# vcol <- c("red","blue","green","DeepPink","Gold")
# T<-venn.diagram(list(Fatal_Allother =zuheFA,
#                      Fatal_First=zuheFF,
#                      Fatal_Last = zuheFL,
#                      Healthy_First = zuheHF,
#                      Mild_Allother = zuheMA,
#                      Mild_First = zuheMF,
#                      Severe_Allother = zuheSA,
#                      Severe_First = zuheSF,
#                      Severe_Last = zuheSL),
#                 filename = NULL,col = vcol)
# grid.draw(T)

## 然后标注能不能改一下 标注需要改一下: Healthy-First改成Healthy,
## Severe_Allother改成Severe_Other,Fatal_Allother改成Fatal_Other,
## Mild_Allother改成Mild_Other

## 现在的三个图里要统一颜色。healthy绿,first红,other紫,last兰
## &前后加上空杠: Mild_&_Healthy, Severe_&_Healthy, Fatal_&_Healthy

vcol <- c("green","red","DeepPink","blue")

vcol <- c("red","blue","green","DeepPink","Gold")
T<-venn.diagram(list(Mild_Other = zuheMA,
                     Mild_First = zuheMF,
                     Severe_Other = zuheSA,
                     Severe_First = zuheSF,
                     Severe_Last = zuheSL),
                filename = NULL,lwd = 0.5,
                fill = vcol,alpha = 0.5,margin = 0.1)
grid.draw(T)

## 针对Fatal的veen图
vcol <- c("red","blue","green")
T<-venn.diagram(list(Fatal_Other =zuheFA,
                     Fatal_First=zuheFF,
                     Fatal_Last = zuheFL),
                filename = NULL,lwd = 0.5,
                fill = vcol,alpha = 0.5,margin = 0.1)
grid.draw(T)

## 针对Mild的veen图
vcol <- c("red","blue")
T<-venn.diagram(list(Mild_Other = zuheMA,
                     Mild_First = zuheMF),
                filename = NULL,lwd = 0.5,
                fill = vcol,alpha = 0.5,margin = 0.1)
grid.draw(T)

## 针对Mild的veen图
vcol <- c("red","blue","green")
T<-venn.diagram(list(Severe_Other = zuheSA,
                     Severe_First = zuheSF,
                     Severe_Last = zuheSL),
                filename = NULL,lwd = 0.5,
                fill = vcol,alpha = 0.5,margin = 0.1)
grid.draw(T)

## 针对Fatal、Mild的veen图
vcol <- c("red","blue","green","DeepPink","Gold")
T<-venn.diagram(list(Fatal_Other =zuheFA,
                     Fatal_First=zuheFF,
                     Fatal_Last = zuheFL,
                     Mild_Other = zuheMA,
                     Mild_First = zuheMF),
                filename = NULL,lwd = 0.5,
                fill = vcol,alpha = 0.5,margin = 0.1)
grid.draw(T)

## 针对Severe、Mild的veen图
vcol <- c("red","blue","green","DeepPink","Gold")
T<-venn.diagram(list(Severe_Other = zuheSA,
                     Severe_First = zuheSF,
                     Severe_Last = zuheSL,
                     Mild_other = zuheMA,
                     Mild_First = zuheMF),
                filename = NULL,lwd = 0.5,
                fill = vcol,alpha = 0.5,margin = 0.1)
grid.draw(T)

## 针对Severe、Healthy的veen图
vcol <- c("red","blue","green","DeepPink")
T<-venn.diagram(list(Severe_Other = zuheSA,
                     Severe_First = zuheSF,
                     Severe_Last = zuheSL,
                     Healthy = zuheHF),
                filename = NULL,lwd = 0.5,
                fill = vcol,alpha = 0.5,margin = 0.1)
grid.draw(T)

## 针对Fatal、Healthy的veen图
vcol <- c("red","blue","green","DeepPink")
T<-venn.diagram(list(Fatal_Other =zuheFA,
                     Fatal_First=zuheFF,
                     Fatal_Last = zuheFL,
                     Healthy = zuheHF),
                filename = NULL,lwd = 0.5,
                fill = vcol,alpha = 0.5,margin = 0.1)
grid.draw(T)

## 针对Mild、Healthy的veen图
vcol <- c("red","blue","green")
T<-venn.diagram(list(Mild_Other = zuheMA,
                     Mild_First = zuheMF,
                     Healthy = zuheHF),
                filename = NULL,lwd = 0.5,
                fill = vcol,alpha = 0.5)
grid.draw(T)

## 那就先(1)healthy, mild-first, severe-first, fatal-first, fatal-last做一组。
## (2)healthy, mild-other, severe-other, fatal-other, fatal-last做一组。
## (3)healthy, mild-first, severe-last, fatal-first, fatal-last做一组。
## (4)healthy, mild-first, mild-other, fatal-first, fatal-last做一组。
## (5)healthy, severe-first, severe-other, severe-last, fatal-last做一组。
## (6)healthy, mild-first, fatal-first, fatal-other, fatal-last做一组。
## 那就先(1)healthy, mild-first, severe-first, fatal-first, fatal-last做一组。
## 计算5个组合的并集
sort(union(union(union(union(zuheFF,zuheFL),zuheHF),zuheMF),zuheSF))
##   [1] "Ck.b8.1~CCL26"    "CSF2~CCL11"       "CSF2~Ck.b8.1"    
##   [4] "CSF3~BLC"         "CSF3~CCL11"       "CSF3~CSF2"       
##   [7] "CX3CL1~CCL26"     "CX3CL1~Ck.b8.1"   "EGF~BDNF"        
##  [10] "EGF~CCL24"        "ENA.78~BDNF"      "ENA.78~CCL11"    
##  [13] "ENA.78~EGF"       "FGF.4~Ck.b8.1"    "FGF.4~CSF1"      
##  [16] "FGF.6~BLC"        "FGF.6~Ck.b8.1"    "FGF.6~CSF1"      
##  [19] "FGF.6~CSF2"       "FGF.6~CSF3"       "FGF.6~CX3CL1"    
##  [22] "FGF.7~BLC"        "FGF.7~Ck.b8.1"    "FGF.7~CSF1"      
##  [25] "FGF.7~CSF2"       "FGF.7~CSF3"       "FGF.7~FGF.4"     
##  [28] "FGF.7~FGF.6"      "FGF.9~CCL26"      "FGF.9~CX3CL1"    
##  [31] "FGF.9~EGF"        "FGF.9~FGF.6"      "FGF.9~FGF.7"     
##  [34] "Flt.3.LG~FGF.9"   "GCP.2~CCL11"      "GCP.2~CSF2"      
##  [37] "GCP.2~CSF3"       "GDNF~CCL24"       "GDNF~CCL26"      
##  [40] "GDNF~CSF1"        "GDNF~CX3CL1"      "GDNF~FGF.4"      
##  [43] "GDNF~FGF.6"       "GDNF~FGF.7"       "GDNF~Flt.3.LG"   
##  [46] "GRO.a~ANG"        "GRO.a~BDNF"       "GRO.a~BLC"       
##  [49] "GRO.a~CCL24"      "GRO.a~CSF2"       "GRO.a~CSF3"      
##  [52] "GRO.a~EGF"        "GRO.a~FGF.6"      "GRO.a~FGF.7"     
##  [55] "GRO~ANG"          "GRO~BDNF"         "GRO~BLC"         
##  [58] "GRO~EGF"          "GRO~FGF.7"        "HGF~Ck.b8.1"     
##  [61] "HGF~FGF.4"        "HGF~FGF.7"        "HGF~GCP.2"       
##  [64] "I.309~CCL26"      "I.309~Ck.b8.1"    "I.309~CSF1"      
##  [67] "I.309~CSF3"       "I.309~FGF.4"      "I.309~FGF.6"     
##  [70] "I.309~FGF.7"      "I.309~FGF.9"      "I.309~GDNF"      
##  [73] "I.309~HGF"        "IFN.g~ANG"        "IFN.g~CCL11"     
##  [76] "IFN.g~CSF2"       "IFN.g~CSF3"       "IFN.g~FGF.7"     
##  [79] "IFN.g~GCP.2"      "IFN.g~GRO.a"      "IFN.g~I.309"     
##  [82] "IGF.I~BLC"        "IGF.I~Ck.b8.1"    "IGF.I~CSF1"      
##  [85] "IGF.I~FGF.7"      "IGF.I~GDNF"       "IGF.I~I.309"     
##  [88] "IGFBP.1~BDNF"     "IGFBP.1~CCL26"    "IGFBP.1~CSF1"    
##  [91] "IGFBP.1~CX3CL1"   "IGFBP.1~FGF.7"    "IGFBP.1~Flt.3.LG"
##  [94] "IGFBP.2~ANG"      "IGFBP.2~CCL26"    "IGFBP.2~FGF.7"   
##  [97] "IGFBP.2~GRO"      "IGFBP.2~I.309"    "IGFBP.2~IGFBP.1" 
## [100] "IGFBP.3~FGF.4"    "IGFBP.3~FGF.7"    "IGFBP.3~GCP.2"   
## [103] "IGFBP.3~HGF"      "IGFBP.3~I.309"    "IGFBP.3~IGFBP.1" 
## [106] "IGFBP.4~Ck.b8.1"  "IGFBP.4~CSF1"     "IGFBP.4~FGF.4"   
## [109] "IGFBP.4~Flt.3.LG" "IGFBP.4~GDNF"     "IGFBP.4~I.309"   
## [112] "IGFBP.4~IGF.I"    "IGFBP.4~IGFBP.3"  "IL.10~CSF2"      
## [115] "IL.10~CSF3"       "IL.10~FGF.6"      "IL.10~GRO.a"     
## [118] "IL.10~I.309"      "IL.10~IFN.g"      "IL.12p70~ANG"    
## [121] "IL.12p70~CCL26"   "IL.12p70~CSF3"    "IL.12p70~GRO.a"  
## [124] "IL.12p70~IGFBP.3" "IL.13~CCL11"      "IL.13~CSF2"      
## [127] "IL.13~CSF3"       "IL.13~FGF.6"      "IL.13~FGF.7"     
## [130] "IL.13~GCP.2"      "IL.13~GRO.a"      "IL.13~I.309"     
## [133] "IL.13~IFN.g"      "IL.13~IGF.I"      "IL.13~IL.10"     
## [136] "IL.15~ANG"        "IL.15~CCL11"      "IL.15~CCL26"     
## [139] "IL.15~CSF2"       "IL.15~CSF3"       "IL.15~FGF.6"     
## [142] "IL.15~FGF.7"      "IL.15~GCP.2"      "IL.15~GDNF"      
## [145] "IL.15~GRO.a"      "IL.15~IFN.g"      "IL.15~IL.10"     
## [148] "IL.15~IL.12p70"   "IL.15~IL.13"      "IL.16~Ck.b8.1"   
## [151] "IL.16~FGF.4"      "IL.16~FGF.6"      "IL.16~FGF.7"     
## [154] "IL.16~GRO"        "IL.16~I.309"      "IL.16~IL.10"     
## [157] "IL.1a~BDNF"       "IL.1a~CCL11"      "IL.1a~Ck.b8.1"   
## [160] "IL.1a~CSF1"       "IL.1a~CSF2"       "IL.1a~CSF3"      
## [163] "IL.1a~FGF.4"      "IL.1a~FGF.6"      "IL.1a~FGF.7"     
## [166] "IL.1a~GCP.2"      "IL.1a~GDNF"       "IL.1a~GRO.a"     
## [169] "IL.1a~I.309"      "IL.1a~IFN.g"      "IL.1a~IGF.I"     
## [172] "IL.1a~IGFBP.4"    "IL.1a~IL.10"      "IL.1a~IL.13"     
## [175] "IL.1a~IL.15"      "IL.1b~Ck.b8.1"    "IL.1b~FGF.9"     
## [178] "IL.1b~I.309"      "IL.1b~IGF.I"      "IL.1b~IGFBP.4"   
## [181] "IL.1b~IL.16"      "IL.1b~IL.1a"      "IL.2~ANG"        
## [184] "IL.2~BDNF"        "IL.2~CCL11"       "IL.2~CSF2"       
## [187] "IL.2~CSF3"        "IL.2~EGF"         "IL.2~ENA.78"     
## [190] "IL.2~FGF.6"       "IL.2~FGF.7"       "IL.2~GCP.2"      
## [193] "IL.2~GDNF"        "IL.2~GRO"         "IL.2~GRO.a"      
## [196] "IL.2~I.309"       "IL.2~IFN.g"       "IL.2~IGF.I"      
## [199] "IL.2~IL.10"       "IL.2~IL.13"       "IL.2~IL.15"      
## [202] "IL.2~IL.1a"       "IL.2~IL.1b"       "IL.3~ANG"        
## [205] "IL.3~CCL26"       "IL.3~CSF1"        "IL.3~FGF.4"      
## [208] "IL.3~FGF.6"       "IL.3~FGF.7"       "IL.3~FGF.9"      
## [211] "IL.3~GDNF"        "IL.3~I.309"       "IL.3~IFN.g"      
## [214] "IL.3~IGF.I"       "IL.3~IGFBP.2"     "IL.3~IGFBP.4"    
## [217] "IL.3~IL.10"       "IL.3~IL.13"       "IL.3~IL.15"      
## [220] "IL.3~IL.1a"       "IL.3~IL.1b"       "IL.4~ANG"        
## [223] "IL.4~CCL26"       "IL.4~CSF1"        "IL.4~FGF.6"      
## [226] "IL.4~FGF.7"       "IL.4~GCP.2"       "IL.4~GDNF"       
## [229] "IL.4~IFN.g"       "IL.4~IGF.I"       "IL.4~IGFBP.2"    
## [232] "IL.4~IGFBP.3"     "IL.4~IGFBP.4"     "IL.4~IL.12p70"   
## [235] "IL.4~IL.13"       "IL.4~IL.1a"       "IL.4~IL.1b"      
## [238] "IL.4~IL.2"        "IL.4~IL.3"        "IL.5~CCL11"      
## [241] "IL.5~Ck.b8.1"     "IL.5~CSF1"        "IL.5~CSF2"       
## [244] "IL.5~CSF3"        "IL.5~FGF.4"       "IL.5~FGF.6"      
## [247] "IL.5~FGF.7"       "IL.5~GCP.2"       "IL.5~GDNF"       
## [250] "IL.5~HGF"         "IL.5~IFN.g"       "IL.5~IGF.I"      
## [253] "IL.5~IGFBP.3"     "IL.5~IL.10"       "IL.5~IL.13"      
## [256] "IL.5~IL.15"       "IL.5~IL.1a"       "IL.5~IL.2"       
## [259] "IL.5~IL.3"        "IL.5~IL.4"        "IL.6~BDNF"       
## [262] "IL.6~CSF3"        "IL.6~Flt.3.LG"    "IL.6~GRO.a"      
## [265] "IL.6~IGFBP.4"     "IL.6~IL.1a"       "IL.6~IL.4"       
## [268] "IL.6~IL.5"        "IL.7~CCL11"       "IL.7~Ck.b8.1"    
## [271] "IL.7~CSF2"        "IL.7~CSF3"        "IL.7~GCP.2"      
## [274] "IL.7~IFN.g"       "IL.7~IGFBP.4"     "IL.7~IL.10"      
## [277] "IL.7~IL.13"       "IL.7~IL.15"       "IL.7~IL.1a"      
## [280] "IL.7~IL.1b"       "IL.7~IL.2"        "IL.7~IL.5"       
## [283] "IL.7~IL.6"        "IL.8~CSF3"        "IL.8~FGF.7"      
## [286] "IL.8~Flt.3.LG"    "IL.8~GCP.2"       "IL.8~I.309"      
## [289] "IL.8~IGFBP.3"     "IL.8~IGFBP.4"     "IL.8~IL.1b"      
## [292] "IL.8~IL.2"        "IL.8~IL.4"        "IL.8~IL.5"       
## [295] "IL.8~IL.6"        "IP.10~ANG"        "IP.10~CSF1"      
## [298] "IP.10~EGF"        "IP.10~IGFBP.1"    "IP.10~IGFBP.3"   
## [301] "IP.10~IL.12p70"   "Leptin~CCL26"     "Leptin~GDNF"     
## [304] "Leptin~GRO"       "Leptin~IGFBP.1"   "Leptin~IGFBP.2"  
## [307] "Leptin~IL.12p70"  "Leptin~IL.4"      "LIF~BDNF"        
## [310] "LIF~Ck.b8.1"      "LIF~CX3CL1"       "LIF~EGF"         
## [313] "LIF~FGF.6"        "LIF~FGF.9"        "LIF~I.309"       
## [316] "LIF~IGFBP.4"      "LIF~IL.16"        "LIF~IL.1b"       
## [319] "LIGHT~BLC"        "LIGHT~Ck.b8.1"    "LIGHT~CSF2"      
## [322] "LIGHT~CX3CL1"     "LIGHT~FGF.6"      "LIGHT~FGF.7"     
## [325] "LIGHT~FGF.9"      "LIGHT~GDNF"       "LIGHT~GRO.a"     
## [328] "LIGHT~I.309"      "LIGHT~IGF.I"      "LIGHT~IL.10"     
## [331] "LIGHT~IL.16"      "LIGHT~IL.1a"      "LIGHT~IL.1b"     
## [334] "LIGHT~IL.5"       "MCP.1~ANG"        "MCP.1~BDNF"      
## [337] "MCP.1~CSF2"       "MCP.1~CSF3"       "MCP.1~FGF.7"     
## [340] "MCP.1~GCP.2"      "MCP.1~GRO.a"      "MCP.1~IFN.g"     
## [343] "MCP.1~IL.10"      "MCP.1~IL.13"      "MCP.1~IL.16"     
## [346] "MCP.1~IL.2"       "MCP.1~IL.3"       "MCP.1~IL.4"      
## [349] "MCP.1~IL.5"       "MCP.1~IL.6"       "MCP.1~IL.7"      
## [352] "MCP.1~IL.8"       "MCP.2~ANG"        "MCP.2~CSF2"      
## [355] "MCP.2~EGF"        "MCP.2~FGF.7"      "MCP.2~Flt.3.LG"  
## [358] "MCP.2~GDNF"       "MCP.2~GRO.a"      "MCP.2~HGF"       
## [361] "MCP.2~IFN.g"      "MCP.2~IL.4"       "MCP.3~BDNF"      
## [364] "MCP.3~BLC"        "MCP.3~Ck.b8.1"    "MCP.3~CSF1"      
## [367] "MCP.3~CSF3"       "MCP.3~CX3CL1"     "MCP.3~EGF"       
## [370] "MCP.3~FGF.6"      "MCP.3~FGF.7"      "MCP.3~FGF.9"     
## [373] "MCP.3~GCP.2"      "MCP.3~HGF"        "MCP.3~I.309"     
## [376] "MCP.3~IGFBP.1"    "MCP.3~IGFBP.3"    "MCP.3~IL.16"     
## [379] "MCP.3~IL.1a"      "MCP.3~IL.2"       "MCP.3~IL.3"      
## [382] "MCP.3~IL.8"       "MCP.3~IP.10"      "MCP.3~LIF"       
## [385] "MCP.4~BDNF"       "MCP.4~CCL26"      "MCP.4~Ck.b8.1"   
## [388] "MCP.4~CX3CL1"     "MCP.4~FGF.7"      "MCP.4~HGF"       
## [391] "MCP.4~I.309"      "MCP.4~IL.10"      "MCP.4~IL.12p70"  
## [394] "MCP.4~LIGHT"      "MCP.4~MCP.2"      "MCP.4~MCP.3"     
## [397] "MDC~BLC"          "MDC~CCL26"        "MDC~Ck.b8.1"     
## [400] "MDC~CSF1"         "MDC~CSF2"         "MDC~CSF3"        
## [403] "MDC~CX3CL1"       "MDC~FGF.6"        "MDC~FGF.7"       
## [406] "MDC~FGF.9"        "MDC~GRO"          "MDC~GRO.a"       
## [409] "MDC~I.309"        "MDC~IGF.I"        "MDC~IL.16"       
## [412] "MDC~IL.1b"        "MDC~LIF"          "MDC~LIGHT"       
## [415] "MDC~MCP.2"        "MDC~MCP.3"        "MDC~MCP.4"       
## [418] "MIF~BLC"          "MIF~FGF.7"        "MIF~HGF"         
## [421] "MIF~IGFBP.2"      "MIF~IL.16"        "MIF~IL.1b"       
## [424] "MIF~LIGHT"        "MIG~CCL11"        "MIG~CCL24"       
## [427] "MIG~CCL26"        "MIG~CSF1"         "MIG~CSF2"        
## [430] "MIG~CSF3"         "MIG~FGF.6"        "MIG~FGF.7"       
## [433] "MIG~FGF.9"        "MIG~GCP.2"        "MIG~GDNF"        
## [436] "MIG~GRO.a"        "MIG~I.309"        "MIG~IFN.g"       
## [439] "MIG~IGF.I"        "MIG~IGFBP.4"      "MIG~IL.10"       
## [442] "MIG~IL.13"        "MIG~IL.15"        "MIG~IL.1a"       
## [445] "MIG~IL.1b"        "MIG~IL.2"         "MIG~IL.3"        
## [448] "MIG~IL.4"         "MIG~IL.5"         "MIG~IL.7"        
## [451] "MIG~MCP.1"        "MIG~MCP.3"        "MIP.1b~BDNF"     
## [454] "MIP.1b~CX3CL1"    "MIP.1b~EGF"       "MIP.1b~FGF.9"    
## [457] "MIP.1b~GCP.2"     "MIP.1b~GDNF"      "MIP.1b~HGF"      
## [460] "MIP.1b~IGFBP.1"   "MIP.1b~IGFBP.3"   "MIP.1b~IGFBP.4"  
## [463] "MIP.1b~IL.4"      "MIP.1b~LIF"       "MIP.1b~LIGHT"    
## [466] "MIP.1b~MCP.3"     "MIP.1d~CCL26"     "MIP.1d~FGF.6"    
## [469] "MIP.1d~I.309"     "MIP.1d~IGF.I"     "MIP.1d~IL.10"    
## [472] "MIP.1d~IL.16"     "MIP.1d~IP.10"     "MIP.1d~LIF"      
## [475] "MIP.1d~LIGHT"     "MIP.1d~MCP.4"     "MIP.1d~MDC"      
## [478] "MIP.3a~BDNF"      "MIP.3a~Ck.b8.1"   "MIP.3a~EGF"      
## [481] "MIP.3a~ENA.78"    "MIP.3a~FGF.4"     "MIP.3a~FGF.7"    
## [484] "MIP.3a~Flt.3.LG"  "MIP.3a~GCP.2"     "MIP.3a~HGF"      
## [487] "MIP.3a~I.309"     "MIP.3a~IGFBP.3"   "MIP.3a~IGFBP.4"  
## [490] "MIP.3a~IL.2"      "MIP.3a~IL.6"      "MIP.3a~IL.8"     
## [493] "MIP.3a~MCP.3"     "MIP.3a~MIF"       "MIP.3a~MIP.1b"   
## [496] "NAP.2~CCL24"      "NAP.2~FGF.7"      "NAP.2~Flt.3.LG"  
## [499] "NAP.2~GCP.2"      "NAP.2~GRO"        "NAP.2~IGFBP.1"   
## [502] "NAP.2~IL.16"      "NAP.2~IL.1a"      "NAP.2~IL.4"      
## [505] "NAP.2~IL.5"       "NAP.2~IL.6"       "NAP.2~MCP.1"     
## [508] "NAP.2~MCP.2"      "NAP.2~MIG"        "NT.3~CCL24"      
## [511] "NT.3~CSF2"        "NT.3~CSF3"        "NT.3~FGF.6"      
## [514] "NT.3~GCP.2"       "NT.3~GRO.a"       "NT.3~I.309"      
## [517] "NT.3~IFN.g"       "NT.3~IGFBP.4"     "NT.3~IL.10"      
## [520] "NT.3~IL.13"       "NT.3~IL.15"       "NT.3~IL.1a"      
## [523] "NT.3~IL.1b"       "NT.3~IL.2"        "NT.3~IL.4"       
## [526] "NT.3~IL.5"        "NT.3~IL.7"        "NT.3~LIF"        
## [529] "NT.3~MCP.1"       "NT.3~MIG"         "NT.4~BDNF"       
## [532] "NT.4~CCL26"       "NT.4~Ck.b8.1"     "NT.4~CSF1"       
## [535] "NT.4~CSF2"        "NT.4~EGF"         "NT.4~ENA.78"     
## [538] "NT.4~FGF.4"       "NT.4~FGF.6"       "NT.4~FGF.7"      
## [541] "NT.4~FGF.9"       "NT.4~GDNF"        "NT.4~GRO.a"      
## [544] "NT.4~I.309"       "NT.4~IGF.I"       "NT.4~IGFBP.4"    
## [547] "NT.4~IL.16"       "NT.4~IL.1a"       "NT.4~IL.1b"      
## [550] "NT.4~IL.3"        "NT.4~IL.4"        "NT.4~IL.5"       
## [553] "NT.4~IL.6"        "NT.4~LIGHT"       "NT.4~MDC"        
## [556] "NT.4~MIF"         "NT.4~MIG"         "NT.4~MIP.1d"     
## [559] "OPG~FGF.4"        "OPG~FGF.7"        "OPG~GCP.2"       
## [562] "OPG~HGF"          "OPG~I.309"        "OPG~IGFBP.1"     
## [565] "OPG~IGFBP.3"      "OPG~IL.10"        "OPG~IL.7"        
## [568] "OPG~IP.10"        "OPG~MCP.2"        "OPG~MCP.3"       
## [571] "OPG~MCP.4"        "OPG~MIP.1b"       "OPG~MIP.3a"      
## [574] "OPN~CCL11"        "OPN~FGF.6"        "OPN~IGFBP.2"     
## [577] "OPN~IL.1a"        "OPN~IL.6"         "OPN~MCP.3"       
## [580] "OPN~MIP.1d"       "OSM~CCL26"        "OSM~Ck.b8.1"     
## [583] "OSM~CX3CL1"       "OSM~FGF.6"        "OSM~FGF.9"       
## [586] "OSM~I.309"        "OSM~IFN.g"        "OSM~IGF.I"       
## [589] "OSM~IGFBP.4"      "OSM~IL.12p70"     "OSM~IL.15"       
## [592] "OSM~IL.16"        "OSM~IL.1a"        "OSM~IL.1b"       
## [595] "OSM~LIF"          "OSM~LIGHT"        "OSM~MCP.3"       
## [598] "OSM~MDC"          "OSM~MIG"          "OSM~NT.3"        
## [601] "OSM~NT.4"         "PARC~CCL26"       "PARC~Ck.b8.1"    
## [604] "PARC~CSF2"        "PARC~FGF.4"       "PARC~FGF.6"      
## [607] "PARC~GCP.2"       "PARC~GDNF"        "PARC~GRO"        
## [610] "PARC~GRO.a"       "PARC~I.309"       "PARC~IFN.g"      
## [613] "PARC~IGF.I"       "PARC~IGFBP.1"     "PARC~IGFBP.2"    
## [616] "PARC~IL.15"       "PARC~IL.1a"       "PARC~IL.1b"      
## [619] "PARC~IL.2"        "PARC~IL.3"        "PARC~IL.4"       
## [622] "PARC~IL.5"        "PARC~IL.6"        "PARC~IL.7"       
## [625] "PARC~Leptin"      "PARC~MCP.1"       "PARC~MIG"        
## [628] "PARC~OSM"         "PDGF.BB~BDNF"     "PDGF.BB~CSF2"    
## [631] "PDGF.BB~EGF"      "PDGF.BB~ENA.78"   "PDGF.BB~GCP.2"   
## [634] "PDGF.BB~GRO"      "PDGF.BB~IL.13"    "PDGF.BB~IL.15"   
## [637] "PDGF.BB~IL.2"     "PDGF.BB~IL.7"     "PDGF.BB~MIP.3a"  
## [640] "PDGF.BB~NAP.2"    "PDGF.BB~NT.3"     "PDGF.BB~NT.4"    
## [643] "PDGF.BB~OSM"      "PIGF~CCL26"       "PIGF~Ck.b8.1"    
## [646] "PIGF~CSF2"        "PIGF~CSF3"        "PIGF~CX3CL1"     
## [649] "PIGF~FGF.4"       "PIGF~FGF.9"       "PIGF~GCP.2"      
## [652] "PIGF~GDNF"        "PIGF~IFN.g"       "PIGF~IL.3"       
## [655] "PIGF~IL.5"        "PIGF~LIF"         "PIGF~LIGHT"      
## [658] "PIGF~MDC"         "PIGF~MIG"         "PIGF~PARC"       
## [661] "RANTES~CCL24"     "RANTES~CCL26"     "RANTES~EGF"      
## [664] "RANTES~ENA.78"    "RANTES~FGF.7"     "RANTES~GDNF"     
## [667] "RANTES~HGF"       "RANTES~I.309"     "RANTES~IGFBP.2"  
## [670] "RANTES~IL.16"     "RANTES~IL.2"      "RANTES~IP.10"    
## [673] "RANTES~MIF"       "RANTES~MIG"       "RANTES~MIP.3a"   
## [676] "RANTES~NAP.2"     "RANTES~PDGF.BB"   "SCF~ANG"         
## [679] "SCF~CCL24"        "SCF~CCL26"        "SCF~Ck.b8.1"     
## [682] "SCF~CSF1"         "SCF~EGF"          "SCF~ENA.78"      
## [685] "SCF~FGF.4"        "SCF~FGF.7"        "SCF~GDNF"        
## [688] "SCF~GRO"          "SCF~HGF"          "SCF~I.309"       
## [691] "SCF~IGFBP.2"      "SCF~IGFBP.3"      "SCF~IGFBP.4"     
## [694] "SCF~IL.15"        "SCF~IL.2"         "SCF~MCP.3"       
## [697] "SCF~MIP.1b"       "SCF~MIP.3a"       "SCF~OPG"         
## [700] "SCF~PARC"         "SCF~PDGF.BB"      "SCF~RANTES"      
## [703] "SDF.1~CCL26"      "SDF.1~Ck.b8.1"    "SDF.1~CSF3"      
## [706] "SDF.1~FGF.4"      "SDF.1~FGF.9"      "SDF.1~GDNF"      
## [709] "SDF.1~I.309"      "SDF.1~IGF.I"      "SDF.1~IGFBP.4"   
## [712] "SDF.1~IL.12p70"   "SDF.1~IL.15"      "SDF.1~IL.1a"     
## [715] "SDF.1~IL.1b"      "SDF.1~IL.3"       "SDF.1~IL.4"      
## [718] "SDF.1~IL.7"       "SDF.1~Leptin"     "SDF.1~MIG"       
## [721] "SDF.1~MIP.1d"     "SDF.1~NT.3"       "SDF.1~NT.4"      
## [724] "SDF.1~PARC"       "SDF.1~PIGF"       "TARC~BDNF"       
## [727] "TARC~CCL26"       "TARC~EGF"         "TARC~ENA.78"     
## [730] "TARC~GCP.2"       "TARC~GRO"         "TARC~IL.13"      
## [733] "TARC~IL.2"        "TARC~MIP.1b"      "TARC~MIP.3a"     
## [736] "TARC~NT.3"        "TARC~NT.4"        "TARC~PDGF.BB"    
## [739] "TARC~RANTES"      "TGF.b1~CCL11"     "TGF.b1~CSF2"     
## [742] "TGF.b1~CSF3"      "TGF.b1~FGF.6"     "TGF.b1~GCP.2"    
## [745] "TGF.b1~GRO.a"     "TGF.b1~I.309"     "TGF.b1~IFN.g"    
## [748] "TGF.b1~IL.10"     "TGF.b1~IL.13"     "TGF.b1~IL.15"    
## [751] "TGF.b1~IL.1a"     "TGF.b1~IL.2"      "TGF.b1~IL.5"     
## [754] "TGF.b1~IL.7"      "TGF.b1~IL.8"      "TGF.b1~MCP.1"    
## [757] "TGF.b1~MCP.3"     "TGF.b1~MCP.4"     "TGF.b1~MIG"      
## [760] "TGF.b1~NT.3"      "TGF.b1~PARC"      "TGF.b1~PDGF.BB"  
## [763] "TGF.b1~PIGF"      "TGF.b1~SDF.1"     "TGF.b2~CCL24"    
## [766] "TGF.b2~Ck.b8.1"   "TGF.b2~CSF1"      "TGF.b2~EGF"      
## [769] "TGF.b2~FGF.4"     "TGF.b2~FGF.9"     "TGF.b2~GDNF"     
## [772] "TGF.b2~GRO.a"     "TGF.b2~I.309"     "TGF.b2~IGF.I"    
## [775] "TGF.b2~IGFBP.4"   "TGF.b2~IL.16"     "TGF.b2~IL.1a"    
## [778] "TGF.b2~IL.2"      "TGF.b2~IL.5"      "TGF.b2~IL.7"     
## [781] "TGF.b2~LIF"       "TGF.b2~LIGHT"     "TGF.b2~MCP.3"    
## [784] "TGF.b2~MDC"       "TGF.b2~MIG"       "TGF.b2~NT.3"     
## [787] "TGF.b2~NT.4"      "TGF.b2~OSM"       "TGF.b2~PARC"     
## [790] "TGF.b2~PIGF"      "TGF.b2~SDF.1"     "TGF.b2~TGF.b1"   
## [793] "TGF.b3~Ck.b8.1"   "TGF.b3~CSF1"      "TGF.b3~CX3CL1"   
## [796] "TGF.b3~FGF.4"     "TGF.b3~FGF.6"     "TGF.b3~FGF.7"    
## [799] "TGF.b3~FGF.9"     "TGF.b3~GDNF"      "TGF.b3~I.309"    
## [802] "TGF.b3~IGF.I"     "TGF.b3~IGFBP.1"   "TGF.b3~IGFBP.4"  
## [805] "TGF.b3~IL.10"     "TGF.b3~IL.16"     "TGF.b3~IL.1a"    
## [808] "TGF.b3~IL.3"      "TGF.b3~IL.4"      "TGF.b3~IL.5"     
## [811] "TGF.b3~IL.7"      "TGF.b3~LIGHT"     "TGF.b3~MCP.3"    
## [814] "TGF.b3~MDC"       "TGF.b3~MIG"       "TGF.b3~NT.3"     
## [817] "TGF.b3~NT.4"      "TGF.b3~OPG"       "TGF.b3~OSM"      
## [820] "TGF.b3~PARC"      "TGF.b3~SDF.1"     "TGF.b3~TGF.b2"   
## [823] "THPO~CCL26"       "THPO~Ck.b8.1"     "THPO~CSF1"       
## [826] "THPO~CX3CL1"      "THPO~ENA.78"      "THPO~FGF.6"      
## [829] "THPO~FGF.9"       "THPO~GDNF"        "THPO~I.309"      
## [832] "THPO~IGFBP.4"     "THPO~IL.16"       "THPO~IL.1a"      
## [835] "THPO~IL.1b"       "THPO~IL.2"        "THPO~IL.3"       
## [838] "THPO~IL.4"        "THPO~IL.5"        "THPO~IL.7"       
## [841] "THPO~LIF"         "THPO~MCP.3"       "THPO~MDC"        
## [844] "THPO~MIG"         "THPO~MIP.1b"      "THPO~NT.4"       
## [847] "THPO~OSM"         "THPO~PARC"        "THPO~PIGF"       
## [850] "THPO~RANTES"      "THPO~SDF.1"       "THPO~TARC"       
## [853] "THPO~TGF.b2"      "THPO~TGF.b3"      "TIMP.1~ENA.78"   
## [856] "TIMP.1~IGFBP.3"   "TIMP.1~IL.12p70"  "TIMP.1~MCP.4"    
## [859] "TIMP.1~NAP.2"     "TIMP.1~OSM"       "TIMP.1~RANTES"   
## [862] "TIMP.1~TARC"      "TIMP.1~THPO"      "TIMP.2~ANG"      
## [865] "TIMP.2~BDNF"      "TIMP.2~CSF1"      "TIMP.2~FGF.4"    
## [868] "TIMP.2~FGF.7"     "TIMP.2~GCP.2"     "TIMP.2~HGF"      
## [871] "TIMP.2~I.309"     "TIMP.2~IFN.g"     "TIMP.2~IGFBP.3"  
## [874] "TIMP.2~IL.10"     "TIMP.2~IL.13"     "TIMP.2~IL.1a"    
## [877] "TIMP.2~IL.3"      "TIMP.2~IL.4"      "TIMP.2~IP.10"    
## [880] "TIMP.2~MCP.3"     "TIMP.2~MIP.1d"    "TIMP.2~MIP.3a"   
## [883] "TIMP.2~NT.4"      "TIMP.2~OPG"       "TIMP.2~PIGF"     
## [886] "TIMP.2~SCF"       "TNF.a~CCL11"      "TNF.a~CSF2"      
## [889] "TNF.a~CSF3"       "TNF.a~FGF.7"      "TNF.a~GCP.2"     
## [892] "TNF.a~GRO"        "TNF.a~GRO.a"      "TNF.a~IFN.g"     
## [895] "TNF.a~IGFBP.3"    "TNF.a~IL.10"      "TNF.a~IL.13"     
## [898] "TNF.a~IL.15"      "TNF.a~IL.16"      "TNF.a~IL.1a"     
## [901] "TNF.a~IL.1b"      "TNF.a~IL.2"       "TNF.a~IL.5"      
## [904] "TNF.a~IL.7"       "TNF.a~IL.8"       "TNF.a~MCP.1"     
## [907] "TNF.a~MCP.3"      "TNF.a~MIG"        "TNF.a~NAP.2"     
## [910] "TNF.a~NT.3"       "TNF.a~PARC"       "TNF.a~PDGF.BB"   
## [913] "TNF.a~PIGF"       "TNF.a~TGF.b1"     "TNF.b~BDNF"      
## [916] "TNF.b~BLC"        "TNF.b~CCL11"      "TNF.b~CSF2"      
## [919] "TNF.b~CSF3"       "TNF.b~ENA.78"     "TNF.b~FGF.6"     
## [922] "TNF.b~GCP.2"      "TNF.b~GRO.a"      "TNF.b~IFN.g"     
## [925] "TNF.b~IL.10"      "TNF.b~IL.13"      "TNF.b~IL.15"     
## [928] "TNF.b~IL.1a"      "TNF.b~IL.2"       "TNF.b~IL.5"      
## [931] "TNF.b~IL.7"       "TNF.b~MCP.1"      "TNF.b~MDC"       
## [934] "TNF.b~MIG"        "TNF.b~NT.3"       "TNF.b~NT.4"      
## [937] "TNF.b~PDGF.BB"    "TNF.b~PIGF"       "TNF.b~TARC"      
## [940] "TNF.b~TGF.b1"     "TNF.b~TNF.a"      "VEGF~Ck.b8.1"    
## [943] "VEGF~CSF2"        "VEGF~CX3CL1"      "VEGF~FGF.4"      
## [946] "VEGF~FGF.9"       "VEGF~GDNF"        "VEGF~I.309"      
## [949] "VEGF~IGF.I"       "VEGF~IGFBP.2"     "VEGF~IGFBP.4"    
## [952] "VEGF~IL.1a"       "VEGF~IL.1b"       "VEGF~IL.2"       
## [955] "VEGF~IL.3"        "VEGF~IL.4"        "VEGF~IL.5"       
## [958] "VEGF~IL.6"        "VEGF~IL.7"        "VEGF~LIF"        
## [961] "VEGF~MIG"         "VEGF~MIP.1b"      "VEGF~NAP.2"      
## [964] "VEGF~NT.3"        "VEGF~NT.4"        "VEGF~OPG"        
## [967] "VEGF~PIGF"        "VEGF~SDF.1"       "VEGF~TARC"       
## [970] "VEGF~TGF.b3"      "VEGF~THPO"
## 计算5个组合的交集
sort(intersect(intersect(intersect(intersect(zuheFA,zuheFL),zuheHF),zuheMF),zuheSF))
## character(0)
vcol <- c("red","blue","green","DeepPink","Gold")
T<-venn.diagram(list(Fatal_First=zuheFF,
                     Fatal_Last = zuheFL,
                     Healthy = zuheHF,
                     Mild_First = zuheMF,
                     Severe_First = zuheSF),
                filename = NULL,lwd = 0.5,
                fill = vcol,alpha = 0.5,margin = 0.1)
grid.draw(T)

## (2)healthy, mild-other, severe-other, fatal-other, fatal-last做一组。
## 计算5个组合的并集
sort(union(union(union(union(zuheFA,zuheFL),zuheHF),zuheMA),zuheSA))
##    [1] "CCL26~BLC"        "Ck.b8.1~BLC"      "Ck.b8.1~CCL26"   
##    [4] "CSF1~BLC"         "CSF1~CCL26"       "CSF1~Ck.b8.1"    
##    [7] "CSF2~BDNF"        "CSF2~CCL11"       "CSF2~Ck.b8.1"    
##   [10] "CSF3~CCL11"       "CSF3~CCL26"       "CSF3~CSF2"       
##   [13] "CX3CL1~ANG"       "CX3CL1~CCL26"     "CX3CL1~Ck.b8.1"  
##   [16] "EGF~BDNF"         "EGF~BLC"          "EGF~CCL24"       
##   [19] "EGF~CSF2"         "ENA.78~BDNF"      "ENA.78~CSF2"     
##   [22] "ENA.78~EGF"       "FGF.4~ANG"        "FGF.4~CCL26"     
##   [25] "FGF.4~CSF1"       "FGF.4~CSF3"       "FGF.6~CCL26"     
##   [28] "FGF.6~Ck.b8.1"    "FGF.6~CSF1"       "FGF.6~CX3CL1"    
##   [31] "FGF.6~FGF.4"      "FGF.7~CCL26"      "FGF.7~CSF1"      
##   [34] "FGF.7~CSF3"       "FGF.7~FGF.4"      "FGF.7~FGF.6"     
##   [37] "FGF.9~CCL24"      "FGF.9~CCL26"      "FGF.9~EGF"       
##   [40] "FGF.9~FGF.4"      "FGF.9~FGF.6"      "FGF.9~FGF.7"     
##   [43] "GCP.2~BLC"        "GCP.2~CCL11"      "GCP.2~CCL26"     
##   [46] "GCP.2~CSF1"       "GCP.2~CSF2"       "GCP.2~CSF3"      
##   [49] "GCP.2~FGF.7"      "GDNF~ANG"         "GDNF~BLC"        
##   [52] "GDNF~CCL26"       "GDNF~CSF1"        "GDNF~CSF2"       
##   [55] "GDNF~CSF3"        "GDNF~CX3CL1"      "GDNF~ENA.78"     
##   [58] "GDNF~FGF.4"       "GDNF~FGF.6"       "GDNF~FGF.7"      
##   [61] "GDNF~GCP.2"       "GRO.a~BDNF"       "GRO.a~BLC"       
##   [64] "GRO.a~CCL24"      "GRO.a~EGF"        "GRO.a~FGF.9"     
##   [67] "GRO.a~GCP.2"      "GRO~ANG"          "GRO~BDNF"        
##   [70] "GRO~CSF2"         "GRO~CSF3"         "GRO~EGF"         
##   [73] "GRO~ENA.78"       "HGF~FGF.7"        "I.309~BLC"       
##   [76] "I.309~CCL26"      "I.309~Ck.b8.1"    "I.309~CSF1"      
##   [79] "I.309~CSF3"       "I.309~FGF.4"      "I.309~FGF.6"     
##   [82] "I.309~FGF.7"      "I.309~FGF.9"      "I.309~GCP.2"     
##   [85] "I.309~GDNF"       "IFN.g~CCL11"      "IFN.g~CSF2"      
##   [88] "IFN.g~CSF3"       "IFN.g~GCP.2"      "IFN.g~GDNF"      
##   [91] "IGF.I~BLC"        "IGF.I~Ck.b8.1"    "IGF.I~CSF1"      
##   [94] "IGF.I~FGF.7"      "IGF.I~FGF.9"      "IGF.I~GCP.2"     
##   [97] "IGF.I~GRO.a"      "IGFBP.1~CCL26"    "IGFBP.1~FGF.7"   
##  [100] "IGFBP.1~Flt.3.LG" "IGFBP.1~I.309"    "IGFBP.2~ANG"     
##  [103] "IGFBP.2~BLC"      "IGFBP.2~FGF.7"    "IGFBP.2~GRO.a"   
##  [106] "IGFBP.2~IGF.I"    "IGFBP.2~IGFBP.1"  "IGFBP.3~CSF2"    
##  [109] "IGFBP.3~CSF3"     "IGFBP.3~EGF"      "IGFBP.3~FGF.7"   
##  [112] "IGFBP.3~GCP.2"    "IGFBP.3~GRO"      "IGFBP.4~BLC"     
##  [115] "IGFBP.4~CCL24"    "IGFBP.4~CCL26"    "IGFBP.4~Ck.b8.1" 
##  [118] "IGFBP.4~CSF1"     "IGFBP.4~CX3CL1"   "IGFBP.4~FGF.4"   
##  [121] "IGFBP.4~FGF.6"    "IGFBP.4~FGF.7"    "IGFBP.4~Flt.3.LG"
##  [124] "IGFBP.4~GCP.2"    "IGFBP.4~GDNF"     "IGFBP.4~HGF"     
##  [127] "IGFBP.4~I.309"    "IGFBP.4~IFN.g"    "IGFBP.4~IGF.I"   
##  [130] "IGFBP.4~IGFBP.3"  "IL.10~BDNF"       "IL.10~CSF2"      
##  [133] "IL.10~CSF3"       "IL.10~ENA.78"     "IL.10~FGF.6"     
##  [136] "IL.10~GRO"        "IL.10~IFN.g"      "IL.12p70~CCL11"  
##  [139] "IL.12p70~CCL26"   "IL.12p70~CSF3"    "IL.12p70~GDNF"   
##  [142] "IL.12p70~GRO"     "IL.12p70~GRO.a"   "IL.13~CCL11"     
##  [145] "IL.13~CSF2"       "IL.13~CSF3"       "IL.13~GCP.2"     
##  [148] "IL.13~GDNF"       "IL.13~IFN.g"      "IL.13~IGF.I"     
##  [151] "IL.13~IL.10"      "IL.15~BDNF"       "IL.15~CCL11"     
##  [154] "IL.15~CSF2"       "IL.15~CSF3"       "IL.15~EGF"       
##  [157] "IL.15~ENA.78"     "IL.15~GCP.2"      "IL.15~GDNF"      
##  [160] "IL.15~GRO"        "IL.15~IFN.g"      "IL.15~IGFBP.3"   
##  [163] "IL.15~IL.10"      "IL.15~IL.12p70"   "IL.15~IL.13"     
##  [166] "IL.16~Ck.b8.1"    "IL.16~FGF.4"      "IL.16~FGF.6"     
##  [169] "IL.16~I.309"      "IL.16~IL.12p70"   "IL.1a~BLC"       
##  [172] "IL.1a~CCL11"      "IL.1a~CCL26"      "IL.1a~Ck.b8.1"   
##  [175] "IL.1a~CSF1"       "IL.1a~CSF2"       "IL.1a~CSF3"      
##  [178] "IL.1a~FGF.4"      "IL.1a~FGF.6"      "IL.1a~FGF.7"     
##  [181] "IL.1a~FGF.9"      "IL.1a~GCP.2"      "IL.1a~GDNF"      
##  [184] "IL.1a~I.309"      "IL.1a~IFN.g"      "IL.1a~IGF.I"     
##  [187] "IL.1a~IGFBP.4"    "IL.1a~IL.10"      "IL.1a~IL.13"     
##  [190] "IL.1a~IL.15"      "IL.1b~Ck.b8.1"    "IL.1b~EGF"       
##  [193] "IL.1b~FGF.9"      "IL.1b~I.309"      "IL.1b~IGFBP.1"   
##  [196] "IL.1b~IGFBP.4"    "IL.1b~IL.16"      "IL.2~ANG"        
##  [199] "IL.2~BDNF"        "IL.2~CCL11"       "IL.2~CSF2"       
##  [202] "IL.2~CSF3"        "IL.2~EGF"         "IL.2~ENA.78"     
##  [205] "IL.2~FGF.7"       "IL.2~GDNF"        "IL.2~GRO"        
##  [208] "IL.2~HGF"         "IL.2~IFN.g"       "IL.2~IL.10"      
##  [211] "IL.2~IL.13"       "IL.2~IL.15"       "IL.2~IL.1a"      
##  [214] "IL.3~CCL26"       "IL.3~Ck.b8.1"     "IL.3~CSF1"       
##  [217] "IL.3~CSF3"        "IL.3~FGF.4"       "IL.3~FGF.6"      
##  [220] "IL.3~FGF.7"       "IL.3~FGF.9"       "IL.3~GCP.2"      
##  [223] "IL.3~GDNF"        "IL.3~I.309"       "IL.3~IGF.I"      
##  [226] "IL.3~IGFBP.4"     "IL.3~IL.10"       "IL.3~IL.1a"      
##  [229] "IL.3~IL.1b"       "IL.4~BDNF"        "IL.4~CCL26"      
##  [232] "IL.4~Ck.b8.1"     "IL.4~CSF1"        "IL.4~FGF.4"      
##  [235] "IL.4~FGF.6"       "IL.4~FGF.7"       "IL.4~FGF.9"      
##  [238] "IL.4~GCP.2"       "IL.4~I.309"       "IL.4~IGFBP.3"    
##  [241] "IL.4~IGFBP.4"     "IL.4~IL.1a"       "IL.4~IL.3"       
##  [244] "IL.5~CCL11"       "IL.5~CSF2"        "IL.5~CSF3"       
##  [247] "IL.5~ENA.78"      "IL.5~GCP.2"       "IL.5~GRO"        
##  [250] "IL.5~IFN.g"       "IL.5~IGFBP.3"     "IL.5~IL.10"      
##  [253] "IL.5~IL.13"       "IL.5~IL.15"       "IL.5~IL.1a"      
##  [256] "IL.5~IL.2"        "IL.5~IL.4"        "IL.6~BDNF"       
##  [259] "IL.6~CSF2"        "IL.6~CSF3"        "IL.6~EGF"        
##  [262] "IL.6~ENA.78"      "IL.6~FGF.4"       "IL.6~Flt.3.LG"   
##  [265] "IL.6~GCP.2"       "IL.6~GDNF"        "IL.6~GRO"        
##  [268] "IL.6~GRO.a"       "IL.6~IGFBP.3"     "IL.6~IGFBP.4"    
##  [271] "IL.6~IL.15"       "IL.6~IL.1a"       "IL.6~IL.4"       
##  [274] "IL.6~IL.5"        "IL.7~CCL11"       "IL.7~Ck.b8.1"    
##  [277] "IL.7~CSF2"        "IL.7~CSF3"        "IL.7~GCP.2"      
##  [280] "IL.7~IFN.g"       "IL.7~IGFBP.4"     "IL.7~IL.10"      
##  [283] "IL.7~IL.13"       "IL.7~IL.15"       "IL.7~IL.1a"      
##  [286] "IL.7~IL.2"        "IL.7~IL.5"        "IL.8~Flt.3.LG"   
##  [289] "IL.8~GCP.2"       "IL.8~GDNF"        "IL.8~GRO"        
##  [292] "IL.8~IGFBP.3"     "IL.8~IGFBP.4"     "IL.8~IL.10"      
##  [295] "IL.8~IL.13"       "IL.8~IL.15"       "IL.8~IL.4"       
##  [298] "IL.8~IL.5"        "IL.8~IL.6"        "IL.8~IL.7"       
##  [301] "IP.10~Ck.b8.1"    "IP.10~EGF"        "IP.10~ENA.78"    
##  [304] "IP.10~FGF.4"      "IP.10~FGF.6"      "IP.10~FGF.7"     
##  [307] "IP.10~GDNF"       "IP.10~HGF"        "IP.10~IFN.g"     
##  [310] "IP.10~IGFBP.3"    "IP.10~IL.1a"      "IP.10~IL.4"      
##  [313] "Leptin~CCL26"     "Leptin~GDNF"      "Leptin~HGF"      
##  [316] "Leptin~IFN.g"     "Leptin~IGFBP.1"   "Leptin~IGFBP.4"  
##  [319] "Leptin~IL.2"      "Leptin~IP.10"     "LIF~CCL24"       
##  [322] "LIF~CCL26"        "LIF~Ck.b8.1"      "LIF~CX3CL1"      
##  [325] "LIF~EGF"          "LIF~FGF.4"        "LIF~FGF.6"       
##  [328] "LIF~FGF.7"        "LIF~FGF.9"        "LIF~I.309"       
##  [331] "LIF~IL.16"        "LIF~IL.1a"        "LIF~IL.1b"       
##  [334] "LIF~IL.3"         "LIF~IL.4"         "LIGHT~CCL24"     
##  [337] "LIGHT~CCL26"      "LIGHT~Ck.b8.1"    "LIGHT~CSF3"      
##  [340] "LIGHT~CX3CL1"     "LIGHT~FGF.4"      "LIGHT~FGF.6"     
##  [343] "LIGHT~FGF.7"      "LIGHT~FGF.9"      "LIGHT~GDNF"      
##  [346] "LIGHT~GRO.a"      "LIGHT~I.309"      "LIGHT~IL.10"     
##  [349] "LIGHT~IL.16"      "LIGHT~IL.1a"      "LIGHT~IL.1b"     
##  [352] "LIGHT~IL.3"       "MCP.1~ANG"        "MCP.1~BDNF"      
##  [355] "MCP.1~Ck.b8.1"    "MCP.1~CSF2"       "MCP.1~CSF3"      
##  [358] "MCP.1~CX3CL1"     "MCP.1~FGF.4"      "MCP.1~FGF.6"     
##  [361] "MCP.1~GCP.2"      "MCP.1~GRO.a"      "MCP.1~IFN.g"     
##  [364] "MCP.1~IL.10"      "MCP.1~IL.13"      "MCP.1~IL.15"     
##  [367] "MCP.1~IL.1a"      "MCP.1~IL.2"       "MCP.1~IL.4"      
##  [370] "MCP.1~IL.5"       "MCP.1~IL.6"       "MCP.1~IL.7"      
##  [373] "MCP.1~IL.8"       "MCP.1~IP.10"      "MCP.2~BDNF"      
##  [376] "MCP.2~BLC"        "MCP.2~ENA.78"     "MCP.2~FGF.7"     
##  [379] "MCP.2~GDNF"       "MCP.2~GRO.a"      "MCP.2~HGF"       
##  [382] "MCP.2~IL.10"      "MCP.2~IL.12p70"   "MCP.2~IP.10"     
##  [385] "MCP.3~CCL26"      "MCP.3~Ck.b8.1"    "MCP.3~CSF1"      
##  [388] "MCP.3~CX3CL1"     "MCP.3~EGF"        "MCP.3~ENA.78"    
##  [391] "MCP.3~FGF.4"      "MCP.3~FGF.6"      "MCP.3~FGF.7"     
##  [394] "MCP.3~FGF.9"      "MCP.3~GDNF"       "MCP.3~HGF"       
##  [397] "MCP.3~I.309"      "MCP.3~IFN.g"      "MCP.3~IGFBP.3"   
##  [400] "MCP.3~IL.16"      "MCP.3~IL.1a"      "MCP.3~IL.3"      
##  [403] "MCP.3~IL.4"       "MCP.3~IL.8"       "MCP.3~IP.10"     
##  [406] "MCP.3~Leptin"     "MCP.3~LIF"        "MCP.3~MCP.1"     
##  [409] "MCP.4~BLC"        "MCP.4~CCL26"      "MCP.4~Ck.b8.1"   
##  [412] "MCP.4~CSF1"       "MCP.4~CX3CL1"     "MCP.4~FGF.4"     
##  [415] "MCP.4~FGF.7"      "MCP.4~GCP.2"      "MCP.4~GRO.a"     
##  [418] "MCP.4~HGF"        "MCP.4~I.309"      "MCP.4~IGF.I"     
##  [421] "MCP.4~IGFBP.2"    "MCP.4~IGFBP.4"    "MCP.4~IL.10"     
##  [424] "MCP.4~IL.1a"      "MCP.4~IL.1b"      "MCP.4~MCP.2"     
##  [427] "MDC~CCL26"        "MDC~Ck.b8.1"      "MDC~CSF1"        
##  [430] "MDC~EGF"          "MDC~FGF.4"        "MDC~FGF.6"       
##  [433] "MDC~FGF.7"        "MDC~FGF.9"        "MDC~GDNF"        
##  [436] "MDC~HGF"          "MDC~I.309"        "MDC~IFN.g"       
##  [439] "MDC~IGFBP.4"      "MDC~IL.16"        "MDC~IL.1a"       
##  [442] "MDC~IL.1b"        "MDC~IL.2"         "MDC~IL.3"        
##  [445] "MDC~IL.4"         "MDC~IL.6"         "MDC~Leptin"      
##  [448] "MDC~LIF"          "MDC~LIGHT"        "MDC~MCP.2"       
##  [451] "MDC~MCP.3"        "MIF~BLC"          "MIF~Ck.b8.1"     
##  [454] "MIF~FGF.9"        "MIF~GRO"          "MIF~IGF.I"       
##  [457] "MIF~IGFBP.2"      "MIF~IL.12p70"     "MIF~IL.16"       
##  [460] "MIF~IL.1a"        "MIF~IL.1b"        "MIF~LIGHT"       
##  [463] "MIF~MCP.2"        "MIG~CCL11"        "MIG~CSF2"        
##  [466] "MIG~CSF3"         "MIG~EGF"          "MIG~FGF.9"       
##  [469] "MIG~GCP.2"        "MIG~IFN.g"        "MIG~IGF.I"       
##  [472] "MIG~IGFBP.4"      "MIG~IL.10"        "MIG~IL.13"       
##  [475] "MIG~IL.15"        "MIG~IL.1a"        "MIG~IL.2"        
##  [478] "MIG~IL.4"         "MIG~IL.5"         "MIG~IL.7"        
##  [481] "MIG~IP.10"        "MIG~Leptin"       "MIG~LIF"         
##  [484] "MIG~MCP.1"        "MIG~MCP.3"        "MIG~MDC"         
##  [487] "MIP.1b~EGF"       "MIP.1b~FGF.4"     "MIP.1b~FGF.6"    
##  [490] "MIP.1b~FGF.9"     "MIP.1b~GDNF"      "MIP.1b~IFN.g"    
##  [493] "MIP.1b~IGFBP.4"   "MIP.1b~IL.1a"     "MIP.1b~IL.2"     
##  [496] "MIP.1b~IL.4"      "MIP.1b~IP.10"     "MIP.1b~Leptin"   
##  [499] "MIP.1b~LIF"       "MIP.1b~MCP.1"     "MIP.1b~MCP.3"    
##  [502] "MIP.1b~MDC"       "MIP.1b~MIG"       "MIP.1d~CCL24"    
##  [505] "MIP.1d~FGF.6"     "MIP.1d~FGF.7"     "MIP.1d~I.309"    
##  [508] "MIP.1d~IFN.g"     "MIP.1d~IGFBP.4"   "MIP.1d~IL.10"    
##  [511] "MIP.1d~IL.16"     "MIP.1d~IP.10"     "MIP.1d~Leptin"   
##  [514] "MIP.1d~LIF"       "MIP.1d~LIGHT"     "MIP.1d~MCP.4"    
##  [517] "MIP.1d~MDC"       "MIP.1d~MIG"       "MIP.3a~BDNF"     
##  [520] "MIP.3a~EGF"       "MIP.3a~ENA.78"    "MIP.3a~Flt.3.LG" 
##  [523] "MIP.3a~IGFBP.4"   "MIP.3a~IL.1a"     "MIP.3a~IL.2"     
##  [526] "MIP.3a~IL.6"      "MIP.3a~IL.8"      "MIP.3a~MCP.3"    
##  [529] "NAP.2~BDNF"       "NAP.2~CSF2"       "NAP.2~ENA.78"    
##  [532] "NAP.2~GCP.2"      "NAP.2~GRO"        "NAP.2~IL.1a"     
##  [535] "NAP.2~IL.4"       "NAP.2~IL.5"       "NAP.2~IL.6"      
##  [538] "NAP.2~IL.7"       "NAP.2~MCP.1"      "NAP.2~MIG"       
##  [541] "NAP.2~MIP.3a"     "NT.3~CCL24"       "NT.3~FGF.4"      
##  [544] "NT.3~FGF.6"       "NT.3~GRO.a"       "NT.3~IFN.g"      
##  [547] "NT.3~IL.13"       "NT.3~IL.15"       "NT.3~IL.1a"      
##  [550] "NT.3~IL.4"        "NT.3~IL.7"        "NT.3~IP.10"      
##  [553] "NT.3~LIF"         "NT.3~MCP.1"       "NT.3~MCP.3"      
##  [556] "NT.3~MIG"         "NT.3~MIP.1b"      "NT.3~MIP.3a"     
##  [559] "NT.3~NAP.2"       "NT.4~BDNF"        "NT.4~CCL24"      
##  [562] "NT.4~CCL26"       "NT.4~Ck.b8.1"     "NT.4~CSF1"       
##  [565] "NT.4~CSF2"        "NT.4~EGF"         "NT.4~ENA.78"     
##  [568] "NT.4~FGF.4"       "NT.4~FGF.6"       "NT.4~FGF.7"      
##  [571] "NT.4~FGF.9"       "NT.4~GCP.2"       "NT.4~GDNF"       
##  [574] "NT.4~GRO.a"       "NT.4~I.309"       "NT.4~IGFBP.1"    
##  [577] "NT.4~IGFBP.4"     "NT.4~IL.16"       "NT.4~IL.1a"      
##  [580] "NT.4~IL.1b"       "NT.4~IL.3"        "NT.4~IL.4"       
##  [583] "NT.4~IL.6"        "NT.4~LIF"         "NT.4~LIGHT"      
##  [586] "NT.4~MCP.3"       "NT.4~MCP.4"       "NT.4~MDC"        
##  [589] "NT.4~MIF"         "NT.4~MIP.1d"      "OPG~FGF.7"       
##  [592] "OPG~GCP.2"        "OPG~HGF"          "OPG~IGFBP.1"     
##  [595] "OPG~IGFBP.3"      "OPG~IGFBP.4"      "OPG~IL.10"       
##  [598] "OPG~IP.10"        "OPG~MCP.2"        "OPG~MCP.3"       
##  [601] "OPG~MCP.4"        "OPG~NT.4"         "OPN~FGF.6"       
##  [604] "OPN~FGF.7"        "OPN~HGF"          "OPN~IFN.g"       
##  [607] "OPN~IGFBP.2"      "OPN~IGFBP.3"      "OPN~IGFBP.4"     
##  [610] "OPN~IL.1a"        "OPN~IL.2"         "OPN~IL.6"        
##  [613] "OPN~IP.10"        "OPN~Leptin"       "OPN~MCP.3"       
##  [616] "OPN~MDC"          "OPN~MIG"          "OPN~MIP.1d"      
##  [619] "OPN~OPG"          "OSM~CCL11"        "OSM~CCL26"       
##  [622] "OSM~Ck.b8.1"      "OSM~CSF1"         "OSM~CX3CL1"      
##  [625] "OSM~FGF.4"        "OSM~FGF.6"        "OSM~FGF.7"       
##  [628] "OSM~FGF.9"        "OSM~GCP.2"        "OSM~GDNF"        
##  [631] "OSM~GRO.a"        "OSM~I.309"        "OSM~IFN.g"       
##  [634] "OSM~IGF.I"        "OSM~IGFBP.2"      "OSM~IGFBP.4"     
##  [637] "OSM~IL.12p70"     "OSM~IL.15"        "OSM~IL.16"       
##  [640] "OSM~IL.1a"        "OSM~IL.3"         "OSM~IL.4"        
##  [643] "OSM~LIF"          "OSM~LIGHT"        "OSM~MCP.3"       
##  [646] "OSM~MCP.4"        "OSM~MDC"          "OSM~MIF"         
##  [649] "OSM~NT.3"         "OSM~NT.4"         "PARC~BLC"        
##  [652] "PARC~CCL26"       "PARC~Ck.b8.1"     "PARC~CSF1"       
##  [655] "PARC~CSF2"        "PARC~CSF3"        "PARC~FGF.4"      
##  [658] "PARC~FGF.6"       "PARC~FGF.7"       "PARC~GCP.2"      
##  [661] "PARC~GDNF"        "PARC~GRO.a"       "PARC~I.309"      
##  [664] "PARC~IFN.g"       "PARC~IGF.I"       "PARC~IGFBP.1"    
##  [667] "PARC~IGFBP.2"     "PARC~IL.10"       "PARC~IL.13"      
##  [670] "PARC~IL.15"       "PARC~IL.1a"       "PARC~IL.2"       
##  [673] "PARC~IL.3"        "PARC~IL.5"        "PARC~IL.6"       
##  [676] "PARC~IL.7"        "PARC~Leptin"      "PARC~LIGHT"      
##  [679] "PARC~MIG"         "PARC~NT.4"        "PARC~OSM"        
##  [682] "PDGF.BB~BDNF"     "PDGF.BB~EGF"      "PDGF.BB~ENA.78"  
##  [685] "PDGF.BB~GCP.2"    "PDGF.BB~GRO"      "PDGF.BB~IFN.g"   
##  [688] "PDGF.BB~IL.2"     "PDGF.BB~IL.6"     "PDGF.BB~MIG"     
##  [691] "PDGF.BB~MIP.3a"   "PDGF.BB~NAP.2"    "PDGF.BB~NT.3"    
##  [694] "PDGF.BB~NT.4"     "PIGF~BLC"         "PIGF~CCL26"      
##  [697] "PIGF~CSF1"        "PIGF~CSF2"        "PIGF~CSF3"       
##  [700] "PIGF~CX3CL1"      "PIGF~FGF.4"       "PIGF~FGF.6"      
##  [703] "PIGF~FGF.7"       "PIGF~FGF.9"       "PIGF~GDNF"       
##  [706] "PIGF~GRO"         "PIGF~I.309"       "PIGF~IFN.g"      
##  [709] "PIGF~IGFBP.4"     "PIGF~IL.12p70"    "PIGF~IL.13"      
##  [712] "PIGF~IL.1a"       "PIGF~IL.3"        "PIGF~IL.4"       
##  [715] "PIGF~IL.8"        "PIGF~LIF"         "PIGF~LIGHT"      
##  [718] "PIGF~MCP.3"       "PIGF~MCP.4"       "PIGF~MDC"        
##  [721] "PIGF~MIF"         "PIGF~NT.4"        "PIGF~OSM"        
##  [724] "PIGF~PARC"        "RANTES~ANG"       "RANTES~BDNF"     
##  [727] "RANTES~CCL11"     "RANTES~CCL24"     "RANTES~EGF"      
##  [730] "RANTES~ENA.78"    "RANTES~GRO"       "RANTES~IL.2"     
##  [733] "RANTES~IP.10"     "RANTES~MIP.3a"    "RANTES~NAP.2"    
##  [736] "RANTES~PDGF.BB"   "SCF~ANG"          "SCF~BDNF"        
##  [739] "SCF~CCL26"        "SCF~CSF1"         "SCF~CSF2"        
##  [742] "SCF~EGF"          "SCF~ENA.78"       "SCF~FGF.4"       
##  [745] "SCF~FGF.6"        "SCF~FGF.7"        "SCF~FGF.9"       
##  [748] "SCF~GDNF"         "SCF~GRO"          "SCF~I.309"       
##  [751] "SCF~IGFBP.2"      "SCF~IGFBP.3"      "SCF~IGFBP.4"     
##  [754] "SCF~IL.10"        "SCF~IL.15"        "SCF~IL.1a"       
##  [757] "SCF~IL.2"         "SCF~IL.3"         "SCF~IL.4"        
##  [760] "SCF~IL.5"         "SCF~LIF"          "SCF~LIGHT"       
##  [763] "SCF~MCP.2"        "SCF~MCP.3"        "SCF~MDC"         
##  [766] "SCF~MIP.3a"       "SCF~NT.3"         "SCF~NT.4"        
##  [769] "SCF~OPG"          "SCF~OPN"          "SCF~OSM"         
##  [772] "SCF~PDGF.BB"      "SCF~PIGF"         "SCF~RANTES"      
##  [775] "SDF.1~CCL26"      "SDF.1~Ck.b8.1"    "SDF.1~CSF3"      
##  [778] "SDF.1~CX3CL1"     "SDF.1~FGF.4"      "SDF.1~FGF.6"     
##  [781] "SDF.1~FGF.7"      "SDF.1~FGF.9"      "SDF.1~IFN.g"     
##  [784] "SDF.1~IL.15"      "SDF.1~IL.3"       "SDF.1~IL.4"      
##  [787] "SDF.1~IL.7"       "SDF.1~IP.10"      "SDF.1~Leptin"    
##  [790] "SDF.1~LIF"        "SDF.1~MCP.1"      "SDF.1~MCP.3"     
##  [793] "SDF.1~MDC"        "SDF.1~MIP.1b"     "SDF.1~NT.3"      
##  [796] "SDF.1~NT.4"       "SDF.1~PIGF"       "SDF.1~SCF"       
##  [799] "TARC~BDNF"        "TARC~CCL26"       "TARC~CSF2"       
##  [802] "TARC~EGF"         "TARC~ENA.78"      "TARC~GRO"        
##  [805] "TARC~GRO.a"       "TARC~IL.10"       "TARC~IL.13"      
##  [808] "TARC~IL.15"       "TARC~IL.2"        "TARC~IL.5"       
##  [811] "TARC~IL.6"        "TARC~MCP.2"       "TARC~MIP.1b"     
##  [814] "TARC~MIP.3a"      "TARC~NAP.2"       "TARC~NT.3"       
##  [817] "TARC~PDGF.BB"     "TARC~SCF"         "TGF.b1~CCL11"    
##  [820] "TGF.b1~CSF2"      "TGF.b1~CSF3"      "TGF.b1~EGF"      
##  [823] "TGF.b1~GCP.2"     "TGF.b1~IFN.g"     "TGF.b1~IGFBP.4"  
##  [826] "TGF.b1~IL.10"     "TGF.b1~IL.13"     "TGF.b1~IL.15"    
##  [829] "TGF.b1~IL.1a"     "TGF.b1~IL.2"      "TGF.b1~IL.5"     
##  [832] "TGF.b1~IL.7"      "TGF.b1~Leptin"    "TGF.b1~LIF"      
##  [835] "TGF.b1~MCP.1"     "TGF.b1~MCP.3"     "TGF.b1~MDC"      
##  [838] "TGF.b1~MIG"       "TGF.b1~MIP.1d"    "TGF.b1~NT.3"     
##  [841] "TGF.b1~OPN"       "TGF.b1~PARC"      "TGF.b1~PDGF.BB"  
##  [844] "TGF.b1~PIGF"      "TGF.b1~SDF.1"     "TGF.b1~TARC"     
##  [847] "TGF.b2~CCL26"     "TGF.b2~CSF1"      "TGF.b2~EGF"      
##  [850] "TGF.b2~FGF.4"     "TGF.b2~FGF.6"     "TGF.b2~FGF.7"    
##  [853] "TGF.b2~FGF.9"     "TGF.b2~I.309"     "TGF.b2~IGFBP.4"  
##  [856] "TGF.b2~IL.16"     "TGF.b2~IL.1a"     "TGF.b2~IL.1b"    
##  [859] "TGF.b2~IL.3"      "TGF.b2~IL.4"      "TGF.b2~IL.7"     
##  [862] "TGF.b2~LIF"       "TGF.b2~LIGHT"     "TGF.b2~MCP.3"    
##  [865] "TGF.b2~MDC"       "TGF.b2~NT.3"      "TGF.b2~NT.4"     
##  [868] "TGF.b2~OSM"       "TGF.b2~PIGF"      "TGF.b2~SCF"      
##  [871] "TGF.b2~SDF.1"     "TGF.b2~TGF.b1"    "TGF.b3~Ck.b8.1"  
##  [874] "TGF.b3~CX3CL1"    "TGF.b3~FGF.9"     "TGF.b3~GDNF"     
##  [877] "TGF.b3~I.309"     "TGF.b3~IGFBP.2"   "TGF.b3~IGFBP.4"  
##  [880] "TGF.b3~IL.16"     "TGF.b3~IL.8"      "TGF.b3~LIGHT"    
##  [883] "TGF.b3~MCP.3"     "TGF.b3~MCP.4"     "TGF.b3~MDC"      
##  [886] "TGF.b3~MIF"       "TGF.b3~OSM"       "TGF.b3~PARC"     
##  [889] "THPO~BLC"         "THPO~CCL26"       "THPO~Ck.b8.1"    
##  [892] "THPO~CX3CL1"      "THPO~ENA.78"      "THPO~FGF.4"      
##  [895] "THPO~FGF.6"       "THPO~FGF.7"       "THPO~GCP.2"      
##  [898] "THPO~I.309"       "THPO~IGFBP.4"     "THPO~IL.10"      
##  [901] "THPO~IL.16"       "THPO~IL.1a"       "THPO~IL.3"       
##  [904] "THPO~IL.4"        "THPO~LIF"         "THPO~MCP.1"      
##  [907] "THPO~MCP.3"       "THPO~MCP.4"       "THPO~MDC"        
##  [910] "THPO~NT.4"        "THPO~OSM"         "THPO~PIGF"       
##  [913] "THPO~RANTES"      "THPO~SCF"         "THPO~TARC"       
##  [916] "THPO~TGF.b2"      "THPO~TGF.b3"      "TIMP.1~CCL11"    
##  [919] "TIMP.1~ENA.78"    "TIMP.1~GDNF"      "TIMP.1~GRO"      
##  [922] "TIMP.1~IL.12p70"  "TIMP.1~IP.10"     "TIMP.1~MCP.2"    
##  [925] "TIMP.1~MCP.3"     "TIMP.1~MIF"       "TIMP.1~NAP.2"    
##  [928] "TIMP.1~PIGF"      "TIMP.1~RANTES"    "TIMP.1~TARC"     
##  [931] "TIMP.1~THPO"      "TIMP.2~Ck.b8.1"   "TIMP.2~FGF.6"    
##  [934] "TIMP.2~IGFBP.1"   "TIMP.2~IGFBP.2"   "TIMP.2~IL.10"    
##  [937] "TIMP.2~IL.16"     "TIMP.2~IL.1a"     "TIMP.2~IL.3"     
##  [940] "TIMP.2~IL.4"      "TIMP.2~IP.10"     "TIMP.2~MCP.1"    
##  [943] "TIMP.2~MIF"       "TIMP.2~MIP.1d"    "TIMP.2~PIGF"     
##  [946] "TIMP.2~TGF.b3"    "TNF.a~CCL11"      "TNF.a~CSF2"      
##  [949] "TNF.a~CSF3"       "TNF.a~FGF.4"      "TNF.a~FGF.6"     
##  [952] "TNF.a~GCP.2"      "TNF.a~IFN.g"      "TNF.a~IGFBP.3"   
##  [955] "TNF.a~IL.10"      "TNF.a~IL.13"      "TNF.a~IL.15"     
##  [958] "TNF.a~IL.1a"      "TNF.a~IL.2"       "TNF.a~IL.4"      
##  [961] "TNF.a~IL.5"       "TNF.a~IL.6"       "TNF.a~IL.7"      
##  [964] "TNF.a~IL.8"       "TNF.a~IP.10"      "TNF.a~Leptin"    
##  [967] "TNF.a~LIF"        "TNF.a~MCP.1"      "TNF.a~MCP.3"     
##  [970] "TNF.a~MDC"        "TNF.a~MIG"        "TNF.a~MIP.1b"    
##  [973] "TNF.a~NT.3"       "TNF.a~OPN"        "TNF.a~PARC"      
##  [976] "TNF.a~PDGF.BB"    "TNF.a~PIGF"       "TNF.a~SDF.1"     
##  [979] "TNF.a~TGF.b1"     "TNF.b~CCL11"      "TNF.b~CCL26"     
##  [982] "TNF.b~CSF2"       "TNF.b~CSF3"       "TNF.b~FGF.4"     
##  [985] "TNF.b~FGF.6"      "TNF.b~FGF.7"      "TNF.b~GCP.2"     
##  [988] "TNF.b~GDNF"       "TNF.b~I.309"      "TNF.b~IFN.g"     
##  [991] "TNF.b~IL.10"      "TNF.b~IL.13"      "TNF.b~IL.15"     
##  [994] "TNF.b~IL.1a"      "TNF.b~IL.2"       "TNF.b~IL.3"      
##  [997] "TNF.b~IL.4"       "TNF.b~IL.5"       "TNF.b~IL.7"      
## [1000] "TNF.b~IP.10"      "TNF.b~LIF"        "TNF.b~LIGHT"     
## [1003] "TNF.b~MCP.1"      "TNF.b~MCP.3"      "TNF.b~MDC"       
## [1006] "TNF.b~MIG"        "TNF.b~MIP.1b"     "TNF.b~NT.3"      
## [1009] "TNF.b~NT.4"       "TNF.b~OSM"        "TNF.b~PARC"      
## [1012] "TNF.b~PIGF"       "TNF.b~SCF"        "TNF.b~SDF.1"     
## [1015] "TNF.b~TGF.b1"     "TNF.b~TGF.b2"     "TNF.b~TNF.a"     
## [1018] "VEGF~BLC"         "VEGF~Ck.b8.1"     "VEGF~CSF2"       
## [1021] "VEGF~EGF"         "VEGF~FGF.4"       "VEGF~FGF.9"      
## [1024] "VEGF~IL.1b"       "VEGF~IL.4"        "VEGF~IL.5"       
## [1027] "VEGF~IL.6"        "VEGF~LIF"         "VEGF~MCP.2"      
## [1030] "VEGF~MIG"         "VEGF~MIP.1b"      "VEGF~MIP.3a"     
## [1033] "VEGF~NAP.2"       "VEGF~NT.3"        "VEGF~TARC"       
## [1036] "VEGF~TNF.b"
## 计算5个组合的交集
sort(intersect(intersect(intersect(intersect(zuheFA,zuheFL),zuheHF),zuheMA),zuheSA))
## [1] "IL.15~CSF3"   "IL.15~IL.13"  "PDGF.BB~BDNF"
vcol <- c("red","blue","green","DeepPink","Gold")
T<-venn.diagram(list(Fatal_other =zuheFA,
                     Fatal_Last = zuheFL,
                     Healthy = zuheHF,
                     Mild_Other = zuheMA,
                     Severe_other = zuheSA),
                filename = NULL,lwd = 0.5,
                fill = vcol,alpha = 0.5,margin = 0.1)
grid.draw(T)

## (3)healthy, mild-first, severe-last, fatal-first, fatal-last做一组。
## 计算5个组合的交集
## 计算5个组合的并集
sort(union(union(union(union(zuheFF,zuheFL),zuheHF),zuheMF),zuheSL))
##   [1] "Ck.b8.1~CCL26"    "CSF2~CCL11"       "CSF2~Ck.b8.1"    
##   [4] "CSF3~CCL11"       "CSF3~CSF2"        "CX3CL1~CCL26"    
##   [7] "CX3CL1~Ck.b8.1"   "EGF~BDNF"         "EGF~CCL24"       
##  [10] "ENA.78~BDNF"      "ENA.78~CCL11"     "ENA.78~EGF"      
##  [13] "FGF.4~Ck.b8.1"    "FGF.4~CSF1"       "FGF.6~Ck.b8.1"   
##  [16] "FGF.6~CX3CL1"     "FGF.7~Ck.b8.1"    "FGF.7~FGF.4"     
##  [19] "FGF.9~CCL26"      "FGF.9~CX3CL1"     "FGF.9~EGF"       
##  [22] "FGF.9~FGF.6"      "Flt.3.LG~FGF.9"   "GCP.2~CCL11"     
##  [25] "GCP.2~CSF2"       "GCP.2~CSF3"       "GDNF~CCL24"      
##  [28] "GDNF~CCL26"       "GDNF~CX3CL1"      "GDNF~FGF.4"      
##  [31] "GDNF~Flt.3.LG"    "GRO.a~ANG"        "GRO.a~BDNF"      
##  [34] "GRO.a~CCL24"      "GRO.a~EGF"        "GRO.a~FGF.7"     
##  [37] "GRO~ANG"          "GRO~BDNF"         "GRO~EGF"         
##  [40] "GRO~FGF.7"        "HGF~Ck.b8.1"      "HGF~FGF.4"       
##  [43] "HGF~FGF.7"        "HGF~GCP.2"        "I.309~CCL26"     
##  [46] "I.309~Ck.b8.1"    "I.309~CSF3"       "I.309~FGF.4"     
##  [49] "I.309~FGF.6"      "I.309~FGF.7"      "I.309~FGF.9"     
##  [52] "I.309~HGF"        "IFN.g~ANG"        "IFN.g~CCL11"     
##  [55] "IFN.g~CSF2"       "IFN.g~CSF3"       "IFN.g~GCP.2"     
##  [58] "IFN.g~GRO.a"      "IFN.g~I.309"      "IGF.I~BLC"       
##  [61] "IGF.I~Ck.b8.1"    "IGF.I~CSF1"       "IGF.I~FGF.7"     
##  [64] "IGFBP.1~BDNF"     "IGFBP.1~CCL26"    "IGFBP.1~CSF1"    
##  [67] "IGFBP.1~FGF.7"    "IGFBP.1~Flt.3.LG" "IGFBP.2~ANG"     
##  [70] "IGFBP.2~CCL26"    "IGFBP.2~FGF.7"    "IGFBP.2~GRO"     
##  [73] "IGFBP.2~I.309"    "IGFBP.2~IGFBP.1"  "IGFBP.3~FGF.4"   
##  [76] "IGFBP.3~FGF.7"    "IGFBP.3~GCP.2"    "IGFBP.3~HGF"     
##  [79] "IGFBP.3~I.309"    "IGFBP.3~IGFBP.1"  "IGFBP.4~Ck.b8.1" 
##  [82] "IGFBP.4~FGF.4"    "IGFBP.4~Flt.3.LG" "IGFBP.4~IGFBP.3" 
##  [85] "IL.10~CSF2"       "IL.10~CSF3"       "IL.10~FGF.6"     
##  [88] "IL.10~GRO.a"      "IL.10~I.309"      "IL.10~IFN.g"     
##  [91] "IL.12p70~ANG"     "IL.12p70~CCL26"   "IL.12p70~CSF3"   
##  [94] "IL.12p70~GRO.a"   "IL.12p70~IGFBP.3" "IL.13~CCL11"     
##  [97] "IL.13~CSF2"       "IL.13~CSF3"       "IL.13~FGF.6"     
## [100] "IL.13~GCP.2"      "IL.13~I.309"      "IL.13~IFN.g"     
## [103] "IL.13~IGF.I"      "IL.13~IL.10"      "IL.15~ANG"       
## [106] "IL.15~CCL11"      "IL.15~CCL26"      "IL.15~CSF2"      
## [109] "IL.15~CSF3"       "IL.15~GCP.2"      "IL.15~GDNF"      
## [112] "IL.15~IFN.g"      "IL.15~IL.10"      "IL.15~IL.12p70"  
## [115] "IL.15~IL.13"      "IL.16~Ck.b8.1"    "IL.16~FGF.4"     
## [118] "IL.16~FGF.6"      "IL.16~FGF.7"      "IL.16~GRO"       
## [121] "IL.16~I.309"      "IL.1a~BDNF"       "IL.1a~CCL11"     
## [124] "IL.1a~CSF2"       "IL.1a~CSF3"       "IL.1a~GCP.2"     
## [127] "IL.1a~GRO.a"      "IL.1a~IFN.g"      "IL.1a~IGF.I"     
## [130] "IL.1a~IL.10"      "IL.1a~IL.13"      "IL.1a~IL.15"     
## [133] "IL.1b~Ck.b8.1"    "IL.1b~FGF.9"      "IL.1b~I.309"     
## [136] "IL.1b~IL.16"      "IL.2~ANG"         "IL.2~BDNF"       
## [139] "IL.2~CCL11"       "IL.2~CSF2"        "IL.2~CSF3"       
## [142] "IL.2~EGF"         "IL.2~ENA.78"      "IL.2~FGF.7"      
## [145] "IL.2~GRO"         "IL.2~GRO.a"       "IL.2~I.309"      
## [148] "IL.2~IFN.g"       "IL.2~IL.10"       "IL.2~IL.13"      
## [151] "IL.2~IL.15"       "IL.2~IL.1a"       "IL.3~ANG"        
## [154] "IL.3~CCL26"       "IL.3~FGF.4"       "IL.3~FGF.9"      
## [157] "IL.3~GDNF"        "IL.3~I.309"       "IL.3~IFN.g"      
## [160] "IL.3~IGFBP.2"     "IL.3~IL.10"       "IL.3~IL.13"      
## [163] "IL.3~IL.15"       "IL.3~IL.1b"       "IL.4~ANG"        
## [166] "IL.4~CCL26"       "IL.4~FGF.6"       "IL.4~GCP.2"      
## [169] "IL.4~IFN.g"       "IL.4~IGFBP.1"     "IL.4~IGFBP.2"    
## [172] "IL.4~IGFBP.3"     "IL.4~IL.12p70"    "IL.4~IL.13"      
## [175] "IL.4~IL.3"        "IL.5~CCL11"       "IL.5~CSF2"       
## [178] "IL.5~CSF3"        "IL.5~GCP.2"       "IL.5~HGF"        
## [181] "IL.5~IFN.g"       "IL.5~IGFBP.3"     "IL.5~IL.10"      
## [184] "IL.5~IL.13"       "IL.5~IL.15"       "IL.5~IL.1a"      
## [187] "IL.5~IL.2"        "IL.5~IL.4"        "IL.6~BDNF"       
## [190] "IL.6~CSF3"        "IL.6~Flt.3.LG"    "IL.6~GRO.a"      
## [193] "IL.6~IGFBP.4"     "IL.6~IL.13"       "IL.6~IL.1a"      
## [196] "IL.6~IL.4"        "IL.6~IL.5"        "IL.7~CCL11"      
## [199] "IL.7~Ck.b8.1"     "IL.7~CSF2"        "IL.7~CSF3"       
## [202] "IL.7~GCP.2"       "IL.7~IFN.g"       "IL.7~IGFBP.4"    
## [205] "IL.7~IL.10"       "IL.7~IL.13"       "IL.7~IL.15"      
## [208] "IL.7~IL.1a"       "IL.7~IL.1b"       "IL.7~IL.2"       
## [211] "IL.7~IL.5"        "IL.7~IL.6"        "IL.8~CSF3"       
## [214] "IL.8~CX3CL1"      "IL.8~FGF.7"       "IL.8~Flt.3.LG"   
## [217] "IL.8~GCP.2"       "IL.8~I.309"       "IL.8~IGFBP.3"    
## [220] "IL.8~IGFBP.4"     "IL.8~IL.1b"       "IL.8~IL.2"       
## [223] "IL.8~IL.4"        "IL.8~IL.5"        "IL.8~IL.6"       
## [226] "IP.10~ANG"        "IP.10~CSF1"       "IP.10~EGF"       
## [229] "IP.10~IGFBP.1"    "IP.10~IGFBP.3"    "IP.10~IL.12p70"  
## [232] "Leptin~CCL26"     "Leptin~GDNF"      "Leptin~GRO"      
## [235] "Leptin~IGFBP.1"   "Leptin~IGFBP.2"   "Leptin~IL.12p70" 
## [238] "Leptin~IL.4"      "LIF~BDNF"         "LIF~Ck.b8.1"     
## [241] "LIF~CX3CL1"       "LIF~EGF"          "LIF~FGF.6"       
## [244] "LIF~FGF.9"        "LIF~I.309"        "LIF~IGFBP.4"     
## [247] "LIF~IL.16"        "LIF~IL.1b"        "LIGHT~BLC"       
## [250] "LIGHT~Ck.b8.1"    "LIGHT~CX3CL1"     "LIGHT~FGF.6"     
## [253] "LIGHT~GDNF"       "LIGHT~I.309"      "LIGHT~IGF.I"     
## [256] "LIGHT~IL.10"      "LIGHT~IL.16"      "LIGHT~IL.1b"     
## [259] "MCP.1~ANG"        "MCP.1~BDNF"       "MCP.1~CSF2"      
## [262] "MCP.1~CSF3"       "MCP.1~FGF.7"      "MCP.1~GCP.2"     
## [265] "MCP.1~GRO.a"      "MCP.1~IFN.g"      "MCP.1~IL.10"     
## [268] "MCP.1~IL.13"      "MCP.1~IL.16"      "MCP.1~IL.2"      
## [271] "MCP.1~IL.3"       "MCP.1~IL.4"       "MCP.1~IL.5"      
## [274] "MCP.1~IL.6"       "MCP.1~IL.7"       "MCP.1~IL.8"      
## [277] "MCP.2~ANG"        "MCP.2~CSF2"       "MCP.2~EGF"       
## [280] "MCP.2~FGF.7"      "MCP.2~Flt.3.LG"   "MCP.2~GDNF"      
## [283] "MCP.2~GRO.a"      "MCP.2~HGF"        "MCP.2~IFN.g"     
## [286] "MCP.2~IL.4"       "MCP.2~IL.7"       "MCP.3~BDNF"      
## [289] "MCP.3~Ck.b8.1"    "MCP.3~CSF3"       "MCP.3~CX3CL1"    
## [292] "MCP.3~EGF"        "MCP.3~FGF.6"      "MCP.3~FGF.9"     
## [295] "MCP.3~GCP.2"      "MCP.3~HGF"        "MCP.3~I.309"     
## [298] "MCP.3~IGFBP.1"    "MCP.3~IGFBP.3"    "MCP.3~IL.16"     
## [301] "MCP.3~IL.2"       "MCP.3~IL.8"       "MCP.3~IP.10"     
## [304] "MCP.3~LIF"        "MCP.4~BDNF"       "MCP.4~CCL26"     
## [307] "MCP.4~Ck.b8.1"    "MCP.4~CX3CL1"     "MCP.4~FGF.4"     
## [310] "MCP.4~FGF.7"      "MCP.4~HGF"        "MCP.4~I.309"     
## [313] "MCP.4~IL.10"      "MCP.4~IL.12p70"   "MCP.4~LIGHT"     
## [316] "MCP.4~MCP.2"      "MDC~BLC"          "MDC~CCL26"       
## [319] "MDC~Ck.b8.1"      "MDC~CSF1"         "MDC~CSF2"        
## [322] "MDC~CX3CL1"       "MDC~FGF.6"        "MDC~FGF.9"       
## [325] "MDC~I.309"        "MDC~IGF.I"        "MDC~IL.16"       
## [328] "MDC~IL.1b"        "MDC~LIF"          "MDC~LIGHT"       
## [331] "MDC~MCP.2"        "MDC~MCP.3"        "MDC~MCP.4"       
## [334] "MIF~BLC"          "MIF~FGF.7"        "MIF~HGF"         
## [337] "MIF~IGFBP.2"      "MIF~IL.16"        "MIF~IL.1b"       
## [340] "MIF~LIGHT"        "MIG~CCL11"        "MIG~CCL24"       
## [343] "MIG~CCL26"        "MIG~CSF2"         "MIG~CSF3"        
## [346] "MIG~FGF.9"        "MIG~GCP.2"        "MIG~GDNF"        
## [349] "MIG~GRO.a"        "MIG~I.309"        "MIG~IFN.g"       
## [352] "MIG~IGF.I"        "MIG~IGFBP.4"      "MIG~IL.10"       
## [355] "MIG~IL.13"        "MIG~IL.15"        "MIG~IL.1a"       
## [358] "MIG~IL.2"         "MIG~IL.4"         "MIG~IL.5"        
## [361] "MIG~IL.7"         "MIG~MCP.1"        "MIP.1b~BDNF"     
## [364] "MIP.1b~CX3CL1"    "MIP.1b~EGF"       "MIP.1b~FGF.9"    
## [367] "MIP.1b~GCP.2"     "MIP.1b~GDNF"      "MIP.1b~HGF"      
## [370] "MIP.1b~IGFBP.1"   "MIP.1b~IGFBP.3"   "MIP.1b~IGFBP.4"  
## [373] "MIP.1b~IL.4"      "MIP.1b~IL.8"      "MIP.1b~LIF"      
## [376] "MIP.1b~LIGHT"     "MIP.1b~MCP.3"     "MIP.1d~CCL11"    
## [379] "MIP.1d~CCL26"     "MIP.1d~FGF.6"     "MIP.1d~I.309"    
## [382] "MIP.1d~IGF.I"     "MIP.1d~IL.10"     "MIP.1d~IL.16"    
## [385] "MIP.1d~IP.10"     "MIP.1d~LIF"       "MIP.1d~LIGHT"    
## [388] "MIP.1d~MCP.4"     "MIP.1d~MDC"       "MIP.3a~BDNF"     
## [391] "MIP.3a~Ck.b8.1"   "MIP.3a~EGF"       "MIP.3a~ENA.78"   
## [394] "MIP.3a~FGF.4"     "MIP.3a~FGF.7"     "MIP.3a~Flt.3.LG" 
## [397] "MIP.3a~GCP.2"     "MIP.3a~HGF"       "MIP.3a~I.309"    
## [400] "MIP.3a~IGFBP.3"   "MIP.3a~IGFBP.4"   "MIP.3a~IL.2"     
## [403] "MIP.3a~IL.6"      "MIP.3a~IL.8"      "MIP.3a~MCP.3"    
## [406] "MIP.3a~MIF"       "MIP.3a~MIP.1b"    "NAP.2~CCL24"     
## [409] "NAP.2~FGF.7"      "NAP.2~Flt.3.LG"   "NAP.2~GCP.2"     
## [412] "NAP.2~GRO"        "NAP.2~IGFBP.1"    "NAP.2~IL.16"     
## [415] "NAP.2~IL.1a"      "NAP.2~IL.4"       "NAP.2~IL.5"      
## [418] "NAP.2~IL.6"       "NAP.2~IL.7"       "NAP.2~MCP.1"     
## [421] "NAP.2~MCP.2"      "NAP.2~MIG"        "NT.3~CCL24"      
## [424] "NT.3~CSF2"        "NT.3~CSF3"        "NT.3~FGF.6"      
## [427] "NT.3~GCP.2"       "NT.3~GRO.a"       "NT.3~IFN.g"      
## [430] "NT.3~IL.10"       "NT.3~IL.13"       "NT.3~IL.15"      
## [433] "NT.3~IL.1a"       "NT.3~IL.2"        "NT.3~IL.4"       
## [436] "NT.3~IL.5"        "NT.3~IL.7"        "NT.3~MCP.1"      
## [439] "NT.3~MIG"         "NT.4~BDNF"        "NT.4~CCL26"      
## [442] "NT.4~Ck.b8.1"     "NT.4~CSF2"        "NT.4~EGF"        
## [445] "NT.4~ENA.78"      "NT.4~FGF.6"       "NT.4~FGF.7"      
## [448] "NT.4~FGF.9"       "NT.4~GRO.a"       "NT.4~I.309"      
## [451] "NT.4~IGF.I"       "NT.4~IGFBP.4"     "NT.4~IL.16"      
## [454] "NT.4~IL.1b"       "NT.4~IL.6"        "NT.4~LIGHT"      
## [457] "NT.4~MDC"         "NT.4~MIF"         "NT.4~MIP.1d"     
## [460] "OPG~FGF.4"        "OPG~FGF.7"        "OPG~GCP.2"       
## [463] "OPG~HGF"          "OPG~I.309"        "OPG~IGFBP.1"     
## [466] "OPG~IGFBP.3"      "OPG~IGFBP.4"      "OPG~IL.10"       
## [469] "OPG~IL.7"         "OPG~IP.10"        "OPG~MCP.2"       
## [472] "OPG~MCP.3"        "OPG~MCP.4"        "OPG~MIP.1b"      
## [475] "OPG~MIP.3a"       "OPN~CCL11"        "OPN~FGF.6"       
## [478] "OPN~IGFBP.2"      "OPN~IL.1a"        "OPN~IL.6"        
## [481] "OPN~MCP.3"        "OPN~MIP.1d"       "OSM~CCL26"       
## [484] "OSM~Ck.b8.1"      "OSM~CSF1"         "OSM~CX3CL1"      
## [487] "OSM~FGF.6"        "OSM~I.309"        "OSM~IFN.g"       
## [490] "OSM~IGFBP.4"      "OSM~IL.12p70"     "OSM~IL.15"       
## [493] "OSM~IL.16"        "OSM~LIF"          "OSM~LIGHT"       
## [496] "OSM~MCP.3"        "OSM~MDC"          "OSM~NT.4"        
## [499] "PARC~CCL26"       "PARC~Ck.b8.1"     "PARC~FGF.4"      
## [502] "PARC~FGF.6"       "PARC~GDNF"        "PARC~GRO"        
## [505] "PARC~GRO.a"       "PARC~I.309"       "PARC~IGFBP.1"    
## [508] "PARC~IGFBP.2"     "PARC~IL.15"       "PARC~IL.3"       
## [511] "PARC~Leptin"      "PARC~MCP.1"       "PDGF.BB~BDNF"    
## [514] "PDGF.BB~EGF"      "PDGF.BB~ENA.78"   "PDGF.BB~GCP.2"   
## [517] "PDGF.BB~GRO"      "PDGF.BB~IL.2"     "PDGF.BB~IL.7"    
## [520] "PDGF.BB~MIP.3a"   "PDGF.BB~NAP.2"    "PDGF.BB~NT.3"    
## [523] "PDGF.BB~NT.4"     "PDGF.BB~OSM"      "PIGF~CCL26"      
## [526] "PIGF~CSF2"        "PIGF~CSF3"        "PIGF~CX3CL1"     
## [529] "PIGF~FGF.4"       "PIGF~FGF.9"       "PIGF~GDNF"       
## [532] "PIGF~IFN.g"       "PIGF~IL.3"        "PIGF~LIF"        
## [535] "PIGF~LIGHT"       "PIGF~MCP.4"       "PIGF~MDC"        
## [538] "RANTES~CCL24"     "RANTES~CCL26"     "RANTES~EGF"      
## [541] "RANTES~ENA.78"    "RANTES~FGF.7"     "RANTES~GDNF"     
## [544] "RANTES~HGF"       "RANTES~I.309"     "RANTES~IGFBP.2"  
## [547] "RANTES~IL.16"     "RANTES~IL.2"      "RANTES~IP.10"    
## [550] "RANTES~MIF"       "RANTES~MIG"       "RANTES~MIP.3a"   
## [553] "RANTES~NAP.2"     "RANTES~PDGF.BB"   "SCF~ANG"         
## [556] "SCF~CCL11"        "SCF~CCL24"        "SCF~CCL26"       
## [559] "SCF~Ck.b8.1"      "SCF~CSF1"         "SCF~EGF"         
## [562] "SCF~ENA.78"       "SCF~FGF.4"        "SCF~FGF.7"       
## [565] "SCF~GDNF"         "SCF~GRO"          "SCF~HGF"         
## [568] "SCF~I.309"        "SCF~IGFBP.2"      "SCF~IGFBP.3"     
## [571] "SCF~IGFBP.4"      "SCF~IL.15"        "SCF~IL.2"        
## [574] "SCF~MCP.3"        "SCF~MIP.1b"       "SCF~MIP.1d"      
## [577] "SCF~MIP.3a"       "SCF~OPG"          "SCF~PARC"        
## [580] "SCF~PDGF.BB"      "SCF~RANTES"       "SDF.1~CCL26"     
## [583] "SDF.1~Ck.b8.1"    "SDF.1~CSF3"       "SDF.1~FGF.9"     
## [586] "SDF.1~IL.12p70"   "SDF.1~IL.15"      "SDF.1~IL.1b"     
## [589] "SDF.1~IL.3"       "SDF.1~IL.4"       "SDF.1~IL.7"      
## [592] "SDF.1~Leptin"     "SDF.1~MIP.1d"     "SDF.1~MIP.3a"    
## [595] "SDF.1~NT.3"       "SDF.1~OPN"        "SDF.1~PIGF"      
## [598] "TARC~BDNF"        "TARC~CCL24"       "TARC~CCL26"      
## [601] "TARC~EGF"         "TARC~ENA.78"      "TARC~FGF.9"      
## [604] "TARC~GCP.2"       "TARC~GRO"         "TARC~IL.13"      
## [607] "TARC~IL.2"        "TARC~MIP.1b"      "TARC~MIP.3a"     
## [610] "TARC~NT.3"        "TARC~NT.4"        "TARC~PDGF.BB"    
## [613] "TARC~RANTES"      "TGF.b1~CCL11"     "TGF.b1~CSF2"     
## [616] "TGF.b1~CSF3"      "TGF.b1~GCP.2"     "TGF.b1~I.309"    
## [619] "TGF.b1~IFN.g"     "TGF.b1~IL.10"     "TGF.b1~IL.13"    
## [622] "TGF.b1~IL.15"     "TGF.b1~IL.1a"     "TGF.b1~IL.2"     
## [625] "TGF.b1~IL.5"      "TGF.b1~IL.7"      "TGF.b1~IL.8"     
## [628] "TGF.b1~MCP.1"     "TGF.b1~MCP.3"     "TGF.b1~MCP.4"    
## [631] "TGF.b1~MIG"       "TGF.b1~NT.3"      "TGF.b1~PIGF"     
## [634] "TGF.b1~SDF.1"     "TGF.b2~CCL24"     "TGF.b2~CSF1"     
## [637] "TGF.b2~EGF"       "TGF.b2~FGF.4"     "TGF.b2~FGF.9"    
## [640] "TGF.b2~I.309"     "TGF.b2~IGFBP.4"   "TGF.b2~IL.16"    
## [643] "TGF.b2~IL.7"      "TGF.b2~LIF"       "TGF.b2~MCP.3"    
## [646] "TGF.b2~MDC"       "TGF.b2~NT.3"      "TGF.b2~SDF.1"    
## [649] "TGF.b2~TGF.b1"    "TGF.b3~Ck.b8.1"   "TGF.b3~CX3CL1"   
## [652] "TGF.b3~FGF.9"     "TGF.b3~GDNF"      "TGF.b3~I.309"    
## [655] "TGF.b3~IGFBP.1"   "TGF.b3~IGFBP.4"   "TGF.b3~IL.10"    
## [658] "TGF.b3~IL.16"     "TGF.b3~IL.7"      "TGF.b3~LIGHT"    
## [661] "TGF.b3~MCP.3"     "TGF.b3~MDC"       "TGF.b3~OPG"      
## [664] "TGF.b3~OSM"       "TGF.b3~PARC"      "TGF.b3~TGF.b2"   
## [667] "THPO~CCL26"       "THPO~Ck.b8.1"     "THPO~CX3CL1"     
## [670] "THPO~ENA.78"      "THPO~FGF.9"       "THPO~I.309"      
## [673] "THPO~IGFBP.4"     "THPO~IL.16"       "THPO~LIF"        
## [676] "THPO~MCP.3"       "THPO~MDC"         "THPO~MIP.1b"     
## [679] "THPO~NT.4"        "THPO~OSM"         "THPO~PIGF"       
## [682] "THPO~RANTES"      "THPO~TARC"        "THPO~TGF.b2"     
## [685] "THPO~TGF.b3"      "TIMP.1~ENA.78"    "TIMP.1~IGFBP.3"  
## [688] "TIMP.1~IL.12p70"  "TIMP.1~MCP.4"     "TIMP.1~NAP.2"    
## [691] "TIMP.1~OSM"       "TIMP.1~RANTES"    "TIMP.1~TARC"     
## [694] "TIMP.1~THPO"      "TIMP.2~ANG"       "TIMP.2~BDNF"     
## [697] "TIMP.2~CSF1"      "TIMP.2~FGF.4"     "TIMP.2~FGF.7"    
## [700] "TIMP.2~GCP.2"     "TIMP.2~HGF"       "TIMP.2~I.309"    
## [703] "TIMP.2~IFN.g"     "TIMP.2~IGFBP.3"   "TIMP.2~IL.10"    
## [706] "TIMP.2~IL.13"     "TIMP.2~IL.1a"     "TIMP.2~IL.3"     
## [709] "TIMP.2~IL.4"      "TIMP.2~IP.10"     "TIMP.2~MCP.3"    
## [712] "TIMP.2~MIP.1d"    "TIMP.2~MIP.3a"    "TIMP.2~NT.4"     
## [715] "TIMP.2~OPG"       "TIMP.2~PIGF"      "TIMP.2~SCF"      
## [718] "TNF.a~CCL11"      "TNF.a~CSF2"       "TNF.a~CSF3"      
## [721] "TNF.a~FGF.7"      "TNF.a~GCP.2"      "TNF.a~GRO"       
## [724] "TNF.a~GRO.a"      "TNF.a~IFN.g"      "TNF.a~IGFBP.3"   
## [727] "TNF.a~IL.10"      "TNF.a~IL.13"      "TNF.a~IL.15"     
## [730] "TNF.a~IL.16"      "TNF.a~IL.1a"      "TNF.a~IL.1b"     
## [733] "TNF.a~IL.2"       "TNF.a~IL.5"       "TNF.a~IL.6"      
## [736] "TNF.a~IL.7"       "TNF.a~IL.8"       "TNF.a~MCP.1"     
## [739] "TNF.a~MCP.3"      "TNF.a~MIG"        "TNF.a~NAP.2"     
## [742] "TNF.a~NT.3"       "TNF.a~PIGF"       "TNF.a~TGF.b1"    
## [745] "TNF.b~BDNF"       "TNF.b~CCL11"      "TNF.b~CSF1"      
## [748] "TNF.b~CSF2"       "TNF.b~CSF3"       "TNF.b~ENA.78"    
## [751] "TNF.b~GCP.2"      "TNF.b~GRO.a"      "TNF.b~IFN.g"     
## [754] "TNF.b~IL.10"      "TNF.b~IL.13"      "TNF.b~IL.15"     
## [757] "TNF.b~IL.1a"      "TNF.b~IL.2"       "TNF.b~IL.5"      
## [760] "TNF.b~IL.7"       "TNF.b~MCP.1"      "TNF.b~MIG"       
## [763] "TNF.b~NT.3"       "TNF.b~NT.4"       "TNF.b~PIGF"      
## [766] "TNF.b~TARC"       "TNF.b~TGF.b1"     "TNF.b~TNF.a"     
## [769] "VEGF~Ck.b8.1"     "VEGF~CSF2"        "VEGF~CX3CL1"     
## [772] "VEGF~FGF.9"       "VEGF~IGFBP.2"     "VEGF~IL.1b"      
## [775] "VEGF~IL.3"        "VEGF~IL.4"        "VEGF~IL.5"       
## [778] "VEGF~IL.6"        "VEGF~IL.7"        "VEGF~LIF"        
## [781] "VEGF~MIG"         "VEGF~MIP.1b"      "VEGF~NAP.2"      
## [784] "VEGF~NT.3"        "VEGF~NT.4"        "VEGF~OPG"        
## [787] "VEGF~PIGF"        "VEGF~TARC"        "VEGF~TGF.b3"     
## [790] "VEGF~THPO"
## 计算5个组合的交集
sort(intersect(intersect(intersect(intersect(zuheFF,zuheFL),zuheHF),zuheMF),zuheSL))
## character(0)
vcol <- c("red","blue","green","DeepPink","Gold")
T<-venn.diagram(list(Fatal_First=zuheFF,
                     Fatal_Last = zuheFL,
                     Healthy = zuheHF,
                     Mild_First = zuheMF,
                     Severe_Last = zuheSL),
                filename = NULL,lwd = 0.5,
                fill = vcol,alpha = 0.5,margin = 0.1)
grid.draw(T)

## (4)healthy, mild-first, mild-other, fatal-first, fatal-last做一组。

sort(union(union(union(union(zuheFF,zuheFL),zuheHF),zuheMA),zuheMF))
##   [1] "CCL26~BLC"        "Ck.b8.1~CCL26"    "CSF2~BDNF"       
##   [4] "CSF2~CCL11"       "CSF2~Ck.b8.1"     "CSF3~CCL11"      
##   [7] "CSF3~CSF2"        "CX3CL1~ANG"       "CX3CL1~CCL26"    
##  [10] "CX3CL1~Ck.b8.1"   "EGF~BDNF"         "EGF~CCL24"       
##  [13] "EGF~CSF2"         "ENA.78~BDNF"      "ENA.78~CCL11"    
##  [16] "ENA.78~CSF2"      "ENA.78~EGF"       "FGF.4~ANG"       
##  [19] "FGF.4~Ck.b8.1"    "FGF.4~CSF1"       "FGF.6~Ck.b8.1"   
##  [22] "FGF.6~CX3CL1"     "FGF.6~FGF.4"      "FGF.7~CCL26"     
##  [25] "FGF.7~Ck.b8.1"    "FGF.7~FGF.4"      "FGF.9~CCL24"     
##  [28] "FGF.9~CCL26"      "FGF.9~CX3CL1"     "FGF.9~EGF"       
##  [31] "FGF.9~FGF.6"      "Flt.3.LG~FGF.9"   "GCP.2~CCL11"     
##  [34] "GCP.2~CSF2"       "GCP.2~CSF3"       "GDNF~BLC"        
##  [37] "GDNF~CCL24"       "GDNF~CCL26"       "GDNF~CX3CL1"     
##  [40] "GDNF~FGF.4"       "GDNF~Flt.3.LG"    "GRO.a~ANG"       
##  [43] "GRO.a~BDNF"       "GRO.a~BLC"        "GRO.a~CCL24"     
##  [46] "GRO.a~EGF"        "GRO.a~FGF.7"      "GRO.a~FGF.9"     
##  [49] "GRO.a~GCP.2"      "GRO~ANG"          "GRO~BDNF"        
##  [52] "GRO~CSF2"         "GRO~CSF3"         "GRO~EGF"         
##  [55] "GRO~ENA.78"       "GRO~FGF.7"        "HGF~Ck.b8.1"     
##  [58] "HGF~FGF.4"        "HGF~FGF.7"        "HGF~GCP.2"       
##  [61] "I.309~CCL26"      "I.309~Ck.b8.1"    "I.309~CSF3"      
##  [64] "I.309~FGF.4"      "I.309~FGF.6"      "I.309~FGF.7"     
##  [67] "I.309~FGF.9"      "I.309~GDNF"       "I.309~HGF"       
##  [70] "IFN.g~ANG"        "IFN.g~CCL11"      "IFN.g~CSF2"      
##  [73] "IFN.g~CSF3"       "IFN.g~GCP.2"      "IFN.g~GRO.a"     
##  [76] "IFN.g~I.309"      "IGF.I~BLC"        "IGF.I~Ck.b8.1"   
##  [79] "IGF.I~CSF1"       "IGF.I~FGF.7"      "IGF.I~FGF.9"     
##  [82] "IGF.I~GRO.a"      "IGFBP.1~BDNF"     "IGFBP.1~CCL26"   
##  [85] "IGFBP.1~CSF1"     "IGFBP.1~FGF.7"    "IGFBP.1~Flt.3.LG"
##  [88] "IGFBP.1~I.309"    "IGFBP.2~ANG"      "IGFBP.2~BLC"     
##  [91] "IGFBP.2~CCL26"    "IGFBP.2~FGF.7"    "IGFBP.2~GRO"     
##  [94] "IGFBP.2~GRO.a"    "IGFBP.2~I.309"    "IGFBP.2~IGF.I"   
##  [97] "IGFBP.2~IGFBP.1"  "IGFBP.3~CSF2"     "IGFBP.3~CSF3"    
## [100] "IGFBP.3~EGF"      "IGFBP.3~FGF.4"    "IGFBP.3~FGF.7"   
## [103] "IGFBP.3~GCP.2"    "IGFBP.3~GRO"      "IGFBP.3~HGF"     
## [106] "IGFBP.3~I.309"    "IGFBP.3~IGFBP.1"  "IGFBP.4~CCL24"   
## [109] "IGFBP.4~Ck.b8.1"  "IGFBP.4~FGF.4"    "IGFBP.4~Flt.3.LG"
## [112] "IGFBP.4~HGF"      "IGFBP.4~IFN.g"    "IGFBP.4~IGFBP.3" 
## [115] "IL.10~BDNF"       "IL.10~CSF2"       "IL.10~CSF3"      
## [118] "IL.10~ENA.78"     "IL.10~FGF.6"      "IL.10~GRO"       
## [121] "IL.10~GRO.a"      "IL.10~I.309"      "IL.10~IFN.g"     
## [124] "IL.12p70~ANG"     "IL.12p70~CCL11"   "IL.12p70~CCL26"  
## [127] "IL.12p70~CSF3"    "IL.12p70~GRO.a"   "IL.12p70~IGFBP.3"
## [130] "IL.13~CCL11"      "IL.13~CSF2"       "IL.13~CSF3"      
## [133] "IL.13~FGF.6"      "IL.13~GCP.2"      "IL.13~GDNF"      
## [136] "IL.13~I.309"      "IL.13~IFN.g"      "IL.13~IGF.I"     
## [139] "IL.13~IL.10"      "IL.15~ANG"        "IL.15~BDNF"      
## [142] "IL.15~CCL11"      "IL.15~CCL26"      "IL.15~CSF2"      
## [145] "IL.15~CSF3"       "IL.15~EGF"        "IL.15~ENA.78"    
## [148] "IL.15~GCP.2"      "IL.15~GDNF"       "IL.15~GRO"       
## [151] "IL.15~IFN.g"      "IL.15~IGFBP.3"    "IL.15~IL.10"     
## [154] "IL.15~IL.12p70"   "IL.15~IL.13"      "IL.16~Ck.b8.1"   
## [157] "IL.16~FGF.4"      "IL.16~FGF.6"      "IL.16~FGF.7"     
## [160] "IL.16~GRO"        "IL.16~I.309"      "IL.16~IL.12p70"  
## [163] "IL.1a~BDNF"       "IL.1a~CCL11"      "IL.1a~Ck.b8.1"   
## [166] "IL.1a~CSF2"       "IL.1a~CSF3"       "IL.1a~FGF.4"     
## [169] "IL.1a~FGF.6"      "IL.1a~FGF.9"      "IL.1a~GCP.2"     
## [172] "IL.1a~GRO.a"      "IL.1a~IFN.g"      "IL.1a~IGF.I"     
## [175] "IL.1a~IL.10"      "IL.1a~IL.13"      "IL.1a~IL.15"     
## [178] "IL.1b~Ck.b8.1"    "IL.1b~FGF.9"      "IL.1b~I.309"     
## [181] "IL.1b~IL.16"      "IL.2~ANG"         "IL.2~BDNF"       
## [184] "IL.2~CCL11"       "IL.2~CSF2"        "IL.2~CSF3"       
## [187] "IL.2~EGF"         "IL.2~ENA.78"      "IL.2~FGF.7"      
## [190] "IL.2~GRO"         "IL.2~GRO.a"       "IL.2~HGF"        
## [193] "IL.2~I.309"       "IL.2~IFN.g"       "IL.2~IL.10"      
## [196] "IL.2~IL.13"       "IL.2~IL.15"       "IL.2~IL.1a"      
## [199] "IL.3~ANG"         "IL.3~CCL26"       "IL.3~Ck.b8.1"    
## [202] "IL.3~FGF.4"       "IL.3~FGF.9"       "IL.3~GDNF"       
## [205] "IL.3~I.309"       "IL.3~IFN.g"       "IL.3~IGF.I"      
## [208] "IL.3~IGFBP.2"     "IL.3~IL.10"       "IL.3~IL.13"      
## [211] "IL.3~IL.15"       "IL.3~IL.1b"       "IL.4~ANG"        
## [214] "IL.4~CCL26"       "IL.4~Ck.b8.1"     "IL.4~FGF.4"      
## [217] "IL.4~FGF.6"       "IL.4~GCP.2"       "IL.4~IFN.g"      
## [220] "IL.4~IGFBP.2"     "IL.4~IGFBP.3"     "IL.4~IL.12p70"   
## [223] "IL.4~IL.13"       "IL.4~IL.1a"       "IL.4~IL.3"       
## [226] "IL.5~CCL11"       "IL.5~CSF2"        "IL.5~CSF3"       
## [229] "IL.5~ENA.78"      "IL.5~GCP.2"       "IL.5~GRO"        
## [232] "IL.5~HGF"         "IL.5~IFN.g"       "IL.5~IGFBP.3"    
## [235] "IL.5~IL.10"       "IL.5~IL.13"       "IL.5~IL.15"      
## [238] "IL.5~IL.1a"       "IL.5~IL.2"        "IL.5~IL.4"       
## [241] "IL.6~BDNF"        "IL.6~CSF2"        "IL.6~CSF3"       
## [244] "IL.6~EGF"         "IL.6~ENA.78"      "IL.6~Flt.3.LG"   
## [247] "IL.6~GRO"         "IL.6~GRO.a"       "IL.6~IGFBP.3"    
## [250] "IL.6~IGFBP.4"     "IL.6~IL.15"       "IL.6~IL.1a"      
## [253] "IL.6~IL.4"        "IL.6~IL.5"        "IL.7~CCL11"      
## [256] "IL.7~Ck.b8.1"     "IL.7~CSF2"        "IL.7~CSF3"       
## [259] "IL.7~GCP.2"       "IL.7~IFN.g"       "IL.7~IGFBP.4"    
## [262] "IL.7~IL.10"       "IL.7~IL.13"       "IL.7~IL.15"      
## [265] "IL.7~IL.1a"       "IL.7~IL.1b"       "IL.7~IL.2"       
## [268] "IL.7~IL.5"        "IL.7~IL.6"        "IL.8~CSF3"       
## [271] "IL.8~FGF.7"       "IL.8~Flt.3.LG"    "IL.8~GCP.2"      
## [274] "IL.8~GDNF"        "IL.8~GRO"         "IL.8~I.309"      
## [277] "IL.8~IGFBP.3"     "IL.8~IGFBP.4"     "IL.8~IL.10"      
## [280] "IL.8~IL.13"       "IL.8~IL.15"       "IL.8~IL.1b"      
## [283] "IL.8~IL.2"        "IL.8~IL.4"        "IL.8~IL.5"       
## [286] "IL.8~IL.6"        "IP.10~ANG"        "IP.10~Ck.b8.1"   
## [289] "IP.10~CSF1"       "IP.10~EGF"        "IP.10~FGF.4"     
## [292] "IP.10~FGF.6"      "IP.10~IFN.g"      "IP.10~IGFBP.1"   
## [295] "IP.10~IGFBP.3"    "IP.10~IL.12p70"   "IP.10~IL.1a"     
## [298] "IP.10~IL.4"       "Leptin~CCL26"     "Leptin~GDNF"     
## [301] "Leptin~GRO"       "Leptin~HGF"       "Leptin~IFN.g"    
## [304] "Leptin~IGFBP.1"   "Leptin~IGFBP.2"   "Leptin~IGFBP.4"  
## [307] "Leptin~IL.12p70"  "Leptin~IL.2"      "Leptin~IL.4"     
## [310] "Leptin~IP.10"     "LIF~BDNF"         "LIF~CCL24"       
## [313] "LIF~Ck.b8.1"      "LIF~CX3CL1"       "LIF~EGF"         
## [316] "LIF~FGF.6"        "LIF~FGF.9"        "LIF~I.309"       
## [319] "LIF~IGFBP.4"      "LIF~IL.16"        "LIF~IL.1a"       
## [322] "LIF~IL.1b"        "LIGHT~BLC"        "LIGHT~CCL24"     
## [325] "LIGHT~Ck.b8.1"    "LIGHT~CX3CL1"     "LIGHT~FGF.6"     
## [328] "LIGHT~FGF.9"      "LIGHT~GDNF"       "LIGHT~GRO.a"     
## [331] "LIGHT~I.309"      "LIGHT~IGF.I"      "LIGHT~IL.10"     
## [334] "LIGHT~IL.16"      "LIGHT~IL.1b"      "MCP.1~ANG"       
## [337] "MCP.1~BDNF"       "MCP.1~Ck.b8.1"    "MCP.1~CSF2"      
## [340] "MCP.1~CSF3"       "MCP.1~CX3CL1"     "MCP.1~FGF.4"     
## [343] "MCP.1~FGF.6"      "MCP.1~FGF.7"      "MCP.1~GCP.2"     
## [346] "MCP.1~GRO.a"      "MCP.1~IFN.g"      "MCP.1~IL.10"     
## [349] "MCP.1~IL.13"      "MCP.1~IL.16"      "MCP.1~IL.1a"     
## [352] "MCP.1~IL.2"       "MCP.1~IL.3"       "MCP.1~IL.4"      
## [355] "MCP.1~IL.5"       "MCP.1~IL.6"       "MCP.1~IL.7"      
## [358] "MCP.1~IL.8"       "MCP.1~IP.10"      "MCP.2~ANG"       
## [361] "MCP.2~BDNF"       "MCP.2~CSF2"       "MCP.2~EGF"       
## [364] "MCP.2~ENA.78"     "MCP.2~FGF.7"      "MCP.2~Flt.3.LG"  
## [367] "MCP.2~GDNF"       "MCP.2~GRO.a"      "MCP.2~HGF"       
## [370] "MCP.2~IFN.g"      "MCP.2~IL.10"      "MCP.2~IL.4"      
## [373] "MCP.3~BDNF"       "MCP.3~Ck.b8.1"    "MCP.3~CSF3"      
## [376] "MCP.3~CX3CL1"     "MCP.3~EGF"        "MCP.3~FGF.4"     
## [379] "MCP.3~FGF.6"      "MCP.3~FGF.9"      "MCP.3~GCP.2"     
## [382] "MCP.3~HGF"        "MCP.3~I.309"      "MCP.3~IFN.g"     
## [385] "MCP.3~IGFBP.1"    "MCP.3~IGFBP.3"    "MCP.3~IL.16"     
## [388] "MCP.3~IL.1a"      "MCP.3~IL.2"       "MCP.3~IL.4"      
## [391] "MCP.3~IL.8"       "MCP.3~IP.10"      "MCP.3~Leptin"    
## [394] "MCP.3~LIF"        "MCP.3~MCP.1"      "MCP.4~BDNF"      
## [397] "MCP.4~BLC"        "MCP.4~CCL26"      "MCP.4~Ck.b8.1"   
## [400] "MCP.4~CX3CL1"     "MCP.4~FGF.7"      "MCP.4~GRO.a"     
## [403] "MCP.4~HGF"        "MCP.4~I.309"      "MCP.4~IGFBP.2"   
## [406] "MCP.4~IL.10"      "MCP.4~IL.12p70"   "MCP.4~LIGHT"     
## [409] "MCP.4~MCP.2"      "MDC~BLC"          "MDC~CCL26"       
## [412] "MDC~Ck.b8.1"      "MDC~CSF1"         "MDC~CSF2"        
## [415] "MDC~CX3CL1"       "MDC~EGF"          "MDC~FGF.6"       
## [418] "MDC~FGF.9"        "MDC~HGF"          "MDC~I.309"       
## [421] "MDC~IFN.g"        "MDC~IGF.I"        "MDC~IGFBP.4"     
## [424] "MDC~IL.16"        "MDC~IL.1b"        "MDC~IL.2"        
## [427] "MDC~IL.6"         "MDC~Leptin"       "MDC~LIF"         
## [430] "MDC~LIGHT"        "MDC~MCP.2"        "MDC~MCP.3"       
## [433] "MDC~MCP.4"        "MIF~BLC"          "MIF~Ck.b8.1"     
## [436] "MIF~FGF.7"        "MIF~FGF.9"        "MIF~HGF"         
## [439] "MIF~IGF.I"        "MIF~IGFBP.2"      "MIF~IL.16"       
## [442] "MIF~IL.1a"        "MIF~IL.1b"        "MIF~LIGHT"       
## [445] "MIG~CCL11"        "MIG~CCL24"        "MIG~CCL26"       
## [448] "MIG~CSF2"         "MIG~CSF3"         "MIG~EGF"         
## [451] "MIG~FGF.9"        "MIG~GCP.2"        "MIG~GDNF"        
## [454] "MIG~GRO.a"        "MIG~I.309"        "MIG~IFN.g"       
## [457] "MIG~IGF.I"        "MIG~IGFBP.4"      "MIG~IL.10"       
## [460] "MIG~IL.13"        "MIG~IL.15"        "MIG~IL.1a"       
## [463] "MIG~IL.2"         "MIG~IL.4"         "MIG~IL.5"        
## [466] "MIG~IL.7"         "MIG~IP.10"        "MIG~Leptin"      
## [469] "MIG~LIF"          "MIG~MCP.1"        "MIG~MCP.3"       
## [472] "MIG~MDC"          "MIP.1b~BDNF"      "MIP.1b~EGF"      
## [475] "MIP.1b~FGF.4"     "MIP.1b~FGF.6"     "MIP.1b~FGF.9"    
## [478] "MIP.1b~GCP.2"     "MIP.1b~GDNF"      "MIP.1b~HGF"      
## [481] "MIP.1b~IFN.g"     "MIP.1b~IGFBP.1"   "MIP.1b~IGFBP.3"  
## [484] "MIP.1b~IGFBP.4"   "MIP.1b~IL.1a"     "MIP.1b~IL.2"     
## [487] "MIP.1b~IL.4"      "MIP.1b~IP.10"     "MIP.1b~Leptin"   
## [490] "MIP.1b~LIF"       "MIP.1b~LIGHT"     "MIP.1b~MCP.1"    
## [493] "MIP.1b~MCP.3"     "MIP.1b~MDC"       "MIP.1b~MIG"      
## [496] "MIP.1d~CCL24"     "MIP.1d~CCL26"     "MIP.1d~FGF.6"    
## [499] "MIP.1d~I.309"     "MIP.1d~IFN.g"     "MIP.1d~IGF.I"    
## [502] "MIP.1d~IGFBP.4"   "MIP.1d~IL.10"     "MIP.1d~IL.16"    
## [505] "MIP.1d~IP.10"     "MIP.1d~Leptin"    "MIP.1d~LIF"      
## [508] "MIP.1d~LIGHT"     "MIP.1d~MCP.4"     "MIP.1d~MDC"      
## [511] "MIP.1d~MIG"       "MIP.3a~BDNF"      "MIP.3a~Ck.b8.1"  
## [514] "MIP.3a~EGF"       "MIP.3a~ENA.78"    "MIP.3a~FGF.4"    
## [517] "MIP.3a~FGF.7"     "MIP.3a~Flt.3.LG"  "MIP.3a~GCP.2"    
## [520] "MIP.3a~HGF"       "MIP.3a~I.309"     "MIP.3a~IGFBP.3"  
## [523] "MIP.3a~IGFBP.4"   "MIP.3a~IL.2"      "MIP.3a~IL.6"     
## [526] "MIP.3a~IL.8"      "MIP.3a~MCP.3"     "MIP.3a~MIF"      
## [529] "MIP.3a~MIP.1b"    "NAP.2~BDNF"       "NAP.2~CCL24"     
## [532] "NAP.2~CSF2"       "NAP.2~ENA.78"     "NAP.2~FGF.7"     
## [535] "NAP.2~Flt.3.LG"   "NAP.2~GCP.2"      "NAP.2~GRO"       
## [538] "NAP.2~IGFBP.1"    "NAP.2~IL.16"      "NAP.2~IL.1a"     
## [541] "NAP.2~IL.4"       "NAP.2~IL.5"       "NAP.2~IL.6"      
## [544] "NAP.2~MCP.1"      "NAP.2~MCP.2"      "NAP.2~MIG"       
## [547] "NAP.2~MIP.3a"     "NT.3~CCL24"       "NT.3~CSF2"       
## [550] "NT.3~CSF3"        "NT.3~FGF.4"       "NT.3~FGF.6"      
## [553] "NT.3~GCP.2"       "NT.3~GRO.a"       "NT.3~IFN.g"      
## [556] "NT.3~IL.10"       "NT.3~IL.13"       "NT.3~IL.15"      
## [559] "NT.3~IL.1a"       "NT.3~IL.2"        "NT.3~IL.4"       
## [562] "NT.3~IL.5"        "NT.3~IL.7"        "NT.3~IP.10"      
## [565] "NT.3~LIF"         "NT.3~MCP.1"       "NT.3~MCP.3"      
## [568] "NT.3~MIG"         "NT.3~MIP.1b"      "NT.3~NAP.2"      
## [571] "NT.4~BDNF"        "NT.4~CCL24"       "NT.4~CCL26"      
## [574] "NT.4~Ck.b8.1"     "NT.4~CSF2"        "NT.4~EGF"        
## [577] "NT.4~ENA.78"      "NT.4~FGF.6"       "NT.4~FGF.9"      
## [580] "NT.4~GCP.2"       "NT.4~GRO.a"       "NT.4~I.309"      
## [583] "NT.4~IGF.I"       "NT.4~IGFBP.1"     "NT.4~IGFBP.4"    
## [586] "NT.4~IL.16"       "NT.4~IL.1b"       "NT.4~IL.6"       
## [589] "NT.4~LIGHT"       "NT.4~MDC"         "NT.4~MIF"        
## [592] "NT.4~MIP.1d"      "OPG~FGF.4"        "OPG~FGF.7"       
## [595] "OPG~GCP.2"        "OPG~HGF"          "OPG~I.309"       
## [598] "OPG~IGFBP.1"      "OPG~IGFBP.3"      "OPG~IL.10"       
## [601] "OPG~IL.7"         "OPG~IP.10"        "OPG~MCP.2"       
## [604] "OPG~MCP.3"        "OPG~MCP.4"        "OPG~MIP.1b"      
## [607] "OPG~MIP.3a"       "OPG~NT.4"         "OPN~CCL11"       
## [610] "OPN~FGF.6"        "OPN~HGF"          "OPN~IFN.g"       
## [613] "OPN~IGFBP.2"      "OPN~IGFBP.4"      "OPN~IL.1a"       
## [616] "OPN~IL.2"         "OPN~IL.6"         "OPN~IP.10"       
## [619] "OPN~Leptin"       "OPN~MCP.3"        "OPN~MDC"         
## [622] "OPN~MIG"          "OPN~MIP.1d"       "OSM~CCL26"       
## [625] "OSM~Ck.b8.1"      "OSM~CX3CL1"       "OSM~FGF.6"       
## [628] "OSM~FGF.9"        "OSM~GRO.a"        "OSM~I.309"       
## [631] "OSM~IFN.g"        "OSM~IGF.I"        "OSM~IGFBP.2"     
## [634] "OSM~IGFBP.4"      "OSM~IL.12p70"     "OSM~IL.15"       
## [637] "OSM~IL.16"        "OSM~LIF"          "OSM~LIGHT"       
## [640] "OSM~MCP.3"        "OSM~MDC"          "OSM~MIF"         
## [643] "OSM~NT.4"         "PARC~BLC"         "PARC~CCL26"      
## [646] "PARC~Ck.b8.1"     "PARC~FGF.4"       "PARC~FGF.6"      
## [649] "PARC~GDNF"        "PARC~GRO"         "PARC~GRO.a"      
## [652] "PARC~I.309"       "PARC~IGF.I"       "PARC~IGFBP.1"    
## [655] "PARC~IGFBP.2"     "PARC~IL.15"       "PARC~IL.3"       
## [658] "PARC~Leptin"      "PARC~MCP.1"       "PDGF.BB~BDNF"    
## [661] "PDGF.BB~EGF"      "PDGF.BB~ENA.78"   "PDGF.BB~GCP.2"   
## [664] "PDGF.BB~GRO"      "PDGF.BB~IFN.g"    "PDGF.BB~IL.2"    
## [667] "PDGF.BB~IL.6"     "PDGF.BB~MIG"      "PDGF.BB~MIP.3a"  
## [670] "PDGF.BB~NAP.2"    "PDGF.BB~NT.3"     "PDGF.BB~NT.4"    
## [673] "PDGF.BB~OSM"      "PIGF~BLC"         "PIGF~CCL26"      
## [676] "PIGF~CSF2"        "PIGF~CSF3"        "PIGF~CX3CL1"     
## [679] "PIGF~FGF.4"       "PIGF~FGF.9"       "PIGF~GDNF"       
## [682] "PIGF~GRO"         "PIGF~IFN.g"       "PIGF~IL.13"      
## [685] "PIGF~IL.3"        "PIGF~IL.8"        "PIGF~LIF"        
## [688] "PIGF~LIGHT"       "PIGF~MCP.4"       "PIGF~MDC"        
## [691] "PIGF~PARC"        "RANTES~ANG"       "RANTES~CCL11"    
## [694] "RANTES~CCL24"     "RANTES~CCL26"     "RANTES~EGF"      
## [697] "RANTES~ENA.78"    "RANTES~FGF.7"     "RANTES~GDNF"     
## [700] "RANTES~HGF"       "RANTES~I.309"     "RANTES~IGFBP.2"  
## [703] "RANTES~IL.16"     "RANTES~IL.2"      "RANTES~IP.10"    
## [706] "RANTES~MIF"       "RANTES~MIG"       "RANTES~MIP.3a"   
## [709] "RANTES~NAP.2"     "RANTES~PDGF.BB"   "SCF~ANG"         
## [712] "SCF~BDNF"         "SCF~CCL24"        "SCF~CCL26"       
## [715] "SCF~Ck.b8.1"      "SCF~CSF1"         "SCF~CSF2"        
## [718] "SCF~EGF"          "SCF~ENA.78"       "SCF~FGF.4"       
## [721] "SCF~FGF.7"        "SCF~GDNF"         "SCF~GRO"         
## [724] "SCF~HGF"          "SCF~I.309"        "SCF~IGFBP.2"     
## [727] "SCF~IGFBP.3"      "SCF~IGFBP.4"      "SCF~IL.10"       
## [730] "SCF~IL.15"        "SCF~IL.2"         "SCF~IL.5"        
## [733] "SCF~MCP.2"        "SCF~MCP.3"        "SCF~MIP.1b"      
## [736] "SCF~MIP.3a"       "SCF~OPG"          "SCF~PARC"        
## [739] "SCF~PDGF.BB"      "SCF~RANTES"       "SDF.1~CCL26"     
## [742] "SDF.1~Ck.b8.1"    "SDF.1~CSF3"       "SDF.1~CX3CL1"    
## [745] "SDF.1~FGF.6"      "SDF.1~FGF.9"      "SDF.1~IFN.g"     
## [748] "SDF.1~IL.12p70"   "SDF.1~IL.15"      "SDF.1~IL.1b"     
## [751] "SDF.1~IL.3"       "SDF.1~IL.4"       "SDF.1~IL.7"      
## [754] "SDF.1~IP.10"      "SDF.1~Leptin"     "SDF.1~MCP.1"     
## [757] "SDF.1~MCP.3"      "SDF.1~MIP.1b"     "SDF.1~MIP.1d"    
## [760] "SDF.1~NT.3"       "SDF.1~PIGF"       "TARC~BDNF"       
## [763] "TARC~CCL26"       "TARC~CSF2"        "TARC~EGF"        
## [766] "TARC~ENA.78"      "TARC~GCP.2"       "TARC~GRO"        
## [769] "TARC~IL.10"       "TARC~IL.13"       "TARC~IL.15"      
## [772] "TARC~IL.2"        "TARC~IL.5"        "TARC~IL.6"       
## [775] "TARC~MCP.2"       "TARC~MIP.1b"      "TARC~MIP.3a"     
## [778] "TARC~NAP.2"       "TARC~NT.3"        "TARC~NT.4"       
## [781] "TARC~PDGF.BB"     "TARC~RANTES"      "TARC~SCF"        
## [784] "TGF.b1~CCL11"     "TGF.b1~CSF2"      "TGF.b1~CSF3"     
## [787] "TGF.b1~EGF"       "TGF.b1~GCP.2"     "TGF.b1~I.309"    
## [790] "TGF.b1~IFN.g"     "TGF.b1~IGFBP.4"   "TGF.b1~IL.10"    
## [793] "TGF.b1~IL.13"     "TGF.b1~IL.15"     "TGF.b1~IL.1a"    
## [796] "TGF.b1~IL.2"      "TGF.b1~IL.5"      "TGF.b1~IL.7"     
## [799] "TGF.b1~IL.8"      "TGF.b1~Leptin"    "TGF.b1~LIF"      
## [802] "TGF.b1~MCP.1"     "TGF.b1~MCP.3"     "TGF.b1~MCP.4"    
## [805] "TGF.b1~MDC"       "TGF.b1~MIG"       "TGF.b1~MIP.1d"   
## [808] "TGF.b1~NT.3"      "TGF.b1~OPN"       "TGF.b1~PDGF.BB"  
## [811] "TGF.b1~PIGF"      "TGF.b1~SDF.1"     "TGF.b2~CCL24"    
## [814] "TGF.b2~CSF1"      "TGF.b2~EGF"       "TGF.b2~FGF.4"    
## [817] "TGF.b2~FGF.9"     "TGF.b2~I.309"     "TGF.b2~IGFBP.4"  
## [820] "TGF.b2~IL.16"     "TGF.b2~IL.1b"     "TGF.b2~IL.7"     
## [823] "TGF.b2~LIF"       "TGF.b2~MCP.3"     "TGF.b2~MDC"      
## [826] "TGF.b2~NT.3"      "TGF.b2~SDF.1"     "TGF.b2~TGF.b1"   
## [829] "TGF.b3~Ck.b8.1"   "TGF.b3~CX3CL1"    "TGF.b3~FGF.9"    
## [832] "TGF.b3~GDNF"      "TGF.b3~I.309"     "TGF.b3~IGFBP.1"  
## [835] "TGF.b3~IGFBP.2"   "TGF.b3~IGFBP.4"   "TGF.b3~IL.10"    
## [838] "TGF.b3~IL.16"     "TGF.b3~IL.7"      "TGF.b3~LIGHT"    
## [841] "TGF.b3~MCP.3"     "TGF.b3~MDC"       "TGF.b3~MIF"      
## [844] "TGF.b3~OPG"       "TGF.b3~OSM"       "TGF.b3~PARC"     
## [847] "TGF.b3~TGF.b2"    "THPO~BLC"         "THPO~CCL26"      
## [850] "THPO~Ck.b8.1"     "THPO~CX3CL1"      "THPO~ENA.78"     
## [853] "THPO~FGF.9"       "THPO~GCP.2"       "THPO~I.309"      
## [856] "THPO~IGFBP.4"     "THPO~IL.16"       "THPO~LIF"        
## [859] "THPO~MCP.3"       "THPO~MCP.4"       "THPO~MDC"        
## [862] "THPO~MIP.1b"      "THPO~NT.4"        "THPO~OSM"        
## [865] "THPO~PIGF"        "THPO~RANTES"      "THPO~TARC"       
## [868] "THPO~TGF.b2"      "THPO~TGF.b3"      "TIMP.1~CCL11"    
## [871] "TIMP.1~ENA.78"    "TIMP.1~IGFBP.3"   "TIMP.1~IL.12p70" 
## [874] "TIMP.1~MCP.4"     "TIMP.1~NAP.2"     "TIMP.1~OSM"      
## [877] "TIMP.1~RANTES"    "TIMP.1~TARC"      "TIMP.1~THPO"     
## [880] "TIMP.2~ANG"       "TIMP.2~BDNF"      "TIMP.2~Ck.b8.1"  
## [883] "TIMP.2~CSF1"      "TIMP.2~FGF.4"     "TIMP.2~FGF.6"    
## [886] "TIMP.2~FGF.7"     "TIMP.2~GCP.2"     "TIMP.2~HGF"      
## [889] "TIMP.2~I.309"     "TIMP.2~IFN.g"     "TIMP.2~IGFBP.3"  
## [892] "TIMP.2~IL.10"     "TIMP.2~IL.13"     "TIMP.2~IL.16"    
## [895] "TIMP.2~IL.1a"     "TIMP.2~IL.3"      "TIMP.2~IL.4"     
## [898] "TIMP.2~IP.10"     "TIMP.2~MCP.1"     "TIMP.2~MCP.3"    
## [901] "TIMP.2~MIF"       "TIMP.2~MIP.1d"    "TIMP.2~MIP.3a"   
## [904] "TIMP.2~NT.4"      "TIMP.2~OPG"       "TIMP.2~PIGF"     
## [907] "TIMP.2~SCF"       "TIMP.2~TGF.b3"    "TNF.a~CCL11"     
## [910] "TNF.a~CSF2"       "TNF.a~CSF3"       "TNF.a~FGF.4"     
## [913] "TNF.a~FGF.6"      "TNF.a~FGF.7"      "TNF.a~GCP.2"     
## [916] "TNF.a~GRO"        "TNF.a~GRO.a"      "TNF.a~IFN.g"     
## [919] "TNF.a~IGFBP.3"    "TNF.a~IL.10"      "TNF.a~IL.13"     
## [922] "TNF.a~IL.15"      "TNF.a~IL.16"      "TNF.a~IL.1a"     
## [925] "TNF.a~IL.1b"      "TNF.a~IL.2"       "TNF.a~IL.4"      
## [928] "TNF.a~IL.5"       "TNF.a~IL.7"       "TNF.a~IL.8"      
## [931] "TNF.a~IP.10"      "TNF.a~Leptin"     "TNF.a~LIF"       
## [934] "TNF.a~MCP.1"      "TNF.a~MCP.3"      "TNF.a~MDC"       
## [937] "TNF.a~MIG"        "TNF.a~MIP.1b"     "TNF.a~NAP.2"     
## [940] "TNF.a~NT.3"       "TNF.a~OPN"        "TNF.a~PDGF.BB"   
## [943] "TNF.a~PIGF"       "TNF.a~SDF.1"      "TNF.a~TGF.b1"    
## [946] "TNF.b~BDNF"       "TNF.b~CCL11"      "TNF.b~CSF2"      
## [949] "TNF.b~CSF3"       "TNF.b~ENA.78"     "TNF.b~FGF.4"     
## [952] "TNF.b~FGF.6"      "TNF.b~GCP.2"      "TNF.b~GRO.a"     
## [955] "TNF.b~IFN.g"      "TNF.b~IL.10"      "TNF.b~IL.13"     
## [958] "TNF.b~IL.15"      "TNF.b~IL.1a"      "TNF.b~IL.2"      
## [961] "TNF.b~IL.5"       "TNF.b~IL.7"       "TNF.b~IP.10"     
## [964] "TNF.b~LIF"        "TNF.b~MCP.1"      "TNF.b~MCP.3"     
## [967] "TNF.b~MIG"        "TNF.b~MIP.1b"     "TNF.b~NT.3"      
## [970] "TNF.b~NT.4"       "TNF.b~PIGF"       "TNF.b~TARC"      
## [973] "TNF.b~TGF.b1"     "TNF.b~TNF.a"      "VEGF~Ck.b8.1"    
## [976] "VEGF~CSF2"        "VEGF~CX3CL1"      "VEGF~FGF.4"      
## [979] "VEGF~FGF.9"       "VEGF~IGFBP.2"     "VEGF~IL.1b"      
## [982] "VEGF~IL.3"        "VEGF~IL.4"        "VEGF~IL.5"       
## [985] "VEGF~IL.6"        "VEGF~IL.7"        "VEGF~LIF"        
## [988] "VEGF~MIG"         "VEGF~MIP.1b"      "VEGF~MIP.3a"     
## [991] "VEGF~NAP.2"       "VEGF~NT.3"        "VEGF~NT.4"       
## [994] "VEGF~OPG"         "VEGF~PIGF"        "VEGF~TARC"       
## [997] "VEGF~TGF.b3"      "VEGF~THPO"        "VEGF~TNF.b"
## 计算5个组合的交集
sort(intersect(intersect(intersect(intersect(zuheFF,zuheFL),zuheHF),zuheMA),zuheMF))
## character(0)
vcol <- c("red","blue","green","DeepPink","Gold")
T<-venn.diagram(list(Fatal_First=zuheFF,
                     Fatal_Last = zuheFL,
                     Healthy = zuheHF,
                     Mild_Other = zuheMA,
                     Mild_First = zuheMF),
                filename = NULL,lwd = 0.5,
                fill = vcol,alpha = 0.5,margin = 0.1)
grid.draw(T)

## (5)healthy, severe-first, severe-other, severe-last, fatal-last做一组。
sort(union(union(union(union(zuheFL,zuheHF),zuheSA),zuheSF),zuheSL))
##   [1] "Ck.b8.1~BLC"      "Ck.b8.1~CCL26"    "CSF1~BLC"        
##   [4] "CSF1~CCL26"       "CSF1~Ck.b8.1"     "CSF2~CCL11"      
##   [7] "CSF2~Ck.b8.1"     "CSF3~BLC"         "CSF3~CCL11"      
##  [10] "CSF3~CCL26"       "CSF3~CSF2"        "CX3CL1~CCL26"    
##  [13] "CX3CL1~Ck.b8.1"   "EGF~BDNF"         "EGF~CCL24"       
##  [16] "ENA.78~BDNF"      "ENA.78~EGF"       "FGF.4~CCL26"     
##  [19] "FGF.4~Ck.b8.1"    "FGF.4~CSF1"       "FGF.4~CSF3"      
##  [22] "FGF.6~BLC"        "FGF.6~CCL26"      "FGF.6~Ck.b8.1"   
##  [25] "FGF.6~CSF1"       "FGF.6~CSF2"       "FGF.6~CSF3"      
##  [28] "FGF.6~CX3CL1"     "FGF.6~FGF.4"      "FGF.7~BLC"       
##  [31] "FGF.7~CCL26"      "FGF.7~CSF1"       "FGF.7~CSF2"      
##  [34] "FGF.7~CSF3"       "FGF.7~FGF.4"      "FGF.7~FGF.6"     
##  [37] "FGF.9~CCL26"      "FGF.9~EGF"        "FGF.9~FGF.4"     
##  [40] "FGF.9~FGF.6"      "FGF.9~FGF.7"      "GCP.2~BLC"       
##  [43] "GCP.2~CCL11"      "GCP.2~CCL26"      "GCP.2~CSF1"      
##  [46] "GCP.2~CSF2"       "GCP.2~CSF3"       "GCP.2~FGF.7"     
##  [49] "GDNF~CCL26"       "GDNF~CSF1"        "GDNF~CSF2"       
##  [52] "GDNF~CSF3"        "GDNF~CX3CL1"      "GDNF~FGF.4"      
##  [55] "GDNF~FGF.6"       "GDNF~FGF.7"       "GDNF~GCP.2"      
##  [58] "GRO.a~BDNF"       "GRO.a~BLC"        "GRO.a~CCL24"     
##  [61] "GRO.a~CSF2"       "GRO.a~CSF3"       "GRO.a~EGF"       
##  [64] "GRO.a~FGF.6"      "GRO.a~FGF.7"      "GRO~ANG"         
##  [67] "GRO~BDNF"         "GRO~BLC"          "GRO~EGF"         
##  [70] "HGF~FGF.7"        "I.309~BLC"        "I.309~CCL26"     
##  [73] "I.309~Ck.b8.1"    "I.309~CSF1"       "I.309~CSF3"      
##  [76] "I.309~FGF.4"      "I.309~FGF.6"      "I.309~FGF.7"     
##  [79] "I.309~FGF.9"      "I.309~GCP.2"      "I.309~GDNF"      
##  [82] "IFN.g~CCL11"      "IFN.g~CSF2"       "IFN.g~CSF3"      
##  [85] "IFN.g~FGF.7"      "IFN.g~GCP.2"      "IFN.g~GDNF"      
##  [88] "IFN.g~GRO.a"      "IGF.I~BLC"        "IGF.I~Ck.b8.1"   
##  [91] "IGF.I~CSF1"       "IGF.I~FGF.7"      "IGF.I~GCP.2"     
##  [94] "IGF.I~GDNF"       "IGF.I~I.309"      "IGFBP.1~CCL26"   
##  [97] "IGFBP.1~CX3CL1"   "IGFBP.1~FGF.7"    "IGFBP.1~Flt.3.LG"
## [100] "IGFBP.2~ANG"      "IGFBP.2~FGF.7"    "IGFBP.2~IGFBP.1" 
## [103] "IGFBP.3~GCP.2"    "IGFBP.4~BLC"      "IGFBP.4~CCL26"   
## [106] "IGFBP.4~Ck.b8.1"  "IGFBP.4~CSF1"     "IGFBP.4~CX3CL1"  
## [109] "IGFBP.4~FGF.4"    "IGFBP.4~FGF.6"    "IGFBP.4~FGF.7"   
## [112] "IGFBP.4~Flt.3.LG" "IGFBP.4~GCP.2"    "IGFBP.4~GDNF"    
## [115] "IGFBP.4~I.309"    "IGFBP.4~IGF.I"    "IGFBP.4~IGFBP.3" 
## [118] "IL.10~FGF.6"      "IL.12p70~CCL26"   "IL.12p70~CSF3"   
## [121] "IL.12p70~GRO.a"   "IL.13~CCL11"      "IL.13~CSF2"      
## [124] "IL.13~CSF3"       "IL.13~FGF.6"      "IL.13~FGF.7"     
## [127] "IL.13~GCP.2"      "IL.13~GDNF"       "IL.13~GRO.a"     
## [130] "IL.13~IFN.g"      "IL.13~IGF.I"      "IL.15~CCL11"     
## [133] "IL.15~CSF2"       "IL.15~CSF3"       "IL.15~FGF.6"     
## [136] "IL.15~FGF.7"      "IL.15~GCP.2"      "IL.15~GDNF"      
## [139] "IL.15~GRO.a"      "IL.15~IFN.g"      "IL.15~IL.12p70"  
## [142] "IL.15~IL.13"      "IL.16~Ck.b8.1"    "IL.16~FGF.4"     
## [145] "IL.16~FGF.6"      "IL.16~I.309"      "IL.16~IL.10"     
## [148] "IL.1a~BLC"        "IL.1a~CCL11"      "IL.1a~CCL26"     
## [151] "IL.1a~Ck.b8.1"    "IL.1a~CSF1"       "IL.1a~CSF2"      
## [154] "IL.1a~CSF3"       "IL.1a~FGF.4"      "IL.1a~FGF.6"     
## [157] "IL.1a~FGF.7"      "IL.1a~GCP.2"      "IL.1a~GDNF"      
## [160] "IL.1a~I.309"      "IL.1a~IFN.g"      "IL.1a~IGF.I"     
## [163] "IL.1a~IGFBP.4"    "IL.1a~IL.13"      "IL.1a~IL.15"     
## [166] "IL.1b~Ck.b8.1"    "IL.1b~FGF.9"      "IL.1b~I.309"     
## [169] "IL.1b~IGF.I"      "IL.1b~IGFBP.4"    "IL.1b~IL.16"     
## [172] "IL.1b~IL.1a"      "IL.2~ANG"         "IL.2~BDNF"       
## [175] "IL.2~CCL11"       "IL.2~CSF2"        "IL.2~CSF3"       
## [178] "IL.2~EGF"         "IL.2~ENA.78"      "IL.2~FGF.6"      
## [181] "IL.2~FGF.7"       "IL.2~GCP.2"       "IL.2~GDNF"       
## [184] "IL.2~GRO"         "IL.2~GRO.a"       "IL.2~IFN.g"      
## [187] "IL.2~IGF.I"       "IL.2~IL.13"       "IL.2~IL.15"      
## [190] "IL.2~IL.1a"       "IL.2~IL.1b"       "IL.3~CCL26"      
## [193] "IL.3~CSF1"        "IL.3~CSF3"        "IL.3~FGF.4"      
## [196] "IL.3~FGF.6"       "IL.3~FGF.7"       "IL.3~FGF.9"      
## [199] "IL.3~GCP.2"       "IL.3~GDNF"        "IL.3~I.309"      
## [202] "IL.3~IGF.I"       "IL.3~IGFBP.4"     "IL.3~IL.10"      
## [205] "IL.3~IL.1a"       "IL.3~IL.1b"       "IL.4~CCL26"      
## [208] "IL.4~CSF1"        "IL.4~FGF.4"       "IL.4~FGF.6"      
## [211] "IL.4~FGF.7"       "IL.4~FGF.9"       "IL.4~GCP.2"      
## [214] "IL.4~GDNF"        "IL.4~I.309"       "IL.4~IFN.g"      
## [217] "IL.4~IGF.I"       "IL.4~IGFBP.1"     "IL.4~IGFBP.3"    
## [220] "IL.4~IGFBP.4"     "IL.4~IL.1a"       "IL.4~IL.1b"      
## [223] "IL.4~IL.2"        "IL.4~IL.3"        "IL.5~CCL11"      
## [226] "IL.5~Ck.b8.1"     "IL.5~CSF1"        "IL.5~CSF2"       
## [229] "IL.5~CSF3"        "IL.5~FGF.4"       "IL.5~FGF.6"      
## [232] "IL.5~FGF.7"       "IL.5~GCP.2"       "IL.5~GDNF"       
## [235] "IL.5~IFN.g"       "IL.5~IGF.I"       "IL.5~IGFBP.3"    
## [238] "IL.5~IL.13"       "IL.5~IL.15"       "IL.5~IL.1a"      
## [241] "IL.5~IL.2"        "IL.5~IL.3"        "IL.5~IL.4"       
## [244] "IL.6~BDNF"        "IL.6~CSF2"        "IL.6~CSF3"       
## [247] "IL.6~FGF.4"       "IL.6~Flt.3.LG"    "IL.6~GCP.2"      
## [250] "IL.6~GDNF"        "IL.6~GRO.a"       "IL.6~IGFBP.4"    
## [253] "IL.6~IL.13"       "IL.6~IL.1a"       "IL.6~IL.4"       
## [256] "IL.6~IL.5"        "IL.7~CCL11"       "IL.7~Ck.b8.1"    
## [259] "IL.7~CSF2"        "IL.7~CSF3"        "IL.7~GCP.2"      
## [262] "IL.7~IFN.g"       "IL.7~IGFBP.4"     "IL.7~IL.13"      
## [265] "IL.7~IL.15"       "IL.7~IL.1a"       "IL.7~IL.2"       
## [268] "IL.7~IL.5"        "IL.8~CX3CL1"      "IL.8~Flt.3.LG"   
## [271] "IL.8~GCP.2"       "IL.8~IGFBP.3"     "IL.8~IGFBP.4"    
## [274] "IL.8~IL.4"        "IL.8~IL.5"        "IL.8~IL.6"       
## [277] "IP.10~EGF"        "Leptin~CCL26"     "Leptin~GDNF"     
## [280] "Leptin~IGFBP.1"   "LIF~CCL26"        "LIF~Ck.b8.1"     
## [283] "LIF~CX3CL1"       "LIF~EGF"          "LIF~FGF.4"       
## [286] "LIF~FGF.6"        "LIF~FGF.7"        "LIF~FGF.9"       
## [289] "LIF~I.309"        "LIF~IL.16"        "LIF~IL.1b"       
## [292] "LIF~IL.3"         "LIF~IL.4"         "LIGHT~CCL26"     
## [295] "LIGHT~Ck.b8.1"    "LIGHT~CSF2"       "LIGHT~CSF3"      
## [298] "LIGHT~CX3CL1"     "LIGHT~FGF.4"      "LIGHT~FGF.6"     
## [301] "LIGHT~FGF.7"      "LIGHT~FGF.9"      "LIGHT~GDNF"      
## [304] "LIGHT~GRO.a"      "LIGHT~I.309"      "LIGHT~IL.10"     
## [307] "LIGHT~IL.16"      "LIGHT~IL.1a"      "LIGHT~IL.1b"     
## [310] "LIGHT~IL.3"       "LIGHT~IL.5"       "MCP.1~ANG"       
## [313] "MCP.1~BDNF"       "MCP.1~GCP.2"      "MCP.1~GRO.a"     
## [316] "MCP.1~IL.2"       "MCP.1~IL.4"       "MCP.1~IL.5"      
## [319] "MCP.1~IL.6"       "MCP.1~IL.8"       "MCP.2~FGF.7"     
## [322] "MCP.2~GRO.a"      "MCP.2~HGF"        "MCP.2~IL.7"      
## [325] "MCP.3~BLC"        "MCP.3~CCL26"      "MCP.3~Ck.b8.1"   
## [328] "MCP.3~CSF1"       "MCP.3~CX3CL1"     "MCP.3~EGF"       
## [331] "MCP.3~FGF.4"      "MCP.3~FGF.6"      "MCP.3~FGF.7"     
## [334] "MCP.3~FGF.9"      "MCP.3~GDNF"       "MCP.3~I.309"     
## [337] "MCP.3~IGFBP.3"    "MCP.3~IL.16"      "MCP.3~IL.1a"     
## [340] "MCP.3~IL.3"       "MCP.3~IL.4"       "MCP.3~IL.8"      
## [343] "MCP.3~LIF"        "MCP.4~BLC"        "MCP.4~CCL26"     
## [346] "MCP.4~Ck.b8.1"    "MCP.4~CSF1"       "MCP.4~CX3CL1"    
## [349] "MCP.4~FGF.4"      "MCP.4~FGF.7"      "MCP.4~GCP.2"     
## [352] "MCP.4~HGF"        "MCP.4~I.309"      "MCP.4~IGF.I"     
## [355] "MCP.4~IGFBP.4"    "MCP.4~IL.10"      "MCP.4~IL.1a"     
## [358] "MCP.4~IL.1b"      "MCP.4~MCP.2"      "MCP.4~MCP.3"     
## [361] "MDC~BLC"          "MDC~CCL26"        "MDC~Ck.b8.1"     
## [364] "MDC~CSF1"         "MDC~CSF3"         "MDC~FGF.4"       
## [367] "MDC~FGF.6"        "MDC~FGF.7"        "MDC~FGF.9"       
## [370] "MDC~GDNF"         "MDC~GRO"          "MDC~GRO.a"       
## [373] "MDC~I.309"        "MDC~IGFBP.4"      "MDC~IL.16"       
## [376] "MDC~IL.1a"        "MDC~IL.1b"        "MDC~IL.3"        
## [379] "MDC~IL.4"         "MDC~LIF"          "MDC~LIGHT"       
## [382] "MDC~MCP.2"        "MDC~MCP.3"        "MIF~BLC"         
## [385] "MIF~IGFBP.2"      "MIF~IL.16"        "MIF~IL.1b"       
## [388] "MIF~LIGHT"        "MIG~CCL11"        "MIG~CSF1"        
## [391] "MIG~CSF2"         "MIG~CSF3"         "MIG~FGF.6"       
## [394] "MIG~FGF.7"        "MIG~FGF.9"        "MIG~GCP.2"       
## [397] "MIG~GDNF"         "MIG~I.309"        "MIG~IFN.g"       
## [400] "MIG~IGF.I"        "MIG~IGFBP.4"      "MIG~IL.13"       
## [403] "MIG~IL.15"        "MIG~IL.1a"        "MIG~IL.1b"       
## [406] "MIG~IL.2"         "MIG~IL.3"         "MIG~IL.4"        
## [409] "MIG~IL.5"         "MIG~IL.7"         "MIG~MCP.3"       
## [412] "MIP.1b~CX3CL1"    "MIP.1b~EGF"       "MIP.1b~FGF.9"    
## [415] "MIP.1b~GDNF"      "MIP.1b~IGFBP.4"   "MIP.1b~IL.4"     
## [418] "MIP.1b~IL.8"      "MIP.1b~LIF"       "MIP.1d~CCL11"    
## [421] "MIP.1d~FGF.6"     "MIP.1d~I.309"     "MIP.1d~IL.10"    
## [424] "MIP.1d~IL.16"     "MIP.1d~IP.10"     "MIP.1d~LIGHT"    
## [427] "MIP.1d~MCP.4"     "MIP.1d~MDC"       "MIP.3a~BDNF"     
## [430] "MIP.3a~EGF"       "MIP.3a~ENA.78"    "MIP.3a~Flt.3.LG" 
## [433] "MIP.3a~IGFBP.4"   "MIP.3a~IL.1a"     "MIP.3a~IL.2"     
## [436] "MIP.3a~IL.6"      "MIP.3a~IL.8"      "MIP.3a~MCP.3"    
## [439] "NAP.2~GCP.2"      "NAP.2~GRO"        "NAP.2~IL.1a"     
## [442] "NAP.2~IL.4"       "NAP.2~IL.5"       "NAP.2~IL.6"      
## [445] "NAP.2~IL.7"       "NAP.2~MCP.1"      "NAP.2~MIG"       
## [448] "NT.3~CCL24"       "NT.3~FGF.6"       "NT.3~I.309"      
## [451] "NT.3~IGFBP.4"     "NT.3~IL.13"       "NT.3~IL.15"      
## [454] "NT.3~IL.1a"       "NT.3~IL.1b"       "NT.3~IL.4"       
## [457] "NT.3~IL.7"        "NT.3~LIF"         "NT.3~MCP.1"      
## [460] "NT.3~MCP.3"       "NT.3~MIG"         "NT.3~MIP.3a"     
## [463] "NT.4~BDNF"        "NT.4~CCL26"       "NT.4~Ck.b8.1"    
## [466] "NT.4~CSF1"        "NT.4~CSF2"        "NT.4~EGF"        
## [469] "NT.4~ENA.78"      "NT.4~FGF.4"       "NT.4~FGF.6"      
## [472] "NT.4~FGF.7"       "NT.4~FGF.9"       "NT.4~GDNF"       
## [475] "NT.4~GRO.a"       "NT.4~I.309"       "NT.4~IGF.I"      
## [478] "NT.4~IGFBP.4"     "NT.4~IL.16"       "NT.4~IL.1a"      
## [481] "NT.4~IL.1b"       "NT.4~IL.3"        "NT.4~IL.4"       
## [484] "NT.4~IL.5"        "NT.4~IL.6"        "NT.4~LIF"        
## [487] "NT.4~LIGHT"       "NT.4~MCP.3"       "NT.4~MCP.4"      
## [490] "NT.4~MDC"         "NT.4~MIF"         "NT.4~MIG"        
## [493] "NT.4~MIP.1d"      "OPG~HGF"          "OPG~I.309"       
## [496] "OPG~IGFBP.3"      "OPG~IGFBP.4"      "OPG~IL.10"       
## [499] "OPG~MCP.2"        "OPG~MCP.4"        "OPG~MIP.3a"      
## [502] "OPN~FGF.6"        "OPN~IGFBP.2"      "OPN~IL.1a"       
## [505] "OPN~IL.6"         "OPN~MIP.1d"       "OSM~CCL26"       
## [508] "OSM~Ck.b8.1"      "OSM~CSF1"         "OSM~CX3CL1"      
## [511] "OSM~FGF.4"        "OSM~FGF.6"        "OSM~FGF.7"       
## [514] "OSM~FGF.9"        "OSM~GCP.2"        "OSM~GDNF"        
## [517] "OSM~I.309"        "OSM~IFN.g"        "OSM~IGF.I"       
## [520] "OSM~IGFBP.4"      "OSM~IL.12p70"     "OSM~IL.15"       
## [523] "OSM~IL.16"        "OSM~IL.1a"        "OSM~IL.1b"       
## [526] "OSM~IL.3"         "OSM~IL.4"         "OSM~LIF"         
## [529] "OSM~LIGHT"        "OSM~MCP.3"        "OSM~MCP.4"       
## [532] "OSM~MDC"          "OSM~MIG"          "OSM~NT.3"        
## [535] "OSM~NT.4"         "PARC~CCL26"       "PARC~Ck.b8.1"    
## [538] "PARC~CSF1"        "PARC~CSF2"        "PARC~CSF3"       
## [541] "PARC~FGF.4"       "PARC~FGF.6"       "PARC~FGF.7"      
## [544] "PARC~GCP.2"       "PARC~GDNF"        "PARC~GRO.a"      
## [547] "PARC~I.309"       "PARC~IFN.g"       "PARC~IGF.I"      
## [550] "PARC~IGFBP.1"     "PARC~IL.15"       "PARC~IL.1a"      
## [553] "PARC~IL.1b"       "PARC~IL.2"        "PARC~IL.3"       
## [556] "PARC~IL.4"        "PARC~IL.5"        "PARC~IL.6"       
## [559] "PARC~IL.7"        "PARC~Leptin"      "PARC~LIGHT"      
## [562] "PARC~MIG"         "PARC~NT.4"        "PARC~OSM"        
## [565] "PDGF.BB~BDNF"     "PDGF.BB~CSF2"     "PDGF.BB~EGF"     
## [568] "PDGF.BB~ENA.78"   "PDGF.BB~GCP.2"    "PDGF.BB~GRO"     
## [571] "PDGF.BB~IL.13"    "PDGF.BB~IL.15"    "PDGF.BB~IL.2"    
## [574] "PDGF.BB~IL.7"     "PDGF.BB~MIP.3a"   "PDGF.BB~NAP.2"   
## [577] "PDGF.BB~NT.4"     "PIGF~CCL26"       "PIGF~Ck.b8.1"    
## [580] "PIGF~CSF1"        "PIGF~CSF2"        "PIGF~CSF3"       
## [583] "PIGF~CX3CL1"      "PIGF~FGF.4"       "PIGF~FGF.6"      
## [586] "PIGF~FGF.7"       "PIGF~FGF.9"       "PIGF~GCP.2"      
## [589] "PIGF~GDNF"        "PIGF~I.309"       "PIGF~IFN.g"      
## [592] "PIGF~IGFBP.4"     "PIGF~IL.1a"       "PIGF~IL.3"       
## [595] "PIGF~IL.4"        "PIGF~IL.5"        "PIGF~LIF"        
## [598] "PIGF~LIGHT"       "PIGF~MCP.3"       "PIGF~MCP.4"      
## [601] "PIGF~MDC"         "PIGF~MIG"         "PIGF~NT.4"       
## [604] "PIGF~OSM"         "PIGF~PARC"        "RANTES~CCL24"    
## [607] "RANTES~EGF"       "RANTES~ENA.78"    "RANTES~IL.2"     
## [610] "RANTES~IP.10"     "RANTES~MIP.3a"    "RANTES~NAP.2"    
## [613] "RANTES~PDGF.BB"   "SCF~ANG"          "SCF~CCL11"       
## [616] "SCF~CCL26"        "SCF~CSF1"         "SCF~EGF"         
## [619] "SCF~ENA.78"       "SCF~FGF.4"        "SCF~FGF.6"       
## [622] "SCF~FGF.7"        "SCF~FGF.9"        "SCF~GDNF"        
## [625] "SCF~GRO"          "SCF~I.309"        "SCF~IGFBP.2"     
## [628] "SCF~IL.1a"        "SCF~IL.2"         "SCF~IL.3"        
## [631] "SCF~IL.4"         "SCF~LIF"          "SCF~LIGHT"       
## [634] "SCF~MCP.3"        "SCF~MDC"          "SCF~MIP.1d"      
## [637] "SCF~MIP.3a"       "SCF~NT.3"         "SCF~NT.4"        
## [640] "SCF~OSM"          "SCF~PDGF.BB"      "SCF~PIGF"        
## [643] "SCF~RANTES"       "SDF.1~CCL26"      "SDF.1~Ck.b8.1"   
## [646] "SDF.1~CSF3"       "SDF.1~FGF.4"      "SDF.1~FGF.6"     
## [649] "SDF.1~FGF.7"      "SDF.1~FGF.9"      "SDF.1~GDNF"      
## [652] "SDF.1~I.309"      "SDF.1~IGF.I"      "SDF.1~IGFBP.4"   
## [655] "SDF.1~IL.15"      "SDF.1~IL.1a"      "SDF.1~IL.1b"     
## [658] "SDF.1~IL.3"       "SDF.1~IL.4"       "SDF.1~IL.7"      
## [661] "SDF.1~Leptin"     "SDF.1~LIF"        "SDF.1~MCP.3"     
## [664] "SDF.1~MDC"        "SDF.1~MIG"        "SDF.1~MIP.3a"    
## [667] "SDF.1~NT.3"       "SDF.1~NT.4"       "SDF.1~OPN"       
## [670] "SDF.1~PARC"       "SDF.1~PIGF"       "SDF.1~SCF"       
## [673] "TARC~BDNF"        "TARC~CCL24"       "TARC~CCL26"      
## [676] "TARC~EGF"         "TARC~ENA.78"      "TARC~FGF.9"      
## [679] "TARC~GRO"         "TARC~IL.13"       "TARC~IL.2"       
## [682] "TARC~MIP.1b"      "TARC~MIP.3a"      "TARC~PDGF.BB"    
## [685] "TGF.b1~CCL11"     "TGF.b1~CSF2"      "TGF.b1~CSF3"     
## [688] "TGF.b1~FGF.6"     "TGF.b1~GCP.2"     "TGF.b1~GRO.a"    
## [691] "TGF.b1~IFN.g"     "TGF.b1~IL.13"     "TGF.b1~IL.15"    
## [694] "TGF.b1~IL.1a"     "TGF.b1~IL.2"      "TGF.b1~IL.5"     
## [697] "TGF.b1~IL.7"      "TGF.b1~MIG"       "TGF.b1~NT.3"     
## [700] "TGF.b1~PARC"      "TGF.b1~PDGF.BB"   "TGF.b1~PIGF"     
## [703] "TGF.b1~SDF.1"     "TGF.b2~CCL26"     "TGF.b2~Ck.b8.1"  
## [706] "TGF.b2~CSF1"      "TGF.b2~EGF"       "TGF.b2~FGF.4"    
## [709] "TGF.b2~FGF.6"     "TGF.b2~FGF.7"     "TGF.b2~FGF.9"    
## [712] "TGF.b2~GDNF"      "TGF.b2~GRO.a"     "TGF.b2~I.309"    
## [715] "TGF.b2~IGF.I"     "TGF.b2~IGFBP.4"   "TGF.b2~IL.16"    
## [718] "TGF.b2~IL.1a"     "TGF.b2~IL.2"      "TGF.b2~IL.3"     
## [721] "TGF.b2~IL.4"      "TGF.b2~IL.5"      "TGF.b2~IL.7"     
## [724] "TGF.b2~LIF"       "TGF.b2~LIGHT"     "TGF.b2~MCP.3"    
## [727] "TGF.b2~MDC"       "TGF.b2~MIG"       "TGF.b2~NT.3"     
## [730] "TGF.b2~NT.4"      "TGF.b2~OSM"       "TGF.b2~PARC"     
## [733] "TGF.b2~PIGF"      "TGF.b2~SCF"       "TGF.b2~SDF.1"    
## [736] "TGF.b2~TGF.b1"    "TGF.b3~Ck.b8.1"   "TGF.b3~CSF1"     
## [739] "TGF.b3~CX3CL1"    "TGF.b3~FGF.4"     "TGF.b3~FGF.6"    
## [742] "TGF.b3~FGF.7"     "TGF.b3~FGF.9"     "TGF.b3~GDNF"     
## [745] "TGF.b3~I.309"     "TGF.b3~IGF.I"     "TGF.b3~IGFBP.4"  
## [748] "TGF.b3~IL.16"     "TGF.b3~IL.1a"     "TGF.b3~IL.3"     
## [751] "TGF.b3~IL.4"      "TGF.b3~IL.5"      "TGF.b3~LIGHT"    
## [754] "TGF.b3~MCP.3"     "TGF.b3~MCP.4"     "TGF.b3~MDC"      
## [757] "TGF.b3~MIG"       "TGF.b3~NT.3"      "TGF.b3~NT.4"     
## [760] "TGF.b3~OPG"       "TGF.b3~OSM"       "TGF.b3~PARC"     
## [763] "TGF.b3~SDF.1"     "THPO~CCL26"       "THPO~Ck.b8.1"    
## [766] "THPO~CSF1"        "THPO~CX3CL1"      "THPO~ENA.78"     
## [769] "THPO~FGF.4"       "THPO~FGF.6"       "THPO~FGF.7"      
## [772] "THPO~GCP.2"       "THPO~GDNF"        "THPO~I.309"      
## [775] "THPO~IGFBP.4"     "THPO~IL.16"       "THPO~IL.1a"      
## [778] "THPO~IL.1b"       "THPO~IL.2"        "THPO~IL.3"       
## [781] "THPO~IL.4"        "THPO~IL.5"        "THPO~IL.7"       
## [784] "THPO~LIF"         "THPO~MCP.3"       "THPO~MCP.4"      
## [787] "THPO~MDC"         "THPO~MIG"         "THPO~NT.4"       
## [790] "THPO~OSM"         "THPO~PARC"        "THPO~PIGF"       
## [793] "THPO~RANTES"      "THPO~SCF"         "THPO~SDF.1"      
## [796] "THPO~TARC"        "THPO~TGF.b2"      "THPO~TGF.b3"     
## [799] "TIMP.1~ENA.78"    "TIMP.1~IL.12p70"  "TIMP.1~NAP.2"    
## [802] "TIMP.1~RANTES"    "TIMP.1~TARC"      "TIMP.1~THPO"     
## [805] "TIMP.2~FGF.4"     "TIMP.2~IL.10"     "TIMP.2~IL.3"     
## [808] "TIMP.2~IP.10"     "TIMP.2~MIP.1d"    "TIMP.2~PIGF"     
## [811] "TNF.a~CCL11"      "TNF.a~CSF2"       "TNF.a~CSF3"      
## [814] "TNF.a~GCP.2"      "TNF.a~IFN.g"      "TNF.a~IGFBP.3"   
## [817] "TNF.a~IL.13"      "TNF.a~IL.15"      "TNF.a~IL.1a"     
## [820] "TNF.a~IL.2"       "TNF.a~IL.5"       "TNF.a~IL.6"      
## [823] "TNF.a~IL.7"       "TNF.a~IL.8"       "TNF.a~MCP.3"     
## [826] "TNF.a~MIG"        "TNF.a~NAP.2"      "TNF.a~PARC"      
## [829] "TNF.a~PDGF.BB"    "TNF.a~PIGF"       "TNF.a~TGF.b1"    
## [832] "TNF.b~BLC"        "TNF.b~CCL11"      "TNF.b~CCL26"     
## [835] "TNF.b~CSF1"       "TNF.b~CSF2"       "TNF.b~CSF3"      
## [838] "TNF.b~FGF.4"      "TNF.b~FGF.6"      "TNF.b~FGF.7"     
## [841] "TNF.b~GCP.2"      "TNF.b~GDNF"       "TNF.b~GRO.a"     
## [844] "TNF.b~I.309"      "TNF.b~IFN.g"      "TNF.b~IL.13"     
## [847] "TNF.b~IL.15"      "TNF.b~IL.1a"      "TNF.b~IL.2"      
## [850] "TNF.b~IL.3"       "TNF.b~IL.4"       "TNF.b~IL.5"      
## [853] "TNF.b~IL.7"       "TNF.b~LIF"        "TNF.b~LIGHT"     
## [856] "TNF.b~MCP.3"      "TNF.b~MDC"        "TNF.b~NT.3"      
## [859] "TNF.b~NT.4"       "TNF.b~OSM"        "TNF.b~PDGF.BB"   
## [862] "TNF.b~PIGF"       "TNF.b~SCF"        "TNF.b~SDF.1"     
## [865] "TNF.b~TGF.b1"     "TNF.b~TGF.b2"     "TNF.b~TNF.a"     
## [868] "VEGF~Ck.b8.1"     "VEGF~CSF2"        "VEGF~FGF.4"      
## [871] "VEGF~FGF.9"       "VEGF~GDNF"        "VEGF~I.309"      
## [874] "VEGF~IGF.I"       "VEGF~IGFBP.4"     "VEGF~IL.1a"      
## [877] "VEGF~IL.1b"       "VEGF~IL.2"        "VEGF~IL.3"       
## [880] "VEGF~IL.4"        "VEGF~IL.5"        "VEGF~IL.6"       
## [883] "VEGF~LIF"         "VEGF~MIG"         "VEGF~MIP.1b"     
## [886] "VEGF~NAP.2"       "VEGF~NT.3"        "VEGF~PIGF"       
## [889] "VEGF~SDF.1"       "VEGF~TARC"        "VEGF~TGF.b3"     
## [892] "VEGF~THPO"
## 计算5个组合的交集
sort(intersect(intersect(intersect(intersect(zuheHF,zuheFL),zuheSA),zuheSF),zuheSL))
## [1] "IL.15~IL.13" "TNF.a~IL.5"
vcol <- c("red","blue","green","DeepPink","Gold")
T<-venn.diagram(list(Fatal_Last = zuheFL,
                     Healthy = zuheHF,
                     Severe_Other = zuheSA,
                     Severe_First = zuheSF,
                     Severe_Last = zuheSL),
                filename = NULL,lwd = 0.5,
                fill = vcol,alpha = 0.5,margin = 0.1)
grid.draw(T)

## (6)healthy, mild-first, fatal-first, fatal-other, fatal-last做一组。
sort(union(union(union(union(zuheFF,zuheFL),zuheHF),zuheMF),zuheFA))
##   [1] "Ck.b8.1~CCL26"    "CSF2~CCL11"       "CSF2~Ck.b8.1"    
##   [4] "CSF3~CCL11"       "CSF3~CSF2"        "CX3CL1~CCL26"    
##   [7] "CX3CL1~Ck.b8.1"   "EGF~BDNF"         "EGF~BLC"         
##  [10] "EGF~CCL24"        "ENA.78~BDNF"      "ENA.78~CCL11"    
##  [13] "ENA.78~EGF"       "FGF.4~CCL26"      "FGF.4~Ck.b8.1"   
##  [16] "FGF.4~CSF1"       "FGF.6~Ck.b8.1"    "FGF.6~CX3CL1"    
##  [19] "FGF.7~Ck.b8.1"    "FGF.7~FGF.4"      "FGF.9~CCL26"     
##  [22] "FGF.9~CX3CL1"     "FGF.9~EGF"        "FGF.9~FGF.6"     
##  [25] "Flt.3.LG~FGF.9"   "GCP.2~CCL11"      "GCP.2~CSF2"      
##  [28] "GCP.2~CSF3"       "GDNF~ANG"         "GDNF~CCL24"      
##  [31] "GDNF~CCL26"       "GDNF~CX3CL1"      "GDNF~ENA.78"     
##  [34] "GDNF~FGF.4"       "GDNF~Flt.3.LG"    "GRO.a~ANG"       
##  [37] "GRO.a~BDNF"       "GRO.a~CCL24"      "GRO.a~EGF"       
##  [40] "GRO.a~FGF.7"      "GRO~ANG"          "GRO~BDNF"        
##  [43] "GRO~EGF"          "GRO~FGF.7"        "HGF~Ck.b8.1"     
##  [46] "HGF~FGF.4"        "HGF~FGF.7"        "HGF~GCP.2"       
##  [49] "I.309~CCL26"      "I.309~Ck.b8.1"    "I.309~CSF3"      
##  [52] "I.309~FGF.4"      "I.309~FGF.6"      "I.309~FGF.7"     
##  [55] "I.309~FGF.9"      "I.309~HGF"        "IFN.g~ANG"       
##  [58] "IFN.g~CCL11"      "IFN.g~CSF2"       "IFN.g~CSF3"      
##  [61] "IFN.g~GCP.2"      "IFN.g~GRO.a"      "IFN.g~I.309"     
##  [64] "IGF.I~BLC"        "IGF.I~Ck.b8.1"    "IGF.I~CSF1"      
##  [67] "IGF.I~FGF.7"      "IGFBP.1~BDNF"     "IGFBP.1~CCL26"   
##  [70] "IGFBP.1~CSF1"     "IGFBP.1~FGF.7"    "IGFBP.1~Flt.3.LG"
##  [73] "IGFBP.2~ANG"      "IGFBP.2~CCL26"    "IGFBP.2~FGF.7"   
##  [76] "IGFBP.2~GRO"      "IGFBP.2~I.309"    "IGFBP.2~IGFBP.1" 
##  [79] "IGFBP.3~FGF.4"    "IGFBP.3~FGF.7"    "IGFBP.3~GCP.2"   
##  [82] "IGFBP.3~HGF"      "IGFBP.3~I.309"    "IGFBP.3~IGFBP.1" 
##  [85] "IGFBP.4~Ck.b8.1"  "IGFBP.4~FGF.4"    "IGFBP.4~FGF.7"   
##  [88] "IGFBP.4~Flt.3.LG" "IGFBP.4~IGFBP.3"  "IL.10~CSF2"      
##  [91] "IL.10~CSF3"       "IL.10~FGF.6"      "IL.10~GRO.a"     
##  [94] "IL.10~I.309"      "IL.10~IFN.g"      "IL.12p70~ANG"    
##  [97] "IL.12p70~CCL26"   "IL.12p70~CSF3"    "IL.12p70~GDNF"   
## [100] "IL.12p70~GRO"     "IL.12p70~GRO.a"   "IL.12p70~IGFBP.3"
## [103] "IL.13~CCL11"      "IL.13~CSF2"       "IL.13~CSF3"      
## [106] "IL.13~FGF.6"      "IL.13~GCP.2"      "IL.13~I.309"     
## [109] "IL.13~IFN.g"      "IL.13~IGF.I"      "IL.13~IL.10"     
## [112] "IL.15~ANG"        "IL.15~CCL11"      "IL.15~CCL26"     
## [115] "IL.15~CSF2"       "IL.15~CSF3"       "IL.15~GCP.2"     
## [118] "IL.15~GDNF"       "IL.15~IFN.g"      "IL.15~IL.10"     
## [121] "IL.15~IL.12p70"   "IL.15~IL.13"      "IL.16~Ck.b8.1"   
## [124] "IL.16~FGF.4"      "IL.16~FGF.6"      "IL.16~FGF.7"     
## [127] "IL.16~GRO"        "IL.16~I.309"      "IL.16~IL.12p70"  
## [130] "IL.1a~BDNF"       "IL.1a~CCL11"      "IL.1a~CSF2"      
## [133] "IL.1a~CSF3"       "IL.1a~GCP.2"      "IL.1a~GRO.a"     
## [136] "IL.1a~IFN.g"      "IL.1a~IGF.I"      "IL.1a~IL.10"     
## [139] "IL.1a~IL.13"      "IL.1a~IL.15"      "IL.1b~Ck.b8.1"   
## [142] "IL.1b~EGF"        "IL.1b~FGF.9"      "IL.1b~I.309"     
## [145] "IL.1b~IGFBP.1"    "IL.1b~IL.16"      "IL.2~ANG"        
## [148] "IL.2~BDNF"        "IL.2~CCL11"       "IL.2~CSF2"       
## [151] "IL.2~CSF3"        "IL.2~EGF"         "IL.2~ENA.78"     
## [154] "IL.2~FGF.7"       "IL.2~GRO"         "IL.2~GRO.a"      
## [157] "IL.2~I.309"       "IL.2~IFN.g"       "IL.2~IL.10"      
## [160] "IL.2~IL.13"       "IL.2~IL.15"       "IL.2~IL.1a"      
## [163] "IL.3~ANG"         "IL.3~CCL26"       "IL.3~FGF.4"      
## [166] "IL.3~FGF.9"       "IL.3~GDNF"        "IL.3~I.309"      
## [169] "IL.3~IFN.g"       "IL.3~IGFBP.2"     "IL.3~IL.10"      
## [172] "IL.3~IL.13"       "IL.3~IL.15"       "IL.3~IL.1b"      
## [175] "IL.4~ANG"         "IL.4~BDNF"        "IL.4~CCL26"      
## [178] "IL.4~CSF1"        "IL.4~FGF.6"       "IL.4~GCP.2"      
## [181] "IL.4~IFN.g"       "IL.4~IGFBP.2"     "IL.4~IGFBP.3"    
## [184] "IL.4~IL.12p70"    "IL.4~IL.13"       "IL.4~IL.3"       
## [187] "IL.5~CCL11"       "IL.5~CSF2"        "IL.5~CSF3"       
## [190] "IL.5~GCP.2"       "IL.5~HGF"         "IL.5~IFN.g"      
## [193] "IL.5~IGFBP.3"     "IL.5~IL.10"       "IL.5~IL.13"      
## [196] "IL.5~IL.15"       "IL.5~IL.1a"       "IL.5~IL.2"       
## [199] "IL.5~IL.4"        "IL.6~BDNF"        "IL.6~CSF3"       
## [202] "IL.6~Flt.3.LG"    "IL.6~GRO.a"       "IL.6~IGFBP.4"    
## [205] "IL.6~IL.1a"       "IL.6~IL.4"        "IL.6~IL.5"       
## [208] "IL.7~CCL11"       "IL.7~Ck.b8.1"     "IL.7~CSF2"       
## [211] "IL.7~CSF3"        "IL.7~GCP.2"       "IL.7~IFN.g"      
## [214] "IL.7~IGFBP.4"     "IL.7~IL.10"       "IL.7~IL.13"      
## [217] "IL.7~IL.15"       "IL.7~IL.1a"       "IL.7~IL.1b"      
## [220] "IL.7~IL.2"        "IL.7~IL.5"        "IL.7~IL.6"       
## [223] "IL.8~CSF3"        "IL.8~FGF.7"       "IL.8~Flt.3.LG"   
## [226] "IL.8~GCP.2"       "IL.8~I.309"       "IL.8~IGFBP.3"    
## [229] "IL.8~IGFBP.4"     "IL.8~IL.1b"       "IL.8~IL.2"       
## [232] "IL.8~IL.4"        "IL.8~IL.5"        "IL.8~IL.6"       
## [235] "IL.8~IL.7"        "IP.10~ANG"        "IP.10~CSF1"      
## [238] "IP.10~EGF"        "IP.10~ENA.78"     "IP.10~FGF.7"     
## [241] "IP.10~GDNF"       "IP.10~HGF"        "IP.10~IGFBP.1"   
## [244] "IP.10~IGFBP.3"    "IP.10~IL.12p70"   "Leptin~CCL26"    
## [247] "Leptin~GDNF"      "Leptin~GRO"       "Leptin~IGFBP.1"  
## [250] "Leptin~IGFBP.2"   "Leptin~IL.12p70"  "Leptin~IL.4"     
## [253] "LIF~BDNF"         "LIF~Ck.b8.1"      "LIF~CX3CL1"      
## [256] "LIF~EGF"          "LIF~FGF.6"        "LIF~FGF.9"       
## [259] "LIF~I.309"        "LIF~IGFBP.4"      "LIF~IL.16"       
## [262] "LIF~IL.1b"        "LIGHT~BLC"        "LIGHT~Ck.b8.1"   
## [265] "LIGHT~CX3CL1"     "LIGHT~FGF.6"      "LIGHT~GDNF"      
## [268] "LIGHT~I.309"      "LIGHT~IGF.I"      "LIGHT~IL.10"     
## [271] "LIGHT~IL.16"      "LIGHT~IL.1b"      "MCP.1~ANG"       
## [274] "MCP.1~BDNF"       "MCP.1~CSF2"       "MCP.1~CSF3"      
## [277] "MCP.1~FGF.7"      "MCP.1~GCP.2"      "MCP.1~GRO.a"     
## [280] "MCP.1~IFN.g"      "MCP.1~IL.10"      "MCP.1~IL.13"     
## [283] "MCP.1~IL.15"      "MCP.1~IL.16"      "MCP.1~IL.1a"     
## [286] "MCP.1~IL.2"       "MCP.1~IL.3"       "MCP.1~IL.4"      
## [289] "MCP.1~IL.5"       "MCP.1~IL.6"       "MCP.1~IL.7"      
## [292] "MCP.1~IL.8"       "MCP.2~ANG"        "MCP.2~BLC"       
## [295] "MCP.2~CSF2"       "MCP.2~EGF"        "MCP.2~ENA.78"    
## [298] "MCP.2~FGF.7"      "MCP.2~Flt.3.LG"   "MCP.2~GDNF"      
## [301] "MCP.2~GRO.a"      "MCP.2~HGF"        "MCP.2~IFN.g"     
## [304] "MCP.2~IL.12p70"   "MCP.2~IL.4"       "MCP.2~IP.10"     
## [307] "MCP.3~BDNF"       "MCP.3~Ck.b8.1"    "MCP.3~CSF3"      
## [310] "MCP.3~CX3CL1"     "MCP.3~EGF"        "MCP.3~ENA.78"    
## [313] "MCP.3~FGF.6"      "MCP.3~FGF.7"      "MCP.3~FGF.9"     
## [316] "MCP.3~GCP.2"      "MCP.3~GDNF"       "MCP.3~HGF"       
## [319] "MCP.3~I.309"      "MCP.3~IGFBP.1"    "MCP.3~IGFBP.3"   
## [322] "MCP.3~IL.16"      "MCP.3~IL.2"       "MCP.3~IL.8"      
## [325] "MCP.3~IP.10"      "MCP.3~LIF"        "MCP.4~BDNF"      
## [328] "MCP.4~CCL26"      "MCP.4~Ck.b8.1"    "MCP.4~CX3CL1"    
## [331] "MCP.4~FGF.7"      "MCP.4~HGF"        "MCP.4~I.309"     
## [334] "MCP.4~IGF.I"      "MCP.4~IL.10"      "MCP.4~IL.12p70"  
## [337] "MCP.4~LIGHT"      "MCP.4~MCP.2"      "MDC~BLC"         
## [340] "MDC~CCL26"        "MDC~Ck.b8.1"      "MDC~CSF1"        
## [343] "MDC~CSF2"         "MDC~CX3CL1"       "MDC~FGF.6"       
## [346] "MDC~FGF.9"        "MDC~I.309"        "MDC~IGF.I"       
## [349] "MDC~IL.16"        "MDC~IL.1b"        "MDC~LIF"         
## [352] "MDC~LIGHT"        "MDC~MCP.2"        "MDC~MCP.3"       
## [355] "MDC~MCP.4"        "MIF~BLC"          "MIF~FGF.7"       
## [358] "MIF~GRO"          "MIF~HGF"          "MIF~IGFBP.2"     
## [361] "MIF~IL.12p70"     "MIF~IL.16"        "MIF~IL.1b"       
## [364] "MIF~LIGHT"        "MIF~MCP.2"        "MIG~CCL11"       
## [367] "MIG~CCL24"        "MIG~CCL26"        "MIG~CSF2"        
## [370] "MIG~CSF3"         "MIG~FGF.9"        "MIG~GCP.2"       
## [373] "MIG~GDNF"         "MIG~GRO.a"        "MIG~I.309"       
## [376] "MIG~IFN.g"        "MIG~IGF.I"        "MIG~IGFBP.4"     
## [379] "MIG~IL.10"        "MIG~IL.13"        "MIG~IL.15"       
## [382] "MIG~IL.1a"        "MIG~IL.2"         "MIG~IL.4"        
## [385] "MIG~IL.5"         "MIG~IL.7"         "MIG~MCP.1"       
## [388] "MIP.1b~BDNF"      "MIP.1b~EGF"       "MIP.1b~FGF.9"    
## [391] "MIP.1b~GCP.2"     "MIP.1b~GDNF"      "MIP.1b~HGF"      
## [394] "MIP.1b~IGFBP.1"   "MIP.1b~IGFBP.3"   "MIP.1b~IGFBP.4"  
## [397] "MIP.1b~IL.4"      "MIP.1b~LIF"       "MIP.1b~LIGHT"    
## [400] "MIP.1b~MCP.3"     "MIP.1d~CCL26"     "MIP.1d~FGF.6"    
## [403] "MIP.1d~FGF.7"     "MIP.1d~I.309"     "MIP.1d~IGF.I"    
## [406] "MIP.1d~IL.10"     "MIP.1d~IL.16"     "MIP.1d~IP.10"    
## [409] "MIP.1d~LIF"       "MIP.1d~LIGHT"     "MIP.1d~MCP.4"    
## [412] "MIP.1d~MDC"       "MIP.3a~BDNF"      "MIP.3a~Ck.b8.1"  
## [415] "MIP.3a~EGF"       "MIP.3a~ENA.78"    "MIP.3a~FGF.4"    
## [418] "MIP.3a~FGF.7"     "MIP.3a~Flt.3.LG"  "MIP.3a~GCP.2"    
## [421] "MIP.3a~HGF"       "MIP.3a~I.309"     "MIP.3a~IGFBP.3"  
## [424] "MIP.3a~IGFBP.4"   "MIP.3a~IL.2"      "MIP.3a~IL.6"     
## [427] "MIP.3a~IL.8"      "MIP.3a~MCP.3"     "MIP.3a~MIF"      
## [430] "MIP.3a~MIP.1b"    "NAP.2~BDNF"       "NAP.2~CCL24"     
## [433] "NAP.2~FGF.7"      "NAP.2~Flt.3.LG"   "NAP.2~GCP.2"     
## [436] "NAP.2~GRO"        "NAP.2~IGFBP.1"    "NAP.2~IL.16"     
## [439] "NAP.2~IL.1a"      "NAP.2~IL.4"       "NAP.2~IL.5"      
## [442] "NAP.2~IL.6"       "NAP.2~MCP.1"      "NAP.2~MCP.2"     
## [445] "NAP.2~MIG"        "NT.3~CCL24"       "NT.3~CSF2"       
## [448] "NT.3~CSF3"        "NT.3~FGF.6"       "NT.3~GCP.2"      
## [451] "NT.3~GRO.a"       "NT.3~IFN.g"       "NT.3~IL.10"      
## [454] "NT.3~IL.13"       "NT.3~IL.15"       "NT.3~IL.1a"      
## [457] "NT.3~IL.2"        "NT.3~IL.4"        "NT.3~IL.5"       
## [460] "NT.3~IL.7"        "NT.3~LIF"         "NT.3~MCP.1"      
## [463] "NT.3~MIG"         "NT.3~MIP.1b"      "NT.4~BDNF"       
## [466] "NT.4~CCL26"       "NT.4~Ck.b8.1"     "NT.4~CSF2"       
## [469] "NT.4~EGF"         "NT.4~ENA.78"      "NT.4~FGF.6"      
## [472] "NT.4~FGF.9"       "NT.4~GRO.a"       "NT.4~I.309"      
## [475] "NT.4~IGF.I"       "NT.4~IGFBP.4"     "NT.4~IL.16"      
## [478] "NT.4~IL.1b"       "NT.4~IL.6"        "NT.4~LIGHT"      
## [481] "NT.4~MDC"         "NT.4~MIF"         "NT.4~MIP.1d"     
## [484] "OPG~FGF.4"        "OPG~FGF.7"        "OPG~GCP.2"       
## [487] "OPG~HGF"          "OPG~I.309"        "OPG~IGFBP.1"     
## [490] "OPG~IGFBP.3"      "OPG~IGFBP.4"      "OPG~IL.10"       
## [493] "OPG~IL.7"         "OPG~IP.10"        "OPG~MCP.2"       
## [496] "OPG~MCP.3"        "OPG~MCP.4"        "OPG~MIP.1b"      
## [499] "OPG~MIP.3a"       "OPN~CCL11"        "OPN~FGF.6"       
## [502] "OPN~FGF.7"        "OPN~HGF"          "OPN~IGFBP.2"     
## [505] "OPN~IGFBP.3"      "OPN~IGFBP.4"      "OPN~IL.1a"       
## [508] "OPN~IL.6"         "OPN~IP.10"        "OPN~MCP.3"       
## [511] "OPN~MIP.1d"       "OPN~OPG"          "OSM~CCL11"       
## [514] "OSM~CCL26"        "OSM~Ck.b8.1"      "OSM~CX3CL1"      
## [517] "OSM~FGF.4"        "OSM~FGF.6"        "OSM~I.309"       
## [520] "OSM~IFN.g"        "OSM~IGFBP.4"      "OSM~IL.12p70"    
## [523] "OSM~IL.15"        "OSM~IL.16"        "OSM~LIF"         
## [526] "OSM~LIGHT"        "OSM~MCP.3"        "OSM~MDC"         
## [529] "OSM~NT.4"         "PARC~CCL26"       "PARC~Ck.b8.1"    
## [532] "PARC~CSF2"        "PARC~CSF3"        "PARC~FGF.4"      
## [535] "PARC~FGF.6"       "PARC~GDNF"        "PARC~GRO"        
## [538] "PARC~GRO.a"       "PARC~I.309"       "PARC~IFN.g"      
## [541] "PARC~IGFBP.1"     "PARC~IGFBP.2"     "PARC~IL.10"      
## [544] "PARC~IL.13"       "PARC~IL.15"       "PARC~IL.1a"      
## [547] "PARC~IL.2"        "PARC~IL.3"        "PARC~IL.5"       
## [550] "PARC~IL.7"        "PARC~Leptin"      "PARC~MCP.1"      
## [553] "PARC~MIG"         "PDGF.BB~BDNF"     "PDGF.BB~EGF"     
## [556] "PDGF.BB~ENA.78"   "PDGF.BB~GCP.2"    "PDGF.BB~GRO"     
## [559] "PDGF.BB~IL.2"     "PDGF.BB~MIP.3a"   "PDGF.BB~NAP.2"   
## [562] "PDGF.BB~NT.3"     "PDGF.BB~NT.4"     "PDGF.BB~OSM"     
## [565] "PIGF~CCL26"       "PIGF~CSF2"        "PIGF~CSF3"       
## [568] "PIGF~CX3CL1"      "PIGF~FGF.4"       "PIGF~FGF.9"      
## [571] "PIGF~GDNF"        "PIGF~GRO"         "PIGF~IFN.g"      
## [574] "PIGF~IL.12p70"    "PIGF~IL.3"        "PIGF~LIF"        
## [577] "PIGF~LIGHT"       "PIGF~MDC"         "PIGF~MIF"        
## [580] "RANTES~BDNF"      "RANTES~CCL24"     "RANTES~CCL26"    
## [583] "RANTES~EGF"       "RANTES~ENA.78"    "RANTES~FGF.7"    
## [586] "RANTES~GDNF"      "RANTES~GRO"       "RANTES~HGF"      
## [589] "RANTES~I.309"     "RANTES~IGFBP.2"   "RANTES~IL.16"    
## [592] "RANTES~IL.2"      "RANTES~IP.10"     "RANTES~MIF"      
## [595] "RANTES~MIG"       "RANTES~MIP.3a"    "RANTES~NAP.2"    
## [598] "RANTES~PDGF.BB"   "SCF~ANG"          "SCF~CCL24"       
## [601] "SCF~CCL26"        "SCF~Ck.b8.1"      "SCF~CSF1"        
## [604] "SCF~EGF"          "SCF~ENA.78"       "SCF~FGF.4"       
## [607] "SCF~FGF.7"        "SCF~GDNF"         "SCF~GRO"         
## [610] "SCF~HGF"          "SCF~I.309"        "SCF~IGFBP.2"     
## [613] "SCF~IGFBP.3"      "SCF~IGFBP.4"      "SCF~IL.15"       
## [616] "SCF~IL.2"         "SCF~MCP.3"        "SCF~MIP.1b"      
## [619] "SCF~MIP.3a"       "SCF~OPG"          "SCF~OPN"         
## [622] "SCF~PARC"         "SCF~PDGF.BB"      "SCF~RANTES"      
## [625] "SDF.1~CCL26"      "SDF.1~Ck.b8.1"    "SDF.1~CSF3"      
## [628] "SDF.1~CX3CL1"     "SDF.1~FGF.9"      "SDF.1~IL.12p70"  
## [631] "SDF.1~IL.15"      "SDF.1~IL.1b"      "SDF.1~IL.3"      
## [634] "SDF.1~IL.4"       "SDF.1~IL.7"       "SDF.1~Leptin"    
## [637] "SDF.1~MIP.1d"     "SDF.1~NT.3"       "SDF.1~PIGF"      
## [640] "TARC~BDNF"        "TARC~CCL26"       "TARC~EGF"        
## [643] "TARC~ENA.78"      "TARC~GCP.2"       "TARC~GRO"        
## [646] "TARC~GRO.a"       "TARC~IL.13"       "TARC~IL.2"       
## [649] "TARC~MIP.1b"      "TARC~MIP.3a"      "TARC~NT.3"       
## [652] "TARC~NT.4"        "TARC~PDGF.BB"     "TARC~RANTES"     
## [655] "TGF.b1~CCL11"     "TGF.b1~CSF2"      "TGF.b1~CSF3"     
## [658] "TGF.b1~GCP.2"     "TGF.b1~I.309"     "TGF.b1~IFN.g"    
## [661] "TGF.b1~IL.10"     "TGF.b1~IL.13"     "TGF.b1~IL.15"    
## [664] "TGF.b1~IL.1a"     "TGF.b1~IL.2"      "TGF.b1~IL.5"     
## [667] "TGF.b1~IL.7"      "TGF.b1~IL.8"      "TGF.b1~MCP.1"    
## [670] "TGF.b1~MCP.3"     "TGF.b1~MCP.4"     "TGF.b1~MIG"      
## [673] "TGF.b1~NT.3"      "TGF.b1~PARC"      "TGF.b1~PIGF"     
## [676] "TGF.b1~SDF.1"     "TGF.b1~TARC"      "TGF.b2~CCL24"    
## [679] "TGF.b2~CSF1"      "TGF.b2~EGF"       "TGF.b2~FGF.4"    
## [682] "TGF.b2~FGF.9"     "TGF.b2~I.309"     "TGF.b2~IGFBP.4"  
## [685] "TGF.b2~IL.16"     "TGF.b2~IL.7"      "TGF.b2~LIF"      
## [688] "TGF.b2~MCP.3"     "TGF.b2~MDC"       "TGF.b2~NT.3"     
## [691] "TGF.b2~SDF.1"     "TGF.b2~TGF.b1"    "TGF.b3~Ck.b8.1"  
## [694] "TGF.b3~CX3CL1"    "TGF.b3~FGF.9"     "TGF.b3~GDNF"     
## [697] "TGF.b3~I.309"     "TGF.b3~IGFBP.1"   "TGF.b3~IGFBP.4"  
## [700] "TGF.b3~IL.10"     "TGF.b3~IL.16"     "TGF.b3~IL.7"     
## [703] "TGF.b3~IL.8"      "TGF.b3~LIGHT"     "TGF.b3~MCP.3"    
## [706] "TGF.b3~MDC"       "TGF.b3~OPG"       "TGF.b3~OSM"      
## [709] "TGF.b3~PARC"      "TGF.b3~TGF.b2"    "THPO~CCL26"      
## [712] "THPO~Ck.b8.1"     "THPO~CX3CL1"      "THPO~ENA.78"     
## [715] "THPO~FGF.9"       "THPO~I.309"       "THPO~IGFBP.4"    
## [718] "THPO~IL.10"       "THPO~IL.16"       "THPO~IL.1a"      
## [721] "THPO~LIF"         "THPO~MCP.1"       "THPO~MCP.3"      
## [724] "THPO~MDC"         "THPO~MIP.1b"      "THPO~NT.4"       
## [727] "THPO~OSM"         "THPO~PIGF"        "THPO~RANTES"     
## [730] "THPO~TARC"        "THPO~TGF.b2"      "THPO~TGF.b3"     
## [733] "TIMP.1~ENA.78"    "TIMP.1~GDNF"      "TIMP.1~GRO"      
## [736] "TIMP.1~IGFBP.3"   "TIMP.1~IL.12p70"  "TIMP.1~IP.10"    
## [739] "TIMP.1~MCP.2"     "TIMP.1~MCP.3"     "TIMP.1~MCP.4"    
## [742] "TIMP.1~MIF"       "TIMP.1~NAP.2"     "TIMP.1~OSM"      
## [745] "TIMP.1~PIGF"      "TIMP.1~RANTES"    "TIMP.1~TARC"     
## [748] "TIMP.1~THPO"      "TIMP.2~ANG"       "TIMP.2~BDNF"     
## [751] "TIMP.2~CSF1"      "TIMP.2~FGF.4"     "TIMP.2~FGF.7"    
## [754] "TIMP.2~GCP.2"     "TIMP.2~HGF"       "TIMP.2~I.309"    
## [757] "TIMP.2~IFN.g"     "TIMP.2~IGFBP.1"   "TIMP.2~IGFBP.2"  
## [760] "TIMP.2~IGFBP.3"   "TIMP.2~IL.10"     "TIMP.2~IL.13"    
## [763] "TIMP.2~IL.1a"     "TIMP.2~IL.3"      "TIMP.2~IL.4"     
## [766] "TIMP.2~IP.10"     "TIMP.2~MCP.3"     "TIMP.2~MIP.1d"   
## [769] "TIMP.2~MIP.3a"    "TIMP.2~NT.4"      "TIMP.2~OPG"      
## [772] "TIMP.2~PIGF"      "TIMP.2~SCF"       "TNF.a~CCL11"     
## [775] "TNF.a~CSF2"       "TNF.a~CSF3"       "TNF.a~FGF.7"     
## [778] "TNF.a~GCP.2"      "TNF.a~GRO"        "TNF.a~GRO.a"     
## [781] "TNF.a~IFN.g"      "TNF.a~IGFBP.3"    "TNF.a~IL.10"     
## [784] "TNF.a~IL.13"      "TNF.a~IL.15"      "TNF.a~IL.16"     
## [787] "TNF.a~IL.1a"      "TNF.a~IL.1b"      "TNF.a~IL.2"      
## [790] "TNF.a~IL.5"       "TNF.a~IL.7"       "TNF.a~IL.8"      
## [793] "TNF.a~MCP.1"      "TNF.a~MCP.3"      "TNF.a~MIG"       
## [796] "TNF.a~NAP.2"      "TNF.a~NT.3"       "TNF.a~PARC"      
## [799] "TNF.a~PIGF"       "TNF.a~TGF.b1"     "TNF.b~BDNF"      
## [802] "TNF.b~CCL11"      "TNF.b~CSF2"       "TNF.b~CSF3"      
## [805] "TNF.b~ENA.78"     "TNF.b~GCP.2"      "TNF.b~GRO.a"     
## [808] "TNF.b~IFN.g"      "TNF.b~IL.10"      "TNF.b~IL.13"     
## [811] "TNF.b~IL.15"      "TNF.b~IL.1a"      "TNF.b~IL.2"      
## [814] "TNF.b~IL.5"       "TNF.b~IL.7"       "TNF.b~MCP.1"     
## [817] "TNF.b~MIG"        "TNF.b~NT.3"       "TNF.b~NT.4"      
## [820] "TNF.b~PARC"       "TNF.b~PIGF"       "TNF.b~TARC"      
## [823] "TNF.b~TGF.b1"     "TNF.b~TNF.a"      "VEGF~BLC"        
## [826] "VEGF~Ck.b8.1"     "VEGF~CSF2"        "VEGF~CX3CL1"     
## [829] "VEGF~EGF"         "VEGF~FGF.9"       "VEGF~IGFBP.2"    
## [832] "VEGF~IL.1b"       "VEGF~IL.3"        "VEGF~IL.4"       
## [835] "VEGF~IL.5"        "VEGF~IL.6"        "VEGF~IL.7"       
## [838] "VEGF~LIF"         "VEGF~MCP.2"       "VEGF~MIG"        
## [841] "VEGF~MIP.1b"      "VEGF~NAP.2"       "VEGF~NT.3"       
## [844] "VEGF~NT.4"        "VEGF~OPG"         "VEGF~PIGF"       
## [847] "VEGF~TARC"        "VEGF~TGF.b3"      "VEGF~THPO"
## 计算5个组合的交集
sort(intersect(intersect(intersect(intersect(zuheFF,zuheFL),zuheHF),zuheMF),zuheFA))
## character(0)
vcol <- c("red","blue","green","DeepPink","Gold")
T<-venn.diagram(list(Fatal_Other =zuheFA,
                     Fatal_First=zuheFF,
                     Fatal_Last = zuheFL,
                     Healthy = zuheHF,
                     Mild_First = zuheMF),
                filename = NULL,lwd = 0.5,
                fill = vcol,alpha = 0.5,margin = 0.1)
grid.draw(T)

## 现在的三个图里要统一颜色。healthy绿,first红,other紫,last兰
## &前后加上空杠: Mild_&_Healthy, Severe_&_Healthy, Fatal_&_Healthy
## 针对Severe、Healthy的veen图
vcol <- c("DeepPink","red","blue","green")
T<-venn.diagram(list(Severe_Other = zuheSA,
                     Severe_First = zuheSF,
                     Severe_Last = zuheSL,
                     Healthy_First = zuheHF),
                filename = NULL,lwd = 0.5,
                fill = vcol,alpha = 0.5,margin = 0.1)
grid.draw(T)

## 针对Fatal、Healthy的veen图
vcol <- c("deeppink","red","blue","green")
T<-venn.diagram(list(Fatal_Other =zuheFA,
                     Fatal_First=zuheFF,
                     Fatal_Last = zuheFL,
                     Healthy = zuheHF),
                filename = NULL,lwd = 0.5,
                fill = vcol,alpha = 0.5,margin = 0.1)
grid.draw(T)

## 针对Mild、Healthy的veen图
vcol <- c("deeppink","red","green")
T<-venn.diagram(list(Mild_Other = zuheMA,
                     Mild_First = zuheMF,
                     Healthy = zuheHF),
                filename = NULL,lwd = 0.5,
                fill = vcol,alpha = 0.5,margin = 0.1)
grid.draw(T)

## 提取三个交集
SHin <- intersect(intersect(intersect(zuheSA,zuheSF),zuheSL),zuheHF)
SHin 
## [1] "IL.15~IL.13" "TNF.a~IL.5"
FHin <- intersect(intersect(intersect(zuheFA,zuheFF),zuheFL),zuheHF)
FHin
## [1] "PDGF.BB~BDNF" "IL.15~CSF3"   "IL.7~CSF3"    "IL.15~IL.13" 
## [5] "IL.7~IL.15"   "TNF.a~IL.5"   "TGF.b1~IL.7"
MHin <- intersect(intersect(zuheMA,zuheMF),zuheHF)
MHin 
## [1] "PDGF.BB~EGF" "NAP.2~MIG"
vcol <- c("green","red","blue")
T<-venn.diagram(list(Mild__Healthy = MHin,
                     Severe__Healthy = SHin,
                     Fatal__Healthy = FHin),
                filename = NULL,lwd = 0.5,
                fill = vcol,alpha = 0.5)
grid.draw(T)

## 5. 最后在做一个fatal,severe,mild和health这四个的交集的venn图。
## mild用绿色,fatal用蓝色 severe用红色(就是前面那些图的那种淡红色) 
## 然后health用黄色  也是前面用过的那种淡黄色
fatal <- intersect(intersect(zuheFA,zuheFF),zuheFL)
fatal
##  [1] "PDGF.BB~BDNF" "CSF3~CSF2"    "IFN.g~CSF2"   "IL.13~CSF2"  
##  [5] "IL.15~CSF2"   "IL.1a~CSF2"   "IL.2~CSF2"    "IL.5~CSF2"   
##  [9] "IL.7~CSF2"    "TGF.b1~CSF2"  "TNF.a~CSF2"   "TNF.b~CSF2"  
## [13] "IFN.g~CSF3"   "IL.13~CSF3"   "IL.15~CSF3"   "IL.1a~CSF3"  
## [17] "IL.2~CSF3"    "IL.5~CSF3"    "IL.7~CSF3"    "MIG~CSF3"    
## [21] "TGF.b1~CSF3"  "TNF.a~CSF3"   "TNF.b~CSF3"   "HGF~FGF.7"   
## [25] "OPG~HGF"      "IL.13~IFN.g"  "IL.15~IFN.g"  "IL.1a~IFN.g" 
## [29] "IL.2~IFN.g"   "IL.5~IFN.g"   "IL.7~IFN.g"   "TGF.b1~IFN.g"
## [33] "TNF.a~IFN.g"  "TNF.b~IFN.g"  "IL.15~IL.13"  "IL.1a~IL.13" 
## [37] "IL.2~IL.13"   "IL.5~IL.13"   "IL.7~IL.13"   "MIG~IL.13"   
## [41] "TGF.b1~IL.13" "TNF.a~IL.13"  "TNF.b~IL.13"  "IL.1a~IL.15" 
## [45] "IL.2~IL.15"   "IL.5~IL.15"   "IL.7~IL.15"   "TGF.b1~IL.15"
## [49] "TNF.a~IL.15"  "TNF.b~IL.15"  "IL.2~IL.1a"   "MIG~IL.1a"   
## [53] "TGF.b1~IL.1a" "TNF.a~IL.1a"  "TNF.b~IL.1a"  "IL.5~IL.2"   
## [57] "IL.7~IL.2"    "TGF.b1~IL.2"  "TNF.a~IL.2"   "TNF.b~IL.2"  
## [61] "IL.7~IL.5"    "MIG~IL.5"     "TGF.b1~IL.5"  "TNF.a~IL.5"  
## [65] "TNF.b~IL.5"   "TGF.b1~IL.7"  "TNF.a~IL.7"   "TNF.b~IL.7"  
## [69] "TGF.b1~MIG"   "TNF.a~MIG"    "TNF.a~TGF.b1" "TNF.b~TGF.b1"
## [73] "TNF.b~TNF.a"
severe <- intersect(intersect(zuheSA,zuheSF),zuheSL)
severe
## [1] "IL.13~CSF3"  "NT.4~FGF.7"  "IL.15~IL.13" "TNF.a~IL.5"  "TNF.a~IL.7"
mild <- intersect(zuheMA,zuheMF)
mild
##  [1] "I.309~CCL26"   "PARC~CCL26"    "IGF.I~Ck.b8.1" "TGF.b2~CSF1"  
##  [5] "PDGF.BB~EGF"   "IL.4~FGF.6"    "IL.2~FGF.7"    "PARC~GDNF"    
##  [9] "IL.3~I.309"    "IL.2~IFN.g"    "MCP.1~IFN.g"   "OPG~IGFBP.1"  
## [13] "SCF~IL.15"     "TIMP.2~IL.1a"  "TNF.b~IL.1a"   "MIG~IL.2"     
## [17] "IL.4~IL.3"     "PARC~IL.3"     "TIMP.2~IL.4"   "MIP.1d~LIF"   
## [21] "TNF.a~MCP.1"   "TGF.b1~MCP.3"  "NAP.2~MIG"
vcol <- c("green","red","blue","yellow")
T<-venn.diagram(list(Mild = mild,
                     Severe = severe,
                     Fatal = fatal,
                     Healthy = zuheHF),
                filename = NULL,lwd = 0.5,
                fill = vcol,alpha = 0.5)
grid.draw(T)