如何从R中的jpeg图像中提取RGB通道?

如何从R中的jpeg图像中提取RGB通道?,r,jpeg,rgb,raster,R,Jpeg,Rgb,Raster,我正在尝试使用R在单个绘图上使用“图像”功能显示每个通道。我看到了另一个类似的问题,解决方案是使用R中的biOps软件包,但我无法安装它。还有别的办法吗 img <- readJPEG(system.file("img","Rlogo.jpg",package="jpeg")) str(img) # num [1:512, 1:512, 1:3] 1 1 1 1 1 1 1 1 1 1 ... img从Bioconductor安装EBImage软件包后,请尝试以下操作: image &l

我正在尝试使用R在单个绘图上使用“图像”功能显示每个通道。我看到了另一个类似的问题,解决方案是使用R中的biOps软件包,但我无法安装它。还有别的办法吗

img <- readJPEG(system.file("img","Rlogo.jpg",package="jpeg"))
str(img)
# num [1:512, 1:512, 1:3] 1 1 1 1 1 1 1 1 1 1 ...

img从Bioconductor安装
EBImage
软件包后,请尝试以下操作:

image <- readImage('~/path/to/image.jpg')

display(image, method = 'raster')

image当我加载
pkg:jpeg
并尝试运行该代码时,我得到一个错误。请包括一个适当的
库调用。
readJPEG()
返回一个三维数组,其中红色、绿色和蓝色层通过第三个索引进行索引。(一旦你知道要寻找它,你可以在
str(img)
的结果中看到,Do
img[,.1]
获得红色层,
img[,.2]
获得蓝色层,等等。
image()
将绘制逆时针旋转90度的图像。如果要垂直绘制,请执行,例如
a
colorMode(image) <- Grayscale
display(image, method = 'raster',all = TRUE)