plotspectrum2.m

using Jakes model to simulate rayleigh channel fading

%%%%%%%%%%%%%    Plot Spectrum      %%%%%%%%%%%%%%% 
function Plot_Spectrum2=PlotSpectrum2(input,width) 
 
%%%%  width       % width of the siginal [s] 
%%%%  input       % samples of the siginal  
points =length(input);     % number of samples 
dt = width/points;       % sampling period 
 
signal= zeros(1,10*points); 
signal(1:points)=input; 
 
% ----------------------------- 
% Step - Calculate 
% ----------------------------- 
fs = 1/dt;         
N = length(signal);   
T = N * dt;          
df = 1/T;         
 
X = fft(signal);  
X = X/N;          
Freq=abs(X); 
Freq=fftshift(Freq); 
% ----------------------------- 
% Step - Plot 
% ----------------------------- 
frequency=linspace(-1,1,length(Freq)); 
PF=semilogy(frequency,Freq); 
grid on; 
%axis([-5e9 5e9 0 5e-9]); 
T=title('Transfer Function'); 
set(T,'FontSize',14); 
X=xlabel('Round Frequency [pi]'); 
set(X,'FontSize',14); 
Y=ylabel('Normalized Magnitude (dB)'); 
set(Y,'FontSize',14);