pos_retmin1.m

来自「线性规划算法」· M 代码 · 共 15 行

function [p,i]=pos_retmin1(X)
n=length(X);
m=1;
q=0;
while m<=n
    if X(m)<0
        if X(m)<q
            q=X(m);
            j=m;
        end       
    end
    m=m+1;
end
p=q;
i=j;