声振论坛

 找回密码
 我要加入

QQ登录

只需一步,快速开始

查看: 4361|回复: 8

[其他] 求(短时傅立叶变换的程序)

[复制链接]
发表于 2006-6-16 10:17 | 显示全部楼层 |阅读模式

马上注册,结交更多好友,享用更多功能,让你轻松玩转社区。

您需要 登录 才可以下载或查看,没有账号?我要加入

x
多谢!!!!!!!!!!!!!!!
回复
分享到:

使用道具 举报

发表于 2006-6-16 13:08 | 显示全部楼层
本帖最后由 wdhd 于 2016-9-14 10:22 编辑

  我也需要,那位大哥有,小弟多谢了。

  我的邮箱是:zhouql_0991@163.com
发表于 2006-6-16 20:03 | 显示全部楼层
论坛里有
发表于 2006-6-16 20:08 | 显示全部楼层
本帖最后由 wdhd 于 2016-9-14 10:22 编辑

  x=exp(j*pi*k*t.^2)

  clear,clc,close all

  figure(1)

  k=4;T=5;

  fc=k*T;

  fs=3*fc;

  Ts=1/fs;

  N=T/Ts;

  x=zeros(1,N);

  t=0:N-1;

  x=exp(j*k*pi*(t*Ts).^2);

  % x=awgn(x,-3,'measured');

  subplot(221)

  plot(t*Ts,real(x))

  X=fft(x);

  X=fftshift(X);

  subplot(222)

  plot((t-N/2)*fs/N,abs(X))

  Nw=20;

  L=Nw/2;

  Tn=(N-Nw)/L+1;

  nfft=32;

  TF=zeros(Tn,nfft);

  for i=1:Tn

  xw=x((i-1)*10+1:i*10+10);

  temp=fft(xw,nfft);

  temp=fftshift(temp);

  TF(i,:)=temp;

  end

  subplot(223)

  fnew=((1:nfft)-nfft/2)*fs/nfft;

  tnew=(1:Tn)*L*Ts;

  [F,T]=meshgrid(fnew,tnew);

  mesh(F,T,abs(TF))

  subplot(224)

  contour(F,T,abs(TF))

评分

1

查看全部评分

 楼主| 发表于 2006-6-17 14:07 | 显示全部楼层
本帖最后由 wdhd 于 2016-9-14 10:23 编辑

  多谢zhao19764

  我的毕业设计还差这个程序了
发表于 2006-6-17 20:26 | 显示全部楼层

回复:(xiaozuov)求(短时傅立叶变换的程序)

时频分析工具箱中就有
 楼主| 发表于 2006-6-17 22:46 | 显示全部楼层

回复:(simon21)回复:(xiaozuov)求(短时傅立叶变...

本帖最后由 wdhd 于 2016-9-14 10:23 编辑

  多谢哈
发表于 2007-6-11 13:44 | 显示全部楼层
多谢,找了好长时间了。
发表于 2009-3-1 22:09 | 显示全部楼层
我就是需要这个来研究
您需要登录后才可以回帖 登录 | 我要加入

本版积分规则

QQ|小黑屋|Archiver|手机版|联系我们|声振论坛

GMT+8, 2024-11-11 17:32 , Processed in 0.067333 second(s), 23 queries , Gzip On.

Powered by Discuz! X3.4

Copyright © 2001-2021, Tencent Cloud.

快速回复 返回顶部 返回列表