N=[4 5];
[sol,val,kk]=ssimplex(A,N);
fprintf('参数:\\n%d %d %d ',sol(1,1:3)) fprintf('\\n')
fprintf('最大值:\\n%d\\n',val) clear
disp('小问题(3)解') A=[-1 1 3 1 0 20; 12 4 10 0 1 90; -5 5 8 0 0 0]; N=[4 5];
[sol,val,kk]=ssimplex(A,N);
fprintf('参数:\\n%d %d %d ',sol(1,1:3)) fprintf('\\n')
fprintf('最大值:\\n%d\\n',val)
25
clear
disp('小问题(4)解') A=[0 1 3 1 0 20; 5 4 10 0 1 90; -5 5 13 0 0 0]; N=[4 5];
[sol,val,kk]=ssimplex(A,N);
fprintf('参数:\\n%d %d %d ',sol(1,1:3)) fprintf('\\n')
fprintf('最大值:\\n%d\\n',val) clear
disp('小问题(5)解') A=[-1 1 3 1 0 0 20; 12 4 10 0 1 0 90; 2 3 5 0 0 1 50
26
-5 5 13 0 0 0 0]; N=[4 5 6];
[sol,val,kk]=ssimplex(A,N);
fprintf('参数:\\n%d %d %d ',sol(1,1:3)) fprintf('\\n')
fprintf('最大值:\\n%d\\n',val) clear
disp('小问题(6)解') A=[-1 1 3 1 0 20; 10 -5 10 0 1 100; -5 5 13 0 0 0]; N=[4 5];
[sol,val,kk]=ssimplex(A,N);
fprintf('参数:\\n%d %d %d ',sol(1,1:3)) fprintf('\\n')
27
fprintf('最大值:\\n%d\\n',val)
四、实验结果分析与评价
此实验可以清楚地观察到要素改变时最优解和最优值的变化情况。
28