function Z=dcxf(c,A,N) %定义函数名称为dcxf。l=length(N);CB=c(N(1):N(l)m,n=size(A);b=A(:,n);A=A(:,1:n-1);%参数包括目标函数系数(C)，约束条件的系数矩阵(A)，%其中A的最后一列为约束条件的右端值b，初始基向量的位置(N)。sigma=c-CB*A;%计算检验数sigma。display(初始单纯形表为:);%输出初始的单纯形表table=nan,nan,nan,c;CB,N,b,A;nan,nan,nan,sigmaopt=1;step=0;while optstep=step+1;%定义循环，直到第“step”步找到最优解(opt=0)。if sum(sigma0)=0 %利用检验数判断是否得到最优解，并给出提示。 display(没有得到最优解,继续迭代); opt=0; elseinb=find(sigma=max(sigma); %利用单纯形方法找到入基
