fun_gauss1.m

来自「无线移动信道的matlab源码 用于对无线通信信道的编程实现」· M 代码 · 共 34 行

%--------------------------------------------------------------------
% fun_Gauss.m -------------------------------------------------------
%
% Computation of the error function according to Eq.(5.61) for the  
% optimization of the discrete Doppler frequencies (Gaussian PSD).
%
% Used m-file: acf_mue.m
%--------------------------------------------------------------------
% F=fun_Gauss(x)
%--------------------------------------------------------------------
% Explanation of the input parameters:
%
% x: parameter vector to be optimized 

function F=fun_Gauss1(x)

load data
f_i_n=x;


r=acf_mue(f_i_n,c_i_n,tau);
% F=norm(abs(r_mm-r),p);
F=abs(r_mm-r).^2;
if PLOT==1,
   plot(tau,r_mm,'-',tau,r,'o')
   xlabel('tau,s')
   ylabel('ACF')
   legend('r','r~')

   pause(0)

end

save x x