function?[xzSTres_case]?=?SimplexMax（cAbind_B）
%?單純形法求解標準形線性規劃問題:?max?cx?s.t.?Ax=b?x>=0
%?輸入參數:?c為目標函數系數?A為約束方程組系數矩陣?b為約束方程組常數項?ind_B為基變量索引
%?輸出參數:?x最優解?z最優目標函數值?ST存儲單純形表數據?res_case=0表示有最優解，res_case=1表示有無界解

[mn]?=?size（A）;??????????????%m約束條件個數?n決策變量數
ind_N?=?setdiff（1:n?ind_B）;??%非基變量的索引
ST?=?[];
format?rat
%?循環求解
while?true
????x0?=?zeros（n1）;
????x0（ind_B）?=?b;???????????????%初始基可行解
????cB?=?c（ind_B）;???????????????%計算cB
????Sigma?=?zeros（1n）;
????Sigma（ind_N）?=?c（ind_N）?-?cB*A（:ind_N）;???%計算檢驗數
????[~?k]?=?max（Sigma）;?????????%選出最大檢驗數?確定進基變量索引k
????Theta?=?b?./?A（:k）;?????????%計算θ
????Theta（Theta<=0）?=?10000;
????[~?q]?=?min（Theta）;?????????%選出最小θ
????el?=?ind_B（q）;???????????????%確定出基變量索引el?主元為A（qk）
????vals?=?[cB‘ind_B‘bATheta];
????

?屬性????????????大小?????日期????時間???名稱
-----------?---------??----------?-----??----

?????文件???????9417??2019-04-04?21:47??SimplexTable1.xlsx

?????文件????????459??2019-03-14?09:39??test_simplex1.m

?????文件???????1517??2019-03-16?15:30??SimplexMax.m

-----------?---------??----------?-----??----

????????????????11393????????????????????3