简单的方法来转换色彩范围到另一个？

Question

我想紫色转换这个形象：

蓝如：

是否有一个简单的方法来做到这一点？如果不是，有没有简单的方法来复制相同的效果？

由于

Answer 1

你可以分离在R，G和B通道中的图像，和由零替换红色通道，只留下G和B通道。

例在数学：

i = Import["http://tinyurl.com/3wqklof"]; 
ColorCombine@{ImageSubtract[#[[1]], #[[1]]], #[[2]], #[[3]]} &@ ColorSeparate@i 

编辑

，或者，如果你需要一个 “精确” 蓝色图像，在 “HSB” 色彩空间分离，更换所有H矩阵的非零值为2/3（蓝色），使S和B分量保持不变。

例子：

ColorCombine[{Image[2/3 ImageData@ImageAdd[#[[1]], #[[1]]]], #[[2]], #[[3]]} &@ 
       ColorSeparate[i, "HSB"], "HSB"]