clear?all;
close?all;

Ls?=?1024;
L?=?128;
L0?=?L?+?Ls;
sigda?=?zeros（1L0）;
dt?=?0.001;
dm?=?16;
N?=?64;
delta2?=?dm*N/（2*pi）;
signum?=?4;

k?=?0:L-1;
k1?=?0:Ls-1;
sigdata?=?signal（signumdtLs）;
sigda（1:Ls）?=?sigdata;
h?=?（（pi*delta2）.^-0.25）*exp（-（（k-（L-1）/2）.^2）/（2*delta2））;
[gCmn]?=?gabortrans（sigdahdmNL0L）;
resig?=?igabortrans（CmnhdmNL0L）;

figure（1）
t?=?k1*dt;
plot（tsigdata‘-b‘）;
grid?on
title（‘signal‘）;

figure（2）
Cmn_am?=?abs（Cmn）.^2;
pcolor（Cmn_am（1:N/2:））
shading?interp
title（‘Gabor?transform‘）;

figure（3）
t?=?k1*dt;
b?=?real（resig）;
error?=?b-sigdata;
plot（tb）;
hold?on
plot（terror‘r‘）
grid?on
title（‘Reconstruction?signal‘）;

figure（4）
wt?=?k*dt;
g?=?real（g）;
plot（wtg‘-b‘）;
hold?on
plot（wth‘--r‘）;
grid?on
title（‘windowgama‘）;

?屬性????????????大小?????日期????時間???名稱
-----------?---------??----------?-----??----

?????目錄??????????0??2009-10-23?10:46??Gabor

?????文件????????197??2009-08-28?16:27??Gabor\igabortrans.m

?????文件????????225??2009-08-29?10:50??Gabor\producei.m

?????文件????????546??2009-08-29?10:43??Gabor\signal.m

?????文件????????820??2009-08-29?11:26??Gabor\gabor.m

?????文件????????594??2009-08-29?10:50??Gabor\gabortrans.m

-----------?---------??----------?-----??----

?????????????????2382????????????????????6