R Pheatmap：在图例中使用对数缩放

Question

我有一个矩阵

library(pheatmap)
set.seed(1)
mat <- matrix(rexp(200, rate=.001), ncol=20)
pheatmap(mat)

，有一个值比其他值高得多。因此，我想对图例栏使用对数缩放（1、10、100、1000，...）。

是否可以使用pheatmap软件包来做到这一点？

编辑：我不想制作log(mat)，我只希望颜色缩放栏被对数缩放（1、10、100、1000，...）。

Answer 1

只需添加对数legend_breaks并显示最大值标签即可。

pheatmap::pheatmap(mat, legend_breaks=c(10^(0:ceiling(log10(max(mat)))), 
                                        round(max(mat), 2)))

屈服