изображение стека с использованием индекса в циклы в R - PullRequest
0 голосов
/ 07 мая 2020

У меня в папке 273 изображения, и я хотел бы вставить их в матрицу. Я загрузил изображения с помощью list.files и создал 2 цикла для строки и столбца матрицы.

folder <- "C:/Users/Desktop/image"
jpeg <- list.files(folder, full.names=TRUE) 

#Size matrix
Number_R <- 13
Number_C <- 21
#create empty matrix
matrix <- matrix(, nrow = Number_R, ncol = Number_C)
total <- Number_R * Number_C

#i for row
#j for col
ind <- 0

for (i in (1:(Number_R))) {
  for (j in (1:(Number_C))) {
    ind <- ind+1
    l <-stack(ind)
    img_array <- as.array(l)
    }
  }

Проблема в том, как использовать стек функций в этом случае (если это правильно) ? Для каждой итерации я хотел бы складывать изображение l, которое я загрузил благодаря функции list.files. Наконец, у меня будет изображение 1 строки 1 / столбца 1; строка 1 / столбец 2 изображение 2; строка 2 / столбец 1 изображение 24; et c

Я создал индексное имя "ind", но я не могу использовать его с функцией стека.

1 Ответ

0 голосов
/ 08 мая 2020

Трудно понять, что именно вам нужно. Приведите небольшой пример.

Возможно, вы сможете

library(raster)
f <- list.files()
s <- stack(f)
m <- as.matrix(s)
...