图像增强MATLAB tell

[qq_39215987]

clcA1=imread('lena.bmp'); %读入图像A=rgb2gray(A1);%平均滤波（滑动窗口）b1=fspecial('average',3);%生成滤波算子B1=imfilter(A,b1);B2=medfilt2(A); %中值滤波AA=double(A);w1=[0 1 0; 1 -4 1; 0 1 0];B3=imfilter(AA,w1,'corr','replicate'); %拉普拉斯锐化滤波，在滤波过程中使用相关；图像大小通过复制外边界的值来扩展，以此来处理边界充零问题AAA=imnoise(A,'salt & pepper',0.25); %加噪声AAAA=double(AAA);C1=imfilter(AAA,b1);C2=medfilt2(AAA);C3=imfilter(AAAA,w1,'corr','replicate');B4=edge(A,'sobel',0.1);B5=edge(A,'Roberts',0.1);C4=edge(AAA,'sobel',0.1);C5=edge(AAA,'Roberts',0.1);figure(1),subplot(2,7,1),imshow(A),title('原图');subplot(2,7,2),imshow(B1),title('均值滤波');subplot(2,7,3),imshow(B2),title('中值滤波');subplot(2,7,4),imshow(B3,[]),title('拉普斯锐化');subplot(2,7,5),imshow(AA-B3,[]),title('锐化后图像');subplot(2,7,6),imshow(B4),title('soble锐化');subplot(2,7,7),imshow(B5),title('Roberts锐化');subplot(2,7,8),imshow(AAA),title('加噪声');subplot(2,7,9),imshow(C1),title('均值滤波');subplot(2,7,10),imshow(C2),title('中值滤波');subplot(2,7,11),imshow(C3,[]),title('拉普斯锐化'); subplot(2,7,12),imshow(AAAA-C3,[]),ti