R提取图片中的颜色

如何利用R提取图片中的颜色

代码：

library("RImagePalette")
myfigure <- jpeg::readJPEG(file.choose()) #选择你想上传的图片，注意是jpeg格式
display_image(myfigure)


mycolors <- image_palette(myfigure, n=30)
scales::show_col(mycolors)