用MATLAB写的单纯形法

单纯形解法

解：化为标准形式 

 

矩阵形式

 

MATLAB程序：

function  [x,minf] = SimpleMthd(A,c,b,baseVector)

sz = size(A);

nVia = sz(2);

n = sz(1);

xx = 1:nVia;

nobase = zeros(1,1);

m = 1;

 

for i=1:nVia

    if(isempty(find(baseVector == xx(i),1)))

        nobase(m) = i;

        m = m + 1;