Итак, я импортирую несколько изображений в тренинг, а затем в список тестов ... затем я изменяю их размер до 100x100, чтобы они не занимали слишком много места ... после изменения размеров я хотел объединить все так, чтобы яв итоге получится 4 измерения в конце.Тестовые изображения идеально совмещены, но на обучающих изображениях появляется эта ошибка, о которой я упоминал в вопросе: ошибка в (функция (классы fdef mtable) не может найти унаследованный метод для объединения функций для сигнатуры «список», «список» ... ия делаю то же самое для тестирования ... не знаю, почему это происходит ... любая помощь ?? также сеанс R прерывается после этой ошибки, потому что ошибка во время переноса возникает в цикле
#importing all training images in a list
setwd("C:/Users/Joanne/OneDrive/Third Year/Thesis Stuff/Sets/TrainingColourSet")
colourImages <- list.files(pattern = "*.jpeg")
Images <- list()
for (i in 1:length(colourImages)) {
Images[[i]] <- readImage(colourImages[[i]])
}
#importing all testing images in a list
setwd("C:/Users/Joanne/OneDrive/Third Year/Thesis Stuff/Sets/TestingColourSet")
colourtestingImages <- list.files(pattern = "*.jpeg")
TestingImages <- list()
for (i in 1:length(colourtestingImages)) {
TestingImages[[i]] <- readImage(colourtestingImages[[i]])
}
#Structure and Combine
str(Images)
for(i in 1:1120) {
Images[[i]] <-resize(Images[[i]],100,100)
}
Images <- combine(Images)
str(TestingImages)
for(i in 1:351) {
TestingImages[[i]] <-resize(TestingImages[[i]],100,100)
}
TestingImages <- combine(TestingImages)