热图色标如何设置成10的次方变化

是 否 +2 论坛币

k人 参与回答

经管之家送您一份

应届毕业生专属福利!

求职就业群

赵安豆老师微信：zhaoandou666

经管之家联合CDA

送您一个全额奖学金名额~ !

立即领取

感谢您参与论坛问题回答

经管之家送您两个论坛币！

+2 论坛币

请教各位，我画了一个热图。希望色标是0.1，0.01，0.001，0.0001 这样的梯度变化，如下图。请问应该用什么函数啊？

这是我目前的代码：

1. library(ggplot2)
   
2. require(reshape2)
   
3. require(scales)
   
4. require(plyr)
   
5. dictribution <- read.csv("D:/Rprogram/heatmap.all")
   
6. dictribution$bins <- with(dictribution, reorder(bins, TS01LD101))
   
7. head(dictribution)
   
8. dictribution.m <- melt(dictribution)
   
9. dictribution.m <- ddply(dictribution.m, .(variable), transform, abundance=rescale(value))
   
10. p <- ggplot(dictribution.m, aes(variable, bins)) + geom_tile(aes(fill = abundance),colour = "white") + scale_fill_gradient2(low = "white",mid="LightBlue1",high = "Firebrick1",midpoint=0.5) + theme(axis.text.x = element_text(angle=90, hjust=1, vjust=0.5),panel.grid =element_blank())+scale_y_discrete(position = "right")

复制代码

扫码加我 拉你入群

请注明：姓名-公司-职位

以便审核进群资格，未注明则拒绝

分享0 收藏0 回帖

关键词：梯度变化 设置成 求助