run_lms_pred.m
上传用户:kendun0711
上传日期:2007-06-03
资源大小:32k
文件大小:1k
源码类别:

技术管理

开发平台:

Matlab

  1. function run_lms_pred(rp)
  2. % rp is a structure of run parameters with elements
  3. % Niter, Ndata, mult, verbose, alpha, a, var_v
  4. %  rp is created with the program makerp.m
  5. % Computer Experiment
  6. % Section 9.6, Adaptive Filter Theory, 3rd edition
  7. % First-order prediction
  8. seed    = 0:(rp.Nruns-1);
  9. rp.decay= 0;
  10. Npred   = rp.Ndata;
  11. E       = zeros(Npred, rp.Nruns);
  12. WX      = zeros(Npred, rp.Nruns);
  13. Xi0     = 0;
  14. for iter = 1:rp.Nruns,
  15.   randn('seed', seed(iter));
  16.   Xi = filter(1, [1 rp.a], [Xi0 ; sqrt(rp.var_v)*randn(rp.mult*rp.Ndata, 1)]);
  17.   disp(['run # ' num2str(iter)]);
  18.   disp(['  covariance of AR process = ' num2str(cov(Xi))]);%
  19.   Xi = Xi(((rp.mult-1)*rp.Ndata + 2):(rp.mult*rp.Ndata+1));
  20.   lms_AR_pred;
  21.   E(:,  iter) = e;
  22.   Wx(:, iter) = Wo';
  23. end;
  24. eval(['save ' rp.rname ' E Wx Xi rp'])