what changes are to be made in the following code to convert all the images in grayscale?

images ='C:\Users\TIET\Desktop\tomato'; jpgfiles=dir(fullfile(images,'\*.jpg*')) n=numel(jpgfiles); idx=randi(n); im=jpgfiles(idx).name im1=imread(fullfile(images,im))

Answer 1

[KALYAN ACHARJYA]

Code: Call the all image in the folder on by one, convert to grayscale and save it one by one in the mentioned path destination(im1,im2,im3,im4......)

path_directory='folder_name_here'; % 'Folder name'
original_files=dir([path_directory '/*.jpg']); %Note on Image Format
for k=1:length(original_files)
    filename=[path_directory '/' original_files(k).name];
    image_ogi=imread(filename);
    gray=rgb2gray(image_ogi);
    destination='D:\folder_name_destinatiomn\im';  %Complete path of the folder
    imwrite(gray,[destination,num2str(k),'.png']); %Change the image formta as per desired image format
end

[KALYAN ACHARJYA]

Another way of doing a batch process.

[SHUBHDEEP KAUR]

Thank you...its working

[KALYAN ACHARJYA]

@Shubhdeepth My Pleasure

Happy to help always!

Regards

Kalyan

[SHUBHDEEP KAUR]

what if i also want to convert that grayscale images into binary images?

[KALYAN ACHARJYA]

path_directory='folder_name_here'; % 'Folder name'
original_files=dir([path_directory '/*.jpg']); %Note on Image Format
for k=1:length(original_files)
    filename=[path_directory '/' original_files(k).name];
    image_ogi=imread(filename);
    gray=rgb2gray(image_ogi);
    bw_image=im2bw(gray);
    destination='D:\folder_name_destination\bw';  %Complete path of the folder
    imwrite(bw_image,[destination,num2str(k),'.png']); %Change the image formta as per desired image format
end

[SHUBHDEEP KAUR]

not working

[KALYAN ACHARJYA]

Please check carefully, it works!

[SHUBHDEEP KAUR]

thank you..is in working state now.