Gradienty

close all;
clear all;

A1 = imread('jet.bmp');
load('maskiPP.mat');

A1m = conv2(A1,R1,'same');
A1m2 = conv2(A1,R2,'same');
A1m = uint8(A1m+128);
A1m2 = uint8(abs(A1m2));

figure(1)
subplot(1,3,1);
imshow(A1,[]);
title('obraz startowy')

subplot(1,3,2);
imshow(A1m,[]);
title('obraz dodanie')

subplot(1,3,3);
imshow(A1m2,[]);
title('obraz srednia')

%---------------------------

A2m = conv2(A1,P1,'same');
A2m2 = conv2(A1,P2,'same');
A2m = uint8(A2m+128);
A2m2 = uint8(abs(A2m2));

figure(2)
subplot(1,3,1);
imshow(A1,[]);
title('obraz startowy')

subplot(1,3,2);
imshow(A2m,[]);
title('obraz dodanie')

subplot(1,3,3);
imshow(A2m2,[]);
title('obraz srednia')

%----------------------------

A3m = conv2(A1,S1,'same');
A3m2 = conv2(A1,S2,'same');
A3m = uint8(A3m+128);
A3m2 = uint8(abs(A3m2));

figure(3)
subplot(1,3,1);
imshow(A1,[]);
title('obraz startowy')

subplot(1,3,2);
imshow(A3m,[]);
title('obraz dodanie')

subplot(1,3,3);
imshow(A3m2,[]);
title('obraz srednia')