loadImages.m

function imvec = loadImages(path)


    
    pngFiles = dir(strcat(path,'/*.jpg'));

    %imvec = zeros(size()
    imvec{length(pngFiles)} = 1;
    for k = 12:12
        filename = pngFiles(k).name;
        [I, MAP] = imread(strcat(path,'/',filename));
        
        
        %figure; imshow(I);
        
        
        sigma=5;
        window=7;
        H = fspecial('gaussian',[round(window*sigma), round(window*sigma)],sigma);
        %Ilarge = uint8(zeros(size(I,1)+1,size(I,2)+2));
        
        %Ilarge(1:size(I,1),1:size(I,2))  = I;
            
        I = rgb2gray(I);
        J = bfilter2(double(I)/255,5,[3 0.1]);

        % Convert indexed image to true-color (RGB) format
%       
%         RGB=I;
%         % Convert image to L*a*b* color space
%         cform2lab = makecform('srgb2lab');
%         LAB = applycform(RGB, cform2lab); 
% 
%         % Scale values to range from 0 to 1
%         L = LAB(:,:,1);%/100; 
% 
%         % Perform CLAHE
%         LAB(:,:,1) = adapthisteq(L,'NumTiles',...
%                                  [8 8],'ClipLimit',0.0005);%*100;
% 
%         % Convert back to RGB color space
%         cform2srgb = makecform('lab2srgb');
%         J = applycform(LAB, cform2srgb); 

        % Display the results
        %figure, imshow(RGB); 
        %figure, imshow(J);

%         
%         J=I;
%         %Ilarge = clahs(Ilarge,7,4,'cliplimit',3,'PreserveMaxMin');
%         %I = Ilarge(1:size(I,1),1:size(I,2));
%         %figure; imshow(I);
%         GaussBlur = imfilter(J(:,:,1),H,'same');
%         J(:,:,1) = GaussBlur;
%         GaussBlur = imfilter(J(:,:,2),H,'same');
%         J(:,:,2) = GaussBlur;
%         GaussBlur = imfilter(J(:,:,3),H,'same');
%         J(:,:,3) = GaussBlur;
        
        %I = imadjust(I);
        %figure; imshow(GaussBlur);
        imvec{k} = J;

    end

end