मेरे पास एक फ़ोल्डर में 500 छवियां हैं और उन्हें ReadImage (), rgb_2gray (), resizeImage() के साथ संसाधित करना है और फिर उन्हें वेक्टर में संग्रहीत करना है। मैंने अलग-अलग तरीकों की कोशिश की है, लेकिन मुझे नहीं पता कि प्रत्येक छवि को कैसे एक्सेस किया जाए और फिर उन्हें वेक्टर में स्टोर किया जाए। प्रत्येक छवि में डेटा होता है जिसे मुझे विश्लेषण करने की आवश्यकता होती है।
मदद के लिये शुक्रिया!
मैंने अभी यही कोशिश की है:
library(OpenImageR)
setwd("C:/Users/Idoia/Desktop/UOC/UOC 2020/Machine learning/PEC 1")
lista<-list.files("C:/Users/Idoia/Desktop/UOC/UOC 2020/Machine learning/PEC 1/normal",
all.files = FALSE, full.names = TRUE)
df<-data.frame()
for (i in length(lista)) {
pic<-readImage(lista[i])
pic<-rgb_2gray(pic)
pic<-resizeImage(pic, width = 64, height = 64)
pic<-as.vector(pic)
pre_pic<-t(pic)
df<-rbind(df,pre_pic)
}
यह केवल एक पंक्ति संग्रहीत करता है और मुझे 500 पंक्तियों की आवश्यकता है। ऐसा लगता है कि यह केवल पहली छवि पढ़ रहा है।
0
4 अप्रैल 2020, 21:11
2 जवाब
आप लूप के लिए उपयोग कर सकते हैं।
library(OpenImageR)
setwd("~/Images/")
Files <- list.files()
Results <- list()
for(i in seq_along(Files)){
Image <- readImage(Files[i])
Resized <- resizeImage(Image, width = 200, height = 200)
Gray <- rgb_2gray(Resized)
Results[[i]] <- Gray
}
फिर आप Results सूची में [[ का उपयोग करके परिणामों तक पहुंच सकते हैं।
imageShow(Results[[1]])
0
4 अप्रैल 2020, 21:52
इसलिए, मैंने 1:लंबाई . जोड़कर समस्या का समाधान किया
df<-data.frame()
for (i in 1:length(lista)) {
pic<-readImage(lista[i])
pic<-rgb_2gray(pic)
pic<-resizeImage(pic, width = 64, height = 64)
pic<-as.vector(pic)
pre_pic<-t(pic)
df<-rbind(df,pre_pic)}
सबको धन्यवाद!! :)
0
6 अप्रैल 2020, 12:20
mypics <- list(); mypics[[i]] <- ReadImage(pic[i])कुछ ऐसा।