Filtros Y Ruido Matlab

A=imread('Imagen.tif');
A=rgb2gray(A);
subplot(2,1,1)
imshow(A)
title('Imagen Original')
subplot(2,1,2)
imhist(A)
title('Histograma')
%ruido gaussiano
G=imnoise(A,'gaussian',0.0005,0.0019);figure
subplot(2,1,1)
imshow (G)
title('ruido gaussiano')
subplot(2,1,2)
Imhist(G)
title('Histograma')
%ruido sal y pimienta
J = imnoise(A,'salt & pepper',0.02);
figure
subplot(2,1,1)imshow(J)
title('ruido sal y pimienta')
subplot(2,1,2)
Imhist(J)
title('Histograma')

%filtro media mascara 3x3
h = fspecial('average', 3);
F1=imfilter(G,h);
figure
subplot(2,1,1)imshow(F1)
title('filtro media "Ruido Gaussiano"')
subplot(2,1,2)
imhist(F1)
title('Histograma')
h = fspecial('average', 3);
F2=imfilter(J,h);
figure
subplot(2,1,1)imshow(F2)
title('filtro media "Ruido Sal y Pimienta"')
subplot(2,1,2)
imhist(F2)
title('Histograma')
%fitro media mascara 6x6
h = fspecial('average',6);
F3=imfilter(G,h);
figuresubplot(2,1,1)
imshow(F3)
title('filtro media "Ruido Gaussiano"')
subplot(2,1,2)
imhist(F3)
title('Histograma')
h = fspecial('average', 6);
F4=imfilter(J,h);
figuresubplot(2,1,1)
imshow(F4)
title('filtro media "Ruido Sal y Pimienta"')
subplot(2,1,2)
imhist(F4)
title('Histograma')

%filtro media masara 9x9
h = fspecial('average', 9);F5=imfilter(G,h);
figure
subplot(2,1,1)
imshow(F5)
title('filtro media "Ruido Gaussiano"')
subplot(2,1,2)
imhist(F5)
title('Histograma')
h = fspecial('average', 9);
F6=imfilter(J,h);figure
subplot(2,1,1)
imshow(F6)
title('filtro media "Ruido Sal y Pimienta"')
subplot(2,1,2)
imhist(F6)
title('Histograma')

%filtro mediana mascara 3x3
K =medfilt2(G,[3 3]);
figure
subplot(2,1,1)
imshow(K)
title('filtro mediana "ruido gausiano"')
subplot(2,1,2)
imhist(K)
title('Histograma')
K0 = medfilt2(J,[3 3]);
figure
subplot(2,1,1)
imshow(K0)...