热图中的scale_color_gradient2

发布于 2025-01-12 20:44:02 字数 833 浏览 0 评论 0原文

我正在绘制系统发育树并使用 gheatmap() 添加热图。 我想使用低点、中点和高点更改颜色比例尺。 我认为scale_color_gradient2()使这成为可能,但它不起作用。

p <- ggtree(tree.c$scenario.1, layout='fan',branch.length = "none", 
     options(ignore.negative.edge=TRUE))    
plot(p)

group <- as.matrix(fit0[,7])
rownames(group)<-tree.c$scenario.1$tip.label
colnames(group)<-c("Temperature")

library(ggnewscale)
p2 <- p + new_scale_fill()
gheatmap(p2, group, offset=1, width=.2,
         colnames= F, colnames_offset_y = .2) +
  scale_color_gradient2( low = "blue", mid = "white",  high = "red") +
  theme(legend.key.size = unit(5, 'cm'),
      legend.text=element_text(size=20),
      plot.title = element_text(size=100, hjust = 0.5, vjust = 1.5))

但它显示错误“‘y’的比例已经存在。为‘y’添加另一个比例,这将取代现有的比例。热图”并且未应用低、中(中点 = 0)和高颜色。它是如何固定的或者如何设置中点颜色渐变?

提前致谢!

I am drawing phylogenetic tree and added heatmap with gheatmap().
I would like to change color scale bar using low, mid, and high point.
I thought scale_color_gradient2() made that possible, but it doesn't work.

p <- ggtree(tree.c$scenario.1, layout='fan',branch.length = "none", 
     options(ignore.negative.edge=TRUE))    
plot(p)

group <- as.matrix(fit0[,7])
rownames(group)<-tree.c$scenario.1$tip.label
colnames(group)<-c("Temperature")

library(ggnewscale)
p2 <- p + new_scale_fill()
gheatmap(p2, group, offset=1, width=.2,
         colnames= F, colnames_offset_y = .2) +
  scale_color_gradient2( low = "blue", mid = "white",  high = "red") +
  theme(legend.key.size = unit(5, 'cm'),
      legend.text=element_text(size=20),
      plot.title = element_text(size=100, hjust = 0.5, vjust = 1.5))

But it showed the error "scale for 'y' is already present. adding another scale for 'y', which will replace the existing scale. heatmap" And low, mid (midpoint = 0), and high color were not applied. How is it fixed or how do I set the color gradient with midpoint?

Thanks in advance!

如果你对这篇内容有疑问,欢迎到本站社区发帖提问 参与讨论,获取更多帮助,或者扫码二维码加入 Web 技术交流群。

扫码二维码加入Web技术交流群

发布评论

需要 登录 才能够评论, 你可以免费 注册 一个本站的账号。
列表为空,暂无数据
我们使用 Cookies 和其他技术来定制您的体验包括您的登录状态等。通过阅读我们的 隐私政策 了解更多相关信息。 单击 接受 或继续使用网站,即表示您同意使用 Cookies 和您的相关数据。
原文