实验2单纯形法求解线性规划[精心整理].docVIP

实验2 单纯形法求解线性规划 成绩 专业班级 学号 姓名 报告日期 . 实验类型：●验证性实验 ○综合性实验 ○设计性实验 实验目的：进一步熟练掌握单纯形法求解线性规划。 实验内容：单纯形法求解线性规划4个（题目自选） 实验原理 首先要找到一个初始基本可行解，求出对应的检验数，判断其是否是最优解，如果是就停止计算；否则，就进行迭代找到另一个能使得目标函数值更优的基本可行解，然后再判断其是否是最优解，如此反复进行下去，直到找到最优解或者判断线性规划问题无解为止（线性规划解有四种情形，唯一最优解，无穷多个最解，无界解，无可行解）。 实验步骤 1 要求上机实验前先编写出程序代码 2 编辑录入程序 3 调试程序并记录调试过程中出现的问题及修改程序的过程 4 经反复调试后，运行程序并验证程序运行是否正确。 5 记录运行时的输入和输出。 预习编写程序代码： 实验报告：根据实验情况和结果撰写并递交实验报告。 实验总结： 参考程序 1.编写程序代码：myprgmh.m function [xx,b,fm,sgma,AA,flg]= myprgmh(m1,m,n,A,b,c) % 单纯形法求解性规划函数。默认标准型人工变量在最前、剩余变量在后构成基本量; % m1 人工变量的个数；m 基变量的个数； n 所有变量的个数; % A 约束方程的系数矩阵; % b 约束方程右端列向量;输出 b 基变量的值; % c 目标函数的系数。cb 基变量的系数 % 输出 xx 为基变量的下标; % fm 输出目标函数的值; % flg 表示解得四种情况; B0=A(:,1:m); % B0 初始可行基矩阵（单位矩阵）; cb=c(:,1:m); xx=1:m; % xx 变量的下标; sgma=c-(cb*B0)*A; % sgma 检验数; h=-1; sta=ones(m,1); for i=1:n if sgma(i)0 h=1; end end vv=0; while h0 [msg,mk]=max(sgma); for i=1:m if A(i,mk)0 sta(i)=b(i)/A(i,mk); else sta(i)=10000; end end [mst,mr]=min(sta); if mst==10000 flg=unbounded solution; fm=inf; xx=[]; b=[]; h=-1; vv=1; AA=[]; else zy=A(mr,mk) for i=1:m if i==mr for j=1:n A(i,j)=A(i,j)/zy; end b(i)=b(i)/zy; else end end for i=1:m if i~=mr amk=A(i,mk); b(i)=b(i)-amk*b(mr); for j=1:n A(i,j)=A(i,j)-amk*A(mr,j); end else end A; B1=A(:,1:m); % B1 新基的逆矩阵; cb(mr)=c(mk); xx(mr)=mk; sgma=c-cb*A; h=-1; for i=1:n if sgma(i)0 h=1; end end end cb b fm=sum(cb*b); if (h==-1)(vv~=1) vv=0; for i=1:m if xx(i)=m1 vv=vv+2; end