图像处理上机作业题.docxVIP

  1. 1、原创力文档(book118)网站文档一经付费(服务费),不意味着购买了该文档的版权,仅供个人/单位学习、研究之用,不得用于商业用途,未经授权,严禁复制、发行、汇编、翻译或者网络传播等,侵权必究。。
  2. 2、本站所有内容均由合作方或网友上传,本站不对文档的完整性、权威性及其观点立场正确性做任何保证或承诺!文档内容仅供研究参考,付费前请自行鉴别。如您付费,意味着您自己接受本站规则且自行承担风险,本站不退款、不进行额外附加服务;查看《如何避免下载的几个坑》。如果您已付费下载过本站文档,您可以点击 这里二次下载
  3. 3、如文档侵犯商业秘密、侵犯著作权、侵犯人身权等,请点击“版权申诉”(推荐),也可以打举报电话:400-050-0827(电话支持时间:9:00-18:30)。
  4. 4、该文档为VIP文档,如果想要下载,成为VIP会员后,下载免费。
  5. 5、成为VIP后,下载本文档将扣除1次下载权益。下载后,不支持退款、换文档。如有疑问请联系我们
  6. 6、成为VIP后,您将拥有八大权益,权益包括:VIP文档下载权益、阅读免打扰、文档格式转换、高级专利检索、专属身份标志、高级客服、多端互通、版权登记。
  7. 7、VIP文档为合作方或网友上传,每下载1次, 网站将根据用户上传文档的质量评分、类型等,对文档贡献者给予高额补贴、流量扶持。如果你也想贡献VIP文档。上传文档
查看更多
2、用Matlab语言编写直方图规定化程序 clc; I=imread(,tire. tif,); J=histeq(I, 32); [counts, x]二imhist (J); Q=imread (J eight? tif,); figure; imshow(Q); figure; imhist(Q); M=histeq(Q, counts); figure; imshow(M); figure; imhist(M); 3、编写程序实现半邻域选择平均法进行空间域图像平滑的程序。 clear;clc; I=imread(1 pout?tif); J=imnoise(I, 1 salt pepper 1,0.02); K=filter2(fspecial(1 average 1,3),J)/255; subplot(131),imshow(I); subplot(132),imshow(J); subplot(133),imshow(K); 4、针对某种平滑方法,比较对高斯噪声,椒盐噪声和乘法性噪声的去噪效果 %% %使用二维中值滤波对噪声进行处理 clc; %% %原始图像以及加上噪声后的图像 [I,map]=imread(fpout.tif); imshow(I5map); noisyl=imnoise(I, gaussian*, 0.05);%加入 0.05 的高斯白噪声 noisy2=imnoise(I,‘salt pepper, 0.05);%加入 0.05 的椒盐噪声 noisy3=imnoise(I, speckle, 0.05);%加入 0.05 的乘法性噪声 figure; imshow(noisy 1 ,map); figure; imshow(noisy2,map); figure; imshow(noisy3,map); %% %二维窗口越大图像细节丢失越多 % 3*3窗口的二维屮值滤波 hood=3; filtered 1 =medfilt2(noisy 1 Jhood hood]); filtered2=medfilt2(noisy2Jhood hood]); filtered3=medfilt2(noisy3,[hood hood]); figure; imshow(filteredl); figure; imshow(filtered2); figure; imshow(filtered3); 原图像 加噪声后 去噪芮后 5、编写掩模匹配法实现锐化的程序,对同一图像比较Robison, Prewitt及Kirsch模板的锐 化效果 %% % RobisonA£oaNUA£5:¥Aa- clc; [1,map]=imread(pout ?tif); imshow(I,map); [M N]=size (I); %% myfilt1=[ 1 2 1; 0 0 0; -1 -2 -1]; filteredl=filter2(myfiltl,I); %% myfilt2=[ 2 1 0; 1 0 -1; 0 -1 -2]; filtered2=filter2(myfilt2,I); %% myfilt3=[ 1 0 -1; 2 0 -2; 1 0 -1]; filtered3=filter2(myfilt3, I); %% myfilt4=[ 0 -1 -2; 1 0 -1; 2 10]; filtered4=filter2(myfilt4,I); %% myfilt5=[-1 -2 -1; 0 0 0; 12 1]; filtered5=fil(myfilt5zI); %% myfilt6=[-2 -1 0; -1 0 -1; 0 1 2]; filtered6=fil(myfilt6ZI); %% myfilt7=[-l 0 1; -2 0 2; -1 0 1]; filtered7=filter2(myfilt7/ I); %% myfilt8=[ 0 1 2; -1 0 1; -2 -1 0]; filtered8=fil(myfilt8ZI); %% for i=l:M for j=l:N x=[filteredl(i,j), filtered2(iz j), filtered3(i,j) , filtered4(iz j),... filtered5(iz j), filtered6(iz j), filtered?(iz j) , filtered8(i, j)]; OUT(i,j)=max(x); end end figure; imshow(OUT,map); % PrewittEn?~pA3IB clc; %% [I,map]=imread(* pout.tif,); imsho

文档评论(0)

ggkkppp + 关注
实名认证
文档贡献者

该用户很懒,什么也没介绍

1亿VIP精品文档

相关文档