Я использую модель Keras-R на больших изображениях. Это большое изображение было обрезано до множества маленьких (64x64 пикселей) с использованием наложения. Я обрезал каждые 8 пикселей в направлении x и y, учитывая общее количество k изображений.
![enter image description here](https://i.stack.imgur.com/JLfqp.png)
Я предсказываю класс каждого обрезанного изображения, загруженного из папка:
folder <- "C:/Users/PC/Image/image"
jpeg <- list.files(folder)
class_names = c(1,2,3)
for(idx in gtools::mixedsort(jpeg)){
img <- image_load(idx, target_size = c(64,64))
x <- image_to_array(img)
x <- array_reshape(x, c(1, dim(x)))
x <- x / 255.0
# Prediction
predictions <- model %>% predict(x)
predicted_label <- which.max(predictions) - 1
result <- class_names[predicted_label + 1]
}
В функции класса я хотел бы изменить каждое обрезанное изображение (например, изменить цвет) и перестроить исходное большое изображение. Поскольку перекрытие изначально использовалось, нужно снова перекрывать. Наконец, у меня будет большое изображение с 3 цветами, связанное с 3 классом.
Я понятия не имею, как это сделать.