使用 R 的图像颜色组合

Question

我试图获得构成给定图片的每种颜色的百分比。我使用此代码获得 RGB 矩阵：

library(jpeg)
img <- readJPEG("C:/Users/Pictures/img.jpg")
dim(img)
#145 371   3
img<-img*255
#this operation is necessary to obtain an RBG scale

在这一步，我不确定哪种方法是正确的。无论如何，我想获得这样的东西：

Count    RGB vector

200614   (255,255,255) 

4758     (253,253,218) 

4312     (250,250,229) 

1821     (235,237,242) 

1776     (212,214,226)

...

然后我可以计算每种颜色的百分比。最后，我将尝试将标签与每个 RGB 向量相关联。

任何人都可以帮助我吗？

Answer 1

table在将像素数组转换为 #rrggbb 值后，您可以轻松计算颜色as.raster（请注意，您不需要通过将值乘以 255 来缩放值）。可以通过col2rgb.

library(jpeg)
img <- readJPEG("C:/Users/Pictures/img.jpg")

# Convert the 3D array to a matrix of #rrggbb values
img <- as.raster(img)

# Create a count table
tab <- table(img)

# Convert to a data.frame
tab <- data.frame(Color = names(tab), Count = as.integer(tab))

# Extract red/green/blue values
RGB <- t(col2rgb(tab$Color))
tab <- cbind(tab, RGB)

# Preview
head(tab)