To check out this repository please hg clone the following URL, or open the URL using EasyMercurial or your preferred Mercurial client.

Statistics Download as Zip
| Branch: | Revision:

root / _beattracker / ftacf.m @ 8:b5b38998ef3b

History | View | Annotate | Download (148 Bytes)

1 
function acf = ftacf(x)
2 

    		
  

  

    
      3
    
    
      

    		
  

  

    
      4
    
    
      
x = x(:);


    		
  

  

    
      5
    
    
      

    		
  

  

    
      6
    
    
      
[M,N] = size(x);


    		
  

  

    
      7
    
    
      

    		
  

  

    
      8
    
    
      
X = fft(x,2^nextpow2(2*M-1));


    		
  

  

    
      9
    
    
      
acf = ifft(X.*conj(X));


    		
  

  

    
      10
    
    
      

    		
  

  

    
      11
    
    
      
acf = acf(1:M)./[M:-1:1]';