ComplexHeatmap包

将数据先按照组分类，再聚类，并注释

• 首先将数据按照某种分类排好序，然后，将这个分类导出。这步很重要。
• 然后画图时，添加参数 row_split 或者 column_split，将上面的分类向量传入参数中。即可完成先分类，再聚类的操作。
• 添加注释，同样需要第一步的分类向量。

library(ggsci)
sci_color <- pal_npg("nrc", alpha = 0.7)(5)
names(sci_color) <- unique(group$cluster) # 一定要给颜色name到对应的类别
ha <- rowAnnotation(cluster = group$cluster,
                    col = list(cluster = sci_color),
                    show_annotation_name = F)