tiaoyueshu2.m

来自「计算不等式约束情况下二次规划问题」· M 代码 · 共 20 行

function [flag,w1,x1]=TiaoYueSu2(W,X,Te)
  m=size(W,2);
  k=0;
 [t,h,l]=FindMin(Te); %找最小的Lagrange乘子
  if (t>=0)  %Lagrange乘子大于0，flag置1，求解成功
     flag=1;
  else 
     flag=0;   %Lagrange乘子小于0，flag置0，求解不成功
     for i=1:m   %将最小的Lagrange乘子所对应的约束方程消去
         if (W(1,i)~=0)
             k=k+1;
             if (k==h)
                 W(1,i)=0;
             end
         end
     end
  end
     x1=X;
     w1=W;