www.gusucode.com > mbcmodels 工具箱 matlab 源码程序 > mbcmodels/@xregusermod/lsqopt.m

    function [r,J]=lsqopt(p,U,varargin);
%XREGUSERMOD/LSQOPT cost function for least squares (fmincon)

%  Copyright 2000-2004 The MathWorks, Inc. and Ford Global Technologies, Inc.



U.parameters=p(:);
if nargout==2
   [r,J]= lsqcost(U,varargin{:});
   J= -J;
else
   [r]= lsqcost(U,varargin{:});
end