MATLAB——FEEMD.rar

MATLAB多元统计与谱分析代码包，教师备课，学生做课后作业，练习必备，适合海洋大气等需要大量处理观测数据等专业

%function [ndataa]=blocknormalize（data）

% The function BLOCKNORMALIZE normalizes each block of the input signal 
% as defined by zero crossings to have a maximum amplitude of 1.
%
% Suggestion: if the routine is needed than use it with caution.
disp（‘Using block-normalize are you sure?!‘）
disp（‘Slope discontinuous will happen in left and right side about a zero‘）
pause（2）;    
%
% Calling sequence-
% [ndataa]=blocknormalize（data）
%
% Input-
%	data	- 2-D matrix data（nptncol） 
% Output-
%	ndata	- 2-D matrix of normalized data （FM）
%	   a	- 2-D matrix of envelope        （AM）
%
% Used by-
% 	FA

%written by 
% Kenneth Arnold （NASA GSFC）    Summer 2003 Initial
% Kenneth Arnold （NASA GSFC） June 6 2004 Tweaked
%footnote: S.C.Su （2009/09/01）
%this code is with complex structurebut easy meanings
%just remember about some easy sentences
%“Blocks are defined as those segments between the  zero-crossing points“
%“Finding the extreme value in each blockthe value is the amplitude of this block“
%
%1.read the datacheck input matrix
%2.Do the normalization  for an IMF ---loop A start
  %3.checking each data value from the beginning point of each block----loop B start
    %4.read the sign （+-0） form starting of every block 
    %5. make judgement block by blockstart from point 1-----loop C start 
      %6.judge the value about its signdifferent sign means the end of this block
      %7.judge the value about its signthe same sign means still in the same block
    %5. make judgement block by blockstart from point 1-----loop C end 
  %3.checking each data value from the beginning point of each block----loop B end
%2.Do the normalization  for an IMF ---loop A end    
%
function [ndataa]=blocknormalize（data）

%1.read the datacheck input matrix
%----- Get the dimension
[nptncol] = size（data）;

%----- Flip data if needed
flipped=0;
if （ncol > npt）
    data=data‘;
    [nptncol] = size（data）;
    flipped=1;
end

%----- Initialize amplitude matrix
a = ones（nptncol）;

%2.Do the normalization  for an IMF ---loop A start
%----- Process each column of data
for col=1:ncol
 
    i=1;
%3.checking each data value from the beginning point of each block----loop B start
    while （i<=npt）  
%4.read the sign （+-0） form starting of every block      
        blockSign = sign（data（icol））; %get blocksign : + or -or 0find it first
       
        % when zero is meetuse right-hand side sign as the blocksign for it
        while （blockSign == 0 & i < npt） % handle zero case 
            i=i+1;
            blockSign = sign（data（icol））;
        end
    
       
	  if （i==npt）
	   break; %after all values are checkedthis if help to stop “while“
   	end
   	
%5. make judgement block by blockstart from point 1-----loop C start 
        blockExtr = 0; % extreme value （maximum or minimum）
        
        
        %----- Find the end of this block and its extreme value
        for （j=i:npt） %this block from （i~j）
            j; %the jth value is the value that we are 

 属性            大小     日期    时间   名称
----------- ---------  ---------- -----  ----

     文件     112697  2014-04-01 17:02  FEEMD\BFVL.mat

     文件       4316  2009-10-08 01:34  FEEMD\blocknormalize.m

     文件       5770  2009-10-08 16:07  FEEMD\confidenceLine.m

     文件       2115  2009-10-08 16:07  FEEMD\dist_value.m

     文件       5276  2018-10-26 21:35  FEEMD\eemd.m

     文件        853  2009-10-08 15:37  FEEMD\emax.m

     文件      22140  2014-09-04 16:52  FEEMD\emd.mexa64

     文件      16896  2014-08-01 13:27  FEEMD\emd.mexw32

     文件      21504  2014-09-04 17:26  FEEMD\emd.mexw64

     文件        867  2009-10-08 15:36  FEEMD\emin.m

     文件       9997  2009-10-08 16:52  FEEMD\endprocess1.m

     文件       1296  2009-11-25 13:16  FEEMD\endprocess1.p

     文件       5152  2009-10-13 21:40  FEEMD\ex02d.m

     文件       1383  2014-09-04 18:01  FEEMD\example_eemd.m

     文件       4361  2009-10-08 15:59  FEEMD\extrema.m

     文件       7935  2009-10-27 04:03  FEEMD\fa.m

     文件       3356  2009-10-08 01:39  FEEMD\FAacos.m

     文件       3013  2009-10-21 16:40  FEEMD\FAcosfor.m

     文件       1528  2009-10-08 01:42  FEEMD\FAhilbert.m

     文件       1603  2009-10-27 04:11  FEEMD\FAimphilbert.m

     文件       7896  2009-10-08 01:42  FEEMD\FAquadrature.m

     文件       6695  2009-10-08 01:38  FEEMD\FAzc.m

     文件       3103  2009-10-08 15:46  FEEMD\findcriticalpoints.m

     文件       6536  2009-10-08 16:41  FEEMD\findEE.m

     文件      11957  2009-10-12 01:41  FEEMD\findEEfsp.m

     文件      13153  2009-10-11 12:08  FEEMD\fspecial.m

     文件       3794  2009-10-12 00:01  FEEMD\FSPHSP.m

     文件       2207  2009-10-11 16:47  FEEMD\hilbert.m

     文件       1683  2009-10-08 01:37  FEEMD\hilbertnormalize.m

     文件      18846  2009-10-27 04:06  FEEMD\hilbtm.m

............此处省略26个文件信息