format rat
c=[3 4 5 6];
Aeq=[1 1 0 0;0 0 1 1;1 0 1 0;0 1 0 1];
beq=[4 4 5 3];
A=[];
b=[];
VIB=[0 0 0 0];
VUB=[];
x=linprog(c,A,b,Aeq,beq,VIB,VUB);
结果x1=4 x2=0 x3=1 x4=3
分配问题
f=[2,2,3,4];
A=[1,3,0,0;0,0,1,4;-1,0,-1,0;0,-1,0,-1];
b=[5;4;-1;-2];
lb=[0 0 0 0];
ub=[];
[x,fval]=linprog(f,A,b,[],[],lb,ub);
结果x1=1
x2=4/3
x3=0
x4=2/3
河流污染与净化问题
f=[1000 800];
A=[-1 0;-0.8 -1;1 0;0 1];
b=[-1;-1.6;2;1.4];
lb=zeros(2,1);
[x,fval,exitflag]=linprog(f,A,b,[],[],lb)
结果x1=1.0000 x2=0.8000