删除热图图块之间的空间

如何解决删除热图图块之间的空间

我正在用 ggtree 和 gheatmap 创建一棵树。我正在尝试解决如何去除尖端瓷砖之间的空间和/或合并具有相同值的相邻瓷砖。

以下是我使用的代码：

library(ape)
library(tidyverse)
library(ggtree)

tree <- rtree(50)
tree_plot <- ggtree(tree,size = 1,layout = "circular",branch.length = "none")

dummy_data <- data.frame(data = c(rep(1,10),rep(2,rep(3,rep(4,rep(5,10)))
row.names(dummy_data) <- tree$tip.label

gheat_Sensitivity <- gheatmap(p = tree_plot,data=dummy_data,width=0.1,colnames = FALSE) +
new_scale(aes(color = dummy_data)) +
scale_fill_gradientn(colors = c("grey","yellow"),breaks = c(1,5.0))

plot(gheat_Sensitivity)

这将创建我所追求的树： ggtree plot

但是我想删除热图图块之间的间距，以便它具有连续的外观。具体来说，我希望具有相同值的相邻瓷砖看起来像一个更大的瓷砖。

任何帮助将不胜感激， 干杯， 汤姆