Как я могу извлечь определенный цвет с его положением из JPEG?

Question

С помощью библиотеки 'JPEG' мы можем извлечь матрицу RGB из файла JPEG.Если я знаю определенный цвет в формате #RRGGBB, как я могу получить положение цветовых точек?

library(jpeg)
IMGMX <- readJPEG("sample.jpg") %>% melt %>% dcast(Var1+Var2~Var3, value.var = "value")

Answer 1

Изменение масштаба данных до [0, 255]

IMGMX[, 3:5] <- 255 * IMGMX[, 3:5]

Преобразование #RRGGBB в координаты R, G, B

clr <- '#652d90'
r <- col2rgb(clr)[1]
g <- col2rgb(clr)[2]
b <- col2rgb(clr)[3]

Печать совпадений

IMGMX[IMGMX$`1` == r & IMGMX$`2` == g & IMGMX$`3` == b, 1:2]

Это даст вам кадр данных, состоящий из 2 столбцов (ширина и высота) и из n строк, соответствующих n пикселям в исходном изображении, которые имеют цвет «clr».