資源描述：
《純形表格法：simplexta》由會員上傳分享，免費在線閱讀，更多相關(guān)內(nèi)容在應(yīng)用文檔-天天文庫。
1、單純形算法步驟1：取得一個初始可行基，寫出初始可行基可行解，以及當前的目標函數(shù)值，計算所有檢驗數(shù)，。步驟2：考察所有檢驗值，若所有檢驗值，則當前基為最優(yōu)解，停。否則轉(zhuǎn)步驟3.步驟3：令。若，則無最優(yōu)解，停。否則轉(zhuǎn)步驟4.步驟4：令，用代替得新基。步驟5：新基的基可行解及判別數(shù)：轉(zhuǎn)步驟2.單純形表格法MATLAB程序：MATLAB優(yōu)化庫函數(shù)都是以最小化為標準，所以程序也以最小化為標準。的使用方法：先將一般線性規(guī)劃變?yōu)榫€性規(guī)劃的標準形式，再構(gòu)件初始單純形表格，輸入程序。例如：單純形表格為：1.初始輸入表786359945100010001111系數(shù)-1-1-10000
2、（值）注：（值）處顯示標準型（求min）的目標函數(shù)值。2.迭代過程表786359945100010001111判別數(shù)-1-1-10000在MATLAB的commandwindow輸入：mat=[7391001;8540101;6950011;-1-1-10000];numFreeVar=3;%注釋：自由變量個數(shù)simplexTab(mat,numFreeVar);在MATLAB的commandwindow輸出：初始結(jié)果：ans=thebestPivotis2rowang1colthesimplextableisans=7.00003.00009.00001.000
3、0001.00000.14298.00005.00004.000001.000001.00000.12506.00009.00005.0000001.00001.00000.1667-1.0000-1.0000-1.000000000pressanykeytocontinue第一次轉(zhuǎn)換結(jié)果：ans=thebestPivotis1rowang3colthesimplextableisans=0-1.37505.50001.0000-0.875000.12500.02271.00000.62500.500000.125000.12500.250005.25002.00
4、000-0.75001.00000.25000.12500-0.3750-0.500000.125000.12500pressanykeytocontinue第二次轉(zhuǎn)換結(jié)果：ans=thebestPivotis1rowang2colthesimplextableisans=0-0.25001.00000.1818-0.159100.0227-0.09091.00000.75000-0.09090.204500.11360.151505.75000-0.3636-0.43181.00000.20450.03560-0.500000.09090.045500.1364
5、0pressanykeytocontinue第三次轉(zhuǎn)換結(jié)果：ans=thebestPivotis3rowand1colthesimplextableisans=001.00000.1660-0.17790.04350.0316-0.09091.000000-0.04350.2609-0.13040.08700.151501.00000-0.0632-0.07510.17390.03560.03560000.05930.00790.08700.15420Itistheend!（表示程序運行完畢）最后得單純形表為：0100011000.16600-0.04350.06
6、32-0.177910.2609-0.07510.04350-0.13040.17390.031610.08700.0356-0.09090.15150.0356判別數(shù)0000.05930.00790.08700.15420X=（0.0316，0.0870,0.0356），g=0.1542,=-0.1542.主程序：functionsimplexTab(mat,numFreeVar)%Recodebyariszheng%20070809%%%輸入：%mat單純形表%numFreeVar自由變量個數(shù)formatshort%檢驗和尋找最佳判別數(shù)%maxRow,maxC
7、ol單純形表的行數(shù)和列數(shù)maxRow=length(mat(:,1));maxCol=length(mat(1,:));%判別數(shù)objEntryExcludingMaxPayOff=mat(maxRow,1:maxCol-2);%尋找最小判別數(shù)[objEntbestColToPivot]=min(objEntryExcludingMaxPayOff);%%%循環(huán)迭代while(objEnt<0)%出基可行解列l(wèi)astColExcludingObjEntry=mat(1:(maxRow-1),maxCol);%入基可行解列ithColExcludingObjEntr
8、y=mat
