autocorr.m

using Jakes model to simulate rayleigh channel fading

%%%%%%%%%%%%%     Autocorr      %%%%%%%%%%%%%%% 
function Auto_co=Autocorr(vector)  %%%%  
len=length(vector); 
vector=real(vector); 
Normal=mean(vector.*vector); 
vector_shift=vector; 
auto_corr=[]; 
for i=1:len 
    auto_corr(i)=mean(vector_shift.*vector)/Normal; 
    vector_shift=[0,vector_shift]; 
    vector=[vector,0]; 
end; 
 
Auto_co=auto_corr;