filter moda

Esta é uma pré-visualização de arquivo. Entre para ver o arquivo original

%Questão EXTRA: Filtro MODA
function img_in=test(nome_entrada,nome_saida,tipo);
%Leitura da Imagem
img_in=imread(nome_entrada,tipo);
%Leitura das dimensoes da imagem
[lin,col,can]=size(img_in);
%Laço de aplicação do filtro
for i=1:can
 %Filtro da MODA 1
 modeImage(:,:,i) = uint8(colfilt(img_in(:,:,i),[5 5],'sliding',@mode));
end
%Escrevendo a imagem
imwrite(uint8(modeImage),nome_saida,tipo);
figure
subplot(1, 2, 1); imshow(nome_entrada); title('Original Imagem');
subplot(1, 2, 2); imshow(nome_saida); title('Filtro MODA');
clc;
return;