r - 如何在 R 中导入多个 jpeg 图像

Question

我正在尝试将文件夹中的多个黑白图像导入 R。每个文件的名称没有模式。

我尝试了几种不同的方法:

files <- list.files(path="C:\\images", pattern=".jpeg",all.files=T, full.names=F, no.. = T) 

和

x = readImage(system.file(images, *.png, package=EBImage))

没有运气。

最终，我想导入这些图像并创建一个矩阵，其中每一行代表一个图像，每一列代表一个像素编号，范围从像素 0 到像素 783(这些是 28x28 图像，所以总共 786 个像素)。

谢谢

Answer 1

要获取列表中的图像，我会使用 lapply:

list_of_images = lapply(files, readImage) 

并将其转换为矩阵:

image_matrix = do.call('cbind', lapply(list_of_images, as.numeric))