在matlab中计算S变换及其平方值
compute S transform and its square value in matlab
让我们考虑以下摘自
的代码
计算 S 变换,这是我的代码
function ST=stran(h)
% Compute S-Transform without for loops
%%% Coded by Kalyan S. Dash %%%
%%% IIT Bhubaneswar, India %%%
[~,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);
G=exp((-W.^2)/2); %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
并考虑跟随线性调频信号
>> t = 0:0.001:2;
x = chirp(t,100,1,200,'quadratic');
我需要确认我是否正确执行以下操作
>> ST=stran(x);
>> plot(abs(ST))
?
图片在这里
发布我的评论作为答案:
我不太了解 s 变换,但据我所知,它的结果是一个 3D 信号(正如您可以在 ST 的大小中清楚地看到的那样),所以您可能想要做 imagesc(abs(ST))
或 surf(abs(ST),'linestyle','none')
而不是 plot.
你的图中画了1000行,所以才这么乱。
使用
imagesc(abs(ST))
让我们考虑以下摘自
的代码计算 S 变换,这是我的代码
function ST=stran(h)
% Compute S-Transform without for loops
%%% Coded by Kalyan S. Dash %%%
%%% IIT Bhubaneswar, India %%%
[~,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);
G=exp((-W.^2)/2); %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
并考虑跟随线性调频信号
>> t = 0:0.001:2;
x = chirp(t,100,1,200,'quadratic');
我需要确认我是否正确执行以下操作
>> ST=stran(x);
>> plot(abs(ST))
?
图片在这里
发布我的评论作为答案:
我不太了解 s 变换,但据我所知,它的结果是一个 3D 信号(正如您可以在 ST 的大小中清楚地看到的那样),所以您可能想要做 imagesc(abs(ST))
或 surf(abs(ST),'linestyle','none')
而不是 plot.
你的图中画了1000行,所以才这么乱。
使用
imagesc(abs(ST))