  | 
            | 
            | 
            | 
        
         
            | 
          
            | 
            | 
        
         
            | 
            A Package to Eliminate Discontinuities in the Phase of an FFT
   | 
            | 
        
        
            | 
          
            | 
            | 
        
         
            | 
           
 | Organization:  | Naval Air Warfare Center, Aircraft Division |  
   | 
            | 
        
        
            | 
          
            | 
            | 
        
         
            | 
            0211-026
   | 
            | 
        
        
            | 
          
            | 
            | 
        
         
            | 
            2004-05-14
   | 
            | 
        
        
            | 
          
            | 
            | 
        
         
            | 
            A Packege called SmoothPhase.m is provided and demonstrated in the notebook SmoothPhase.nb. The package defines a function by the same name. To understand what the package does consider a list of numeric values named (data). If (phase=Arg[Fourier[data]]) then ListPlot[phase] often shows sudden jumps between Pi and -Pi. SmoothPhase[phase] assumes the elements of (phase) have units of radians and returns an equivalent list with minimal jumps between adjacent samples. SmoothPhase can take a list or matrix of numeric values with no imaginary part. SmoothPhase has an option called Period and the setting (Period->360) will cause SmoothPhase to assume the elements of (phase) have units of degrees.
   | 
            | 
        
        
            | 
          
            | 
            | 
        
         
            | 
           
   | 
            | 
        
        
            | 
          
            | 
            | 
        
         
            | 
            Phase, Discontiuous, Discontinuity, Jumps, Jump, smooth
   | 
            | 
        
        
            | 
          
            | 
            | 
        
         
            | 
           
  | SmoothPhase.m (4.3 KB) - Mathematica package [for Mathematica 5.0] |   | SmoothPhase.nb (8.4 KB) - Mathematica notebook [for Mathematica 5.0] |  
   | 
            |