No BSD License
function [f,J]=LSBox(x) t=(0:.1:2)'; v1=exp(-t*x(1));v2=exp(-t*x(2));v3=exp(-t)-exp(-10*t); f=v1-v2-x(3)*v3; J=[]; J=[-t.*v1 t.*v2 -v3]; if nargin==2 J=[-t.*v1 t.*v2 -v3]; end %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
Contact us at files@mathworks.com