jacexpfit.m

来自「A sparse variant of the Levenberg-Marqua」· M 代码 · 共 8 行

function jac = jacexpfit(p, data)
  n=data;
  m=max(size(p));

  for i=1:n
    jac(i, 1:m)=[exp(-p(2)*i), -p(1)*i*exp(-p(2)*i), 1.0];
  end