在R中重塑图像

Question

我正在用R中的Keras进行图像识别。我正在尝试将图像转换为一维矩阵。这是我的代码：

pics <- c("p1.jpg", "p2.jpg", "p3.jpg", "p4.jpg", "p5.jpg", "p6.jpg",
          "c1.jpg", "c2.jpg", "c3.jpg", "c4.jpg", "c5.jpg", "c6.jpg") 
mypic <- list()
mypic <- lapply(pics, readImage)
mypic <- lapply(mypic, resize, 28, 28)
mypic <- lapply(mypic, array_reshape, c(28,28,3))

最后一行导致以下错误消息：

initialize_python（required_module，use_environment）中的错误： 您当前的体系结构是64位，但是此版本的Python是为32位编译的。

我该如何进行？