[R][pheatmap] pheatmapにlegend titleをつける

pheatmapパッケージでヒートマップを描く場合、値の凡例のタイトルをつけるオプションが無い。

demo data

df <- iris[,1:4]
anno <- iris[,5, drop=FALSE]

rownames(df) <- rownames(anno) <- as.character(seq(nrow(df)))
pheatmap::pheatmap(mat = df, annotation_row = anno, show_rownames = F)

ComplexHeatmap

ComplexHeatmapパッケージにもpheatmap()機能があり、pheatmapパッケージと同様のヒートマップを描くことができる。ComplexHeatmapのpheatmapであれば、heatmap_legend_param =引数でlegend titleを指定することができる。

ComplexHeatmap::pheatmap(
	mat = df, 
	annotation_row = anno, 
	show_rownames = F, 
	heatmap_legend_param = list(title = "Score"))