IMPORT MULTIPLE PNG IMAGES

Question

如何導入多個PNG圖像？我正在使用R V3.4.1。

EBImages和readImages包在這個版本

得到了我的答案！BELOW無法共享可用INCASE有人需要IT

library(png) 

img_train <- list.files(path = "file path",pattern = ".png" 
          ,all.files = TRUE,full.names = TRUE,no.. = TRUE) 
list_of_images=lapply(img_train,readPNG) 

轉換成矩陣

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

如果任何人有解決方案更好請分享！

Answer 1

EBImage可從Bioconductor存儲庫獲取，安裝說明請參閱I want to use EBImage package but it says it is not available for my version of R 的答案。然後，您可以使用readImage函數將多個圖像作爲數組或列表導入。

library("EBImage") 

img_train <- list.files(path = "file path", pattern = ".png", 
         all.files = TRUE,full.names = TRUE,no.. = TRUE) 

## image array 
img_array <- readImage(img_train) 

## image list 
img_list <- lapply(img_train, readImage)