簡單的方法來轉換色彩範圍到另一個？

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"]