function [] = LinConv()

D = dir('*.png');
imcell = cell(1,numel(D));
for i = 1:numel(D)
imcell{i} = imread(D(i).name);
end

Y = zeros (2,numel(D)-1);
x = 1;
M = zeros (2,numel(D)-1);

for i = 1:numel(D)-1
    n = 1;
    R = zeros (1,(numel(D)-i));
    for j = i+1:numel(D)
        F = conv2(imcell{i},imcell{j});
        R(n) = mean(mean(F));
        n = n+1;
        disp(R)
    end

    [C,I] = max(R);
    Y(1,x) = C ;
    Y(2,x) = I ;


    [W,Q] = min (R);
    M(1,x) = W;
    M(2,x) = Q;
    disp(M);
    x = x+1;
end
[D,S] = max (Y(1,:));
imshow (imcell{S});
figure;
imshow (imcell{S+Y(2,S)});

figure;

[V,X] = min (M(1,:));
imshow (imcell{X});
figure;
imshow (imcell{X+M(2,X)});
end