grad_gauss.m

来自「《移动衰落信道》Mobiel_Fading_Channels一书后面的相关仿真程」· M 代码 · 共 31 行

%-------------------------------------------------------------------- 
% grad_Gauss.m ------------------------------------------------------ 
% 
% Computation of the analytical gradient of the error function for  
% the optimization of the discrete Doppler frequencies  
% (Gaussian PSD). 
% 
% Used m-file: acf_mue. 
%-------------------------------------------------------------------- 
% G=grad_Gauss(x) 
%-------------------------------------------------------------------- 
% Explanation of the input parameters: 
% 
% x: parameter vector to be optimized  
 
function G=grad_Gauss(x) 
 
load data 
 
f_i_n=x; 
r=acf_mue(f_i_n,c_i_n,tau); 
D=r_mm-r; 
F=norm(D,p); 
G=[]; 
for k=1:N_i, 
    g=F^(1-p)*D.^(p-1)*(2*pi*c_i_n(k)^2*tau.*... 
      sin(2*pi*f_i_n(k)*tau)).'; 
    G=[G;g]; 
end