声振论坛

 找回密码
 我要加入

QQ登录

只需一步,快速开始

查看: 1752|回复: 3

[综合讨论] S变换的导数怎么求解啊

[复制链接]
发表于 2019-8-29 11:46 | 显示全部楼层 |阅读模式

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

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

x
根据mathwork提供的st函数stran改写的,理论上将高斯窗求导,不知道对不对,希望能得到各位大佬的指点,主要是为了计算S变换的同步挤压,求出能够挤压的瞬时频率点。
function ST=istran(h)
% Compute S-Transform without for loops
%%% Coded by Kalyan S. Dash %%%
%%% IIT Bhubaneswar, India %%%
h=h';
[~,N]=size(h); % h is a 1xN one-dimensional series
nhaf=fix(N/2);
odvn=1;
if nhaf*2==N;
    odvn=0;
end
f=[0:nhaf -nhaf+1-odvn:-1]/N;
Hft=fft(h);
%Compute all frequency domain Gaussians as one matrix
invfk=(1./f(2:nhaf+1))';
W=2*pi*repmat(f,nhaf,1).*repmat(invfk,1,N);
dW=2*pi*repmat(invfk,1,N);
G=exp((-W.^2)/2);
G=(-W.*dW).*G;%Gaussian in freq domain
% End of frequency domain Gaussian computation
% Compute Toeplitz matrix with the shifted fft(h)
HW=toeplitz(Hft(1:nhaf+1)',Hft);
% Exclude the first row, corresponding to zero frequency
HW=[HW(2:nhaf+1,:)];
% Compute Stockwell Transform
ST=ifft(HW.*G,[],2); %Compute voice
%Add the zero freq row
st0=mean(h)*ones(1,N);
ST=[st0;ST];
end
回复
分享到:

使用道具 举报

您需要登录后才可以回帖 登录 | 我要加入

本版积分规则

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

GMT+8, 2024-11-15 10:13 , Processed in 0.095337 second(s), 27 queries , Gzip On.

Powered by Discuz! X3.4

Copyright © 2001-2021, Tencent Cloud.

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