查看此腳本以查看它是否是您要查找的內容？
名稱默認到這裡( 1 );
Ntables = N 表();
表列表 = {};
為了( 我 = 1 , i <= Ntables, i++,
表列表[i] =數據表（ 一世 ）
);
//顯示（表列表）；
desTable = {};
控製表 = {};
同表警報 =表達式(
對話(
“為每個選擇選擇不同的數據表。” ,
文本框( " " ),
按鈕（ “好的” )
)
);
noTableAlert =表達式(
對話( “必須打開設計數據表。” , 文本框( " " ）， 按鈕（ “好的” ) )
);
noMixtureFacAlert =表達式(
對話( “設計表沒有混料因子。” , 文本框( " " ）， 按鈕（ “好的” ) )
);
做工作=表達式(
//評估設計表
數列 = N 科爾（去表）；
行數 = N 行（去表）；
numMixFac = 0 ;
XMatrix = [];
混合下 = [];
mixUpper = [];
混合總和 = [];
混合 = [];
//顯示（numCols）；
//顯示(numRows);
當前數據表（去表）；
為了( 我 = 1 , i <= numCols, i++,
col =柱子（ 一世 ）;
道具=列<<獲得財產( “混合物” );
//顯示（道具）；
如果(是列表（道具），
numMixFac++;
tmp = col <<得到矩陣;
//顯示（tmp）；
XMatrix ||= tmp;
//顯示（XMatrix）；
混合下 ||= {prop[ 1 ]};
mixUpper ||= {prop[ 2 ]};
mixSum ||= {prop[ 3 ]};
//顯示（numMixFac）；
);
);
如果( numMixFac == 0 ,
noMixtureFacAlert，
衛星通信 = Ĵ （數行， 1 , 0 );
//顯示（satCon）；
//設置簡單約束矩陣
numConstraintsOld = 2 * numMixFac + 1 ;
矩陣 = Ĵ ( 1 , numMixFac, 1 );
conMatrix = conMatrix |/身份( numMixFac ) |/身份( numMixFac );
//顯示（conMatrix）；
mixSumVal = mixSum[ 1 ];
mixCon = mixCon || {mixSumVal} ||混合下 ||混合；
//顯示（混合）；
//如果有約束表，則獲取線性不等式約束
如果(conVal == 1 ,
numConstraintsNew = numConstraintsOld;
當前數據表（對照表）；
numIneqRow = N 行（對照表）；
//尋找重複的約束
FullConMat = conMatrix ||混音`;
為了( 我 = 1 , i <= numIneqCon, i++,
騙局=柱子（ 一世 ）;
道具=缺點<<獲得財產( “約束狀態” );
字符屬性 =字符(名稱表達式（道具））；
如果( numIneqRow != numMixFac + 1 ,
扔( “只能在純混料設計中使用約束。” )
);
ineqConMat = con <<得到矩陣;
//顯示（ineqConMat）；
整體測試 = 0 ;
為了( j = 1 , (j <= numConstraintsOld), j++,
//找到第一個非零元素
為了(k = 1 , k <= numMixFac + 1 , k++,
如果( FullConMat[j, k] != 0 ,
piv = FullConMat[j, k];
工業 = k;
k = numMixFac + 2 ;
)
);
測試 = 0 ;
如果( ineqConMat[ind] != 0 ,
mult = piv / ineqConMat[ind];
newRow = ineqConMat * mult;
newRow = newRow` - FullConMat[j, 0 ];
為了(k = 1 , k <= numMixFac + 1 , k++,
如果(絕對值(新行[k]) > 1e - 10 ,
測試++
)
);
,
測試++
);
如果( 測試 == 0 ,
整體測試++；
j = numConstraintsOld + 1 ;
);
);
//顯示（整體測試）；
如果（整體測試== 0 ,
tmp = ineqConMat [ 1 :: numMixFac];
conMatrix = conMatrix |/ tmp`;
numConstraintsNew++;
tmp = ineqConMat[numMixFac + 1 :: numMixFac + 1 ];
mixCon = mixCon ||時間；
);
//顯示（混合）；
);
,
numConstraintsNew = numConstraintsOld
);
//顯示（conMatrix）；
//檢查行如何滿足約束
resultMat = conMatrix * XMatrix`;
//顯示(resultMat);
為了( j = 1 , j <= numRows, j++,
為了( 我 = 1 , i <= numConstraintsNew, i++,
如果(絕對值( resultMat[i, j] - mixCon[i] ) < . 00000001 ,
衛星康[j, 1 ]++
)
)
);
//顯示（satCon）；
//標記點
當前數據表（去表）；
pointCol = desTable <<新列( “點類型” , 字符, 標稱 );
為了( 我 = 1 , i <= numRows, i++,
如果(
(satCon[i] >= numMixFac),
點科爾[i] = “頂點” ;
行狀態(一) =顏色狀態( 3 );,
(satCon[i] == numMixFac - 1 ),
點科爾[i] = “邊緣” ;
行狀態(一) =顏色狀態( 4 );,
(satCon[i] == 1 ),
點科爾[i] = “內部的” ;
行狀態(一) =顏色狀態( 5 );,
numFace = numMixFac - satCon[i];
點科爾[i] =字符（數字臉）|| “D臉” ;
行狀態(一) =顏色狀態( numMixFac - satCon[i] + 6 );
)
);
點科爾 <<標籤( 1 );
//創建三元繪圖腳本
xString = “” ;
為了( 我 = 1 , i <= numCols, i++,
col =柱子（ 一世 ）;
道具=列<<獲得財產( “混合物” );
如果(是列表（道具），
名稱 =字符(列名（ 一世 ） ）;
//顯示（列名）；
xString = xString ||表達式( “：” ) ||名稱 ||表達式( "," );
);
);
連 =長度(xString);
xString2 =子串( xString, 1 , 連 - 1 );
//顯示（xString2）；
如果( numMixFac > 2 ,
幀字符串 = “” ;
如果( numMixFac == 3 ,
幀串 = 幀串 || “報告（obj）[框架框（” ||字符( 1 ) ||
")]<<標記大小(4);" ,
numPlots = (numMixFac * (numMixFac - 1 )) / 2 ;
為了( 我 = 1 , i < numPlots, i++,
幀串 = 幀串 || “報告（obj）[框架框（” ||字符( 一 ) ||
")]<<標記大小(4); \!N "
);
幀串 = 幀串 || “報告（obj）[框架框（” ||字符( 一 ) ||
")]<<標記大小(4);" ;
);
d1 = "obj=三元圖(Y(" || xString2 || ")); \!N " ||框架字符串；
d2 =評估(表達式(解析(d1)));
d3 =表達式（去表<<新表屬性( 《三元劇情》 ， 一種 ） ）;
評估(代替(名稱表達式(d3),表達式（ 一種 ），名稱表達式(d2)));
);
如果( 表格 > 1 ,
dlg <<關閉窗口
);
);
);
初始化狀態 = 0 ;
如果(
（Ntables == 0 ), noTableAlert,
（Ntables == 1 ),
控制值 = 0 ;
desTable = 表列表 [ 1 ];
做工作;，
dlg =新窗戶( “識別混合點” ,
邊框框(剩下( 3 ）， 底部（ 3 ),對( 2 ), 邊( 28 ）， 頂部（ 3 ),
V 列錶框(
面板盒( “表設置” ,
檢查對象 =複選框(
{ “使用約束表” },
如果（初始化狀態 == 0 ,
盒子 <<附加(
pbox2 =面板盒( “選擇約束數據表” ,
組合Obj3 =組合框（表列表）
)
);
盒子 <<重播;
,
pbox2 <<刪除;
盒子 <<重播;
);
如果（初始化狀態 == 0 ,
初始化狀態 = 1 ,
初始化狀態 = 0
);
)
),
pbox =面板盒( “選擇數據表” ,
面板盒( “選擇設計數據表” , 組合物 1 =組合框(表列表)),
),
按鈕盒( “好的” ,
desTableNum = comboObj1 <<得到;
//顯示（desTableNum）；
去表 =數據表(評估(desTableNum));
//顯示（desTable）；
conVal = checkObj <<得到( 1 );
如果( ((conVal == 1 ) & (Ntables == 1 ),
扔( “設計表和約束表都必須打開。” )
);
如果(conVal == 1 ,
conTableNum = comboObj3 <<得到;
//顯示(conTableNum);
控製表 =數據表(評估(conTableNum));
//顯示（控製表）；
);
如果( ((conVal == 1 ) & (desTableNum == conTableNum),
相同的TableAlert，
如果(conVal == 1 ,
當前數據表（對照表）；
numIneqCon = N 科爾（對照表）；
為了( 我 = 1 , i <= numIneqCon, i++,
騙局=柱子（ 一世 ）;
道具=缺點<<獲得財產( “約束狀態” );
字符屬性 =字符(名稱表達式（道具））；
如果(
（字符屬性！= “約束狀態（小於）” ) & (charprop !=
“約束狀態（大於）” ),
扔( “需要使用約束表。” )
);
);
);
做工作;
);
)
)
)
)
);
