在R中使用ggplot2自定义颜色缩放
Lucien S.
我有以下代码：
require(reshape2)
library(ggplot2)
library(RColorBrewer)
df <- read.csv("https://dl.dropboxusercontent.com/u/73950/moduVSmnc.csv")
breaks1 <- seq(1.85,2.5,by=0.05)
gg <- aggregate(mnc~cut(apl,breaks=breaks1,
labels=format(breaks1[-1],nsmall=2))+modu,df,mean)
colnames(gg)<- c("apl","modu","mnc")
gg$modu <- as.factor(gg$modu)
library(ggplot2)
library(RColorBrewer)
ggplot(gg) +
geom_tile(aes(x=modu,y=apl,fill=mnc))+
scale_fill_gradientn(colours=rev(brewer.pal(10,"Spectral"))) +
coord_fixed()
产生：
现在，我希望此图将40以下所有值显示为深蓝色（好像值是0），然后开始平滑地移动到绿色，黄色，橙色，红色和深红色（啤酒的光谱色标），直到达到最大值。
如何用ggplot2实现呢？
ECIIA
我不确定我是否正确理解了您的问题。为什么不将所有mnc<40映射为40并重新着色？
gg$mnc2<-gg$mnc
gg$mnc2[gg$mnc2<40]<-40
ggplot(gg) +
geom_tile(aes(x=modu,y=apl,fill=mnc2))+
scale_fill_gradientn(colours=rev(brewer.pal(11,"Spectral"))) +
coord_fixed()
本文收集自互联网，转载请注明来源。
如有侵权，请联系[email protected] 删除。
编辑于
相关文章
Related 相关文章
- 1
在R中使用ggplot2自定义颜色缩放
- 2
使用 ggplot2 为组自定义颜色
- 3
ggplot2自定义轴缩放
- 4
R中的ggplot2 :: scale_fill_gradient-自定义颜色
- 5
使用ggplot2在维恩中重叠区域的自定义颜色
- 6
使用ggplot2的多个样条线+不同的颜色+线宽+自定义X轴标记
- 7
在ggplot2中使用自定义OTF字体
- 8
在ggplot2中使用facet_grid的自定义散点图矩阵
- 9
在R中使用自定义颜色绘制栅格图像
- 10
使用R和ggplot2语法向图中添加自定义工具提示
- 11
自定义具有不同颜色的ggplot2轴标签
- 12
创建结合了主题和颜色的自定义ggplot2函数
- 13
如何在ggplot2中使用annotation_custom来自定义x轴
- 14
在ggplot2中使用scale_x_discrete（）自定义x轴时出错
- 15
R-将图添加到多面ggplot2对象（使用注解_自定义）
- 16
使用R和ggplot2语法将自定义工具提示添加到绘图中
- 17
R ggplot2热图，使用自定义范围强制离散比例，将网格添加到地图
- 18
R-在ggplot2中自定义图例以添加geom_vline（）组件
- 19
R. GGplot2，带有自定义分位数的geom_boxplot
- 20
R的ggplot2中的自定义六边形直方图标签
- 21
自定义geom-smooth / ggplot2 / R中的公式
- 22
自定义ggplot2轴和标签格式
- 23
ggplot2：应用变量中的自定义
- 24
在ggplot2中创建自定义图例
- 25
ggplot2中缺少自定义注解小节
- 26
ggplot2 中的自定义日期轴
- 27
自定义图例形状和大小 ggplot2
- 28
自定义图例顺序 ggbiplot，基于 ggplot2
- 29
如何使用ggplot2和geom_tile创建自定义色阶？
我来说两句