1. library(ConsensusClusterPlus)
    2. res <- ConsensusClusterPlus(es_max, # es_max为矩阵,行名为feature,列为sample
    3. maxK = 10,
    4. reps = 1000, # 抽样次数
    5. pItem = 0.8, # 抽样比例
    6. pFeature = 1,
    7. clusterAlg = "pam", # 聚类方法
    8. corUse = "complete.obs",
    9. seed=456,
    10. plot="png", # 结果保存形式
    11. writeTable=T,
    12. innerLinkage = "complete"
    13. )

    遇到过的一些报错:
    es_max一定要是矩阵
    es_max里不可以有标注差为0的列 es_max = es_max[,apply(es_max, 2, function(x) sd(x)!=0)]