如何在 R 中创建渐变“加号”颜色条？答案

【问题标题】：How to create a gradient "plusminus" color bar in R?如何在 R 中创建渐变“加号”颜色条？
【发布时间】：2014-08-08 10:01:01
【问题描述】：

我正在 R 中进行图像处理。我在 R 中编写了一个函数，它读取文本文件并使用该文件中每个坐标的坐标信息和强度值生成颜色图。为了表示这些图像，我目前正在使用彩虹配色方案。但是，我想使用正负配色方案来表示图像。意思是，我需要一个具有中性中心色（黑色）的配色方案，将任一侧发散为暖色（红色）用于正值，冷色用于负值（蓝色）。我尝试使用 colorRamp 包来做到这一点，但不知何故我无法获得这种配色方案。有人可以帮忙吗？

实施建议后的代码：

levelplot(t(m), scales=list(tick.number=0), xlab=" ", ylab=" ",    
colorkey=list(at=as.numeric(factor(c(seq(from=range[1], to=range[2],  
by=.1)))),labels=as.character(c( "327.1", "327.2", "327.3", "327.4", "327.5", "327.6",
"327.7", "327.8", "327.9"))),col.regions = two.colors(n=256, start='red', end='blue',     
middle='black'), main=main)

范围1 = 327.1 范围2 = 327.9

【问题讨论】：

标签： r image image-processing color-scheme colorbar

【解决方案1】：

在包fields中，two.colors函数：

library(fields)
two.colors(n=256, start='red', end='blue', middle='black')

【讨论】：

@Roman Luštrik 我使用了您的建议并在我的代码中实现了这一点。我得到了我想要的，但是颜色条被分成了几个部分。在实施您的建议后，我已使用收到的彩条更新了问题。有没有办法获得平滑的渐变色条？另外，对于彩条的标签，有没有办法让代码自动分配标签中指定范围内的数字。我也更新了问题中的代码。