| 网站首页 | 业界新闻 | 小组 | 威客 | 人才 | 下载频道 | 博客 | 代码贴 | 在线编程 | 编程论坛
欢迎加入我们,一同切磋技术
用户名:   
 
密 码:  
共有 1097 人关注过本帖
标题:[求助]如何将傅立叶变换提取的形状参数还原回原来的图像?急~~~
只看楼主 加入收藏
ceerlingting
Rank: 1
等 级:新手上路
帖 子:2
专家分:0
注 册:2007-8-24
收藏
 问题点数:0 回复次数:1 
[求助]如何将傅立叶变换提取的形状参数还原回原来的图像?急~~~
clear all;
close all;
pic=imread('111.JPG');
pic=imresize(pic,0.1);
g=pic(:,:,1);
g=wiener2(g,[9 9]);
T=graythresh(g);
InputImageBin=im2bw(g,T);
%figure(1),imshow(InputImageBin);
pic4=edge(InputImageBin,'sobel');
%figure(2),imshow(pic4),title('sobel 算子');
se90=strel('line',4,90);
se0=strel('line',4,0);
BWsdil=imdilate(pic4,[se90 se0]);
%figure(3),imshow(BWsdil),title('膨胀操作');
bw=imfill(BWsdil,'holes');
[m,n]=size(bw);
bound = boundaries(bw); %生成边界
bound = bound{1};
z=frdescp(bound); %计算傅利叶描述子
zc=fftshift(z);
plot(abs(zc)) %频谱图
feature = abs(zc([1:13]))'
c=ifft(feature);
figure(4),imshow(log(abs(c)),[]);
title('傅利叶描述子图');

请问各位高手们,如何将
提取的形状参数还原回原来的图像.红色的程序哪里错了,怎么改?小弟在此先谢过了.
搜索更多相关主题的帖子: 傅立叶 图像 参数 形状 
2007-08-24 04:50
ceerlingting
Rank: 1
等 级:新手上路
帖 子:2
专家分:0
注 册:2007-8-24
收藏
得分:0 
自己先顶一下...
2007-08-24 04:50
快速回复:[求助]如何将傅立叶变换提取的形状参数还原回原来的图像?急~~~
数据加载中...
 
   



关于我们 | 广告合作 | 编程中国 | 清除Cookies | TOP | 手机版

编程中国 版权所有,并保留所有权利。
Powered by Discuz, Processed in 0.028516 second(s), 7 queries.
Copyright©2004-2024, BCCN.NET, All Rights Reserved