您所在位置：主题：[讨论]请教各位高手：这个小程序错在那里？？（2007a中）
bulekala
[专家分：0] 发布于 2007-07-23 17:22:00
function f=myfun(x,a1)
f=x(1)^2 + a1*x(2)^2;
function [c,ceq] = mycon(x,a2)
c=a2/x(1) - x(2);
ceq =[];
a1=2; a2=1.5; % define parameters first
options=optimset('LargeScale','off'); % run medium-scale algorithm
x=fmincon(@(x)myfun(x,a1),[1;2],[],[],[],[],[],[],@(x)mycon(x,a2),options)[em10][em10][em10][em10]
f=x(1)^2 + a1*x(2)^2;
function [c,ceq] = mycon(x,a2)
c=a2/x(1) - x(2);
ceq =[];
a1=2; a2=1.5; % define parameters first
options=optimset('LargeScale','off'); % run medium-scale algorithm
x=fmincon(@(x)myfun(x,a1),[1;2],[],[],[],[],[],[],@(x)mycon(x,a2),options)[em10][em10][em10][em10]