查看此脚本以查看它是否是您要查找的内容？
名称默认到这里( 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 !=
“约束状态（大于）” ),
扔( “需要使用约束表。” )
);
);
);
做工作;
);
)
)
)
)
);
