• 大小: 1.92MB
    文件类型: .zip
    金币: 1
    下载: 0 次
    发布日期: 2023-10-11
  • 语言: 其他
  • 标签:

资源简介

给需要的人,安装方式写个博客吧我,很简单的,希望帮助大家!

资源截图

代码片段和文件信息

%  This program is free software; you can redistribute it and/or modify
%  it under the terms of the GNU General Public License as published by
%  the Free Software Foundation; either version 2 of the License or
%  (at your option) any later version.
%
%  This program is distributed in the hope that it will be useful
%  but WITHOUT ANY WARRANTY; without even the implied warranty of
%  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
%  GNU General Public License for more details.
%
%  You should have received a copy of the GNU General Public License
%  along with this program; if not write to the Free Software
%  Foundation Inc. 51 Franklin St Fifth Floor Boston MA  02110-1301  USA
echo off
%PARAMFUN Figures representing different TFD of the Cohen‘s class.
% On the left the ambiguity plane and the weighting functions ;
% On the right the time-frequency distributions.

% O. Lemoine - February July 1996. 


if ~exist(‘paramfun.mat‘)
 echo on
 %
 % PARAMFUN does not exist.
 %
 % You haven‘t created “paramfun.mat“. Please run ??? to proceed.
 % The next part of the demo is skipped.
 %
else
load paramfun
Ncont=5;

subplot(321);
contour(dlr([(N+rem(N2))/2+1:N 1:(N+rem(N2))/2]:)8); 
xlabel(‘Delay‘); ylabel(‘Doppler‘);
title(‘Wigner-Ville weighting function‘)
set(gca‘yTickLabel‘[])
set(gca‘xTickLabel‘[])
hold on
[ah]=contour(WF1[1/2]‘g‘);
set(h‘linewidth‘2);
hold off

subplot(322);
Max=max(max(tfr1));
levels=linspace(Max/10MaxNcont);
contour(tfr1levels);
xlabel(‘Time‘); ylabel(‘Frequency‘);
title(‘Wigner-Ville distribution‘)
set(gca‘yTickLabel‘[])
set(gca‘xTickLabel‘[])

subplot(323);
contour(dlr([(N+rem(N2))/2+1:N 1:(N+rem(N2))/2]:)8); 
xlabel(‘Delay‘); ylabel(‘Doppler‘);
title(‘Spectrogram weighting function‘);
set(gca‘yTickLabel‘[])
set(gca‘xTickLabel‘[])
hold on
[ah]=contour(WF2[1/2]‘g‘);
set(h‘linewidth‘2);
hold off

subplot(324);
Max=max(max(tfr2));
levels=linspace(Max/10MaxNcont);
contour(tfr2(1:N/2:)levels);
xlabel(‘Time‘); ylabel(‘Frequency‘);
title(‘Spectrogram‘)
set(gca‘yTickLabel‘[])
set(gca‘xTickLabel‘[])

subplot(325);
contour(dlr([(N+rem(N2))/2+1:N 1:(N+rem(N2))/2]:)8); 
xlabel(‘Delay‘); ylabel(‘Doppler‘);
title(‘SP-WV weighting function‘);
set(gca‘yTickLabel‘[])
set(gca‘xTickLabel‘[])
hold on
[ah]=contour(WF3[1/2]‘g‘);
set(h‘linewidth‘2);
hold off

subplot(326);
Max=max(max(tfr3));
levels=linspace(Max/10MaxNcont);
contour(tfr3levels);
xlabel(‘Time‘); ylabel(‘Frequency‘);
title(‘Smoothed-pseudo-WVD‘);
set(gca‘yTickLabel‘[])
set(gca‘xTickLabel‘[])


figure(2);

subplot(221);
contour(dlr([(N+rem(N2))/2+1:N 1:(N+rem(N2))/2]:)8); 
xlabel(‘Delay‘); ylabel(‘Doppler‘);
title(‘Born-Jordan weighting function‘);
set(gca‘yTickLabel‘[])
set(gca‘xTickLabel‘[])
hold on
[ah]=contour(WF4[1/2]‘g‘);
set(h‘linewidth‘2);
hold off

subplot(222);
Max=max(max(tfr4));
lev

 属性            大小     日期    时间   名称
----------- ---------  ---------- -----  ----
     目录           0  2019-09-18 18:58  tftb-0.2\
     文件          64  2005-10-15 23:26  tftb-0.2\AUTHORS
     文件       18011  2005-10-13 23:03  tftb-0.2\COPYING
     目录           0  2019-09-18 18:58  tftb-0.2\CVS\
     文件         240  2008-02-15 23:38  tftb-0.2\CVS\Entries
     文件         106  2008-02-15 23:38  tftb-0.2\CVS\Entries.Log
     文件           5  2008-02-15 23:38  tftb-0.2\CVS\Repository
     文件          57  2008-02-15 23:38  tftb-0.2\CVS\Root
     文件        1057  2008-02-15 19:59  tftb-0.2\INSTALL
     文件        1713  2005-10-15 23:26  tftb-0.2\README
     文件         149  2005-10-15 23:26  tftb-0.2\THANKS
     目录           0  2019-09-18 18:58  tftb-0.2\data\
     目录           0  2019-09-18 18:58  tftb-0.2\data\CVS\
     文件         129  2008-02-15 23:38  tftb-0.2\data\CVS\Entries
     文件          10  2008-02-15 23:38  tftb-0.2\data\CVS\Repository
     文件          57  2008-02-15 23:38  tftb-0.2\data\CVS\Root
     文件       16568  2005-10-13 23:06  tftb-0.2\data\bat.mat
     文件      348866  2005-10-13 23:06  tftb-0.2\data\gabor.mat
     文件       34816  2005-10-13 23:06  tftb-0.2\data\movcw4at.mat
     目录           0  2019-09-18 18:58  tftb-0.2\demos\
     目录           0  2019-09-18 18:58  tftb-0.2\demos\CVS\
     文件         380  2008-02-15 23:38  tftb-0.2\demos\CVS\Entries
     文件          11  2008-02-15 23:38  tftb-0.2\demos\CVS\Repository
     文件          57  2008-02-15 23:38  tftb-0.2\demos\CVS\Root
     文件        3697  2007-04-23 18:24  tftb-0.2\demos\paramfun.m
     文件        1552  2005-10-13 23:13  tftb-0.2\demos\tfdemo.m
     文件        5988  2005-10-13 23:13  tftb-0.2\demos\tfdemo1.m
     文件       10051  2005-10-13 23:13  tftb-0.2\demos\tfdemo2.m
     文件       10367  2005-10-13 23:13  tftb-0.2\demos\tfdemo3.m
     文件       14603  2005-10-13 23:13  tftb-0.2\demos\tfdemo4.m
     文件       10543  2005-10-13 23:13  tftb-0.2\demos\tfdemo5.m
............此处省略516个文件信息

评论

共有 条评论

相关资源