文件路径 = 选择文件(
“选择 Excel 文件”、“$Documents”、
{"所有文件|jmp;jsl;xlsx;xlsm", "JMP 文件|jmp;jsl", "Excel 文件|*"},
1, //选择项目
0, //保存文件
"Daily_Cpk.xlsx", //默认选择
);
dt = 打开(文件路径);
//Xaxis = {"db_data_source_cd"};
Y轴= {“offset_micron”};
//数据= {“datatag_cd”};
总结(uparam=by(datatag_cd));
nw = new window("日线机Cpk",
分配(
堆栈(1),
连续分布(
列(:offset_micron),
水平布局(1),
垂直(0),
能力分析(
//规格限制(
datatag_cd[i] == "THA_X", LSL( -150 ), USL( 150 ),
datatag_cd[i] == "THA_Y", LSL( -150 ), USL( 150 ),
datatag_cd[i] == "THA_Theta", LSL( -300 ), USL( 300 ),
//)
)
),
通过(:db_data_source_cd,:datatag_cd)
)
);
代码正在运行,只留下 datatag_cd 部分:X 和 Y 的参数,我想将限制设置为 +-150。但是,生成的图表仅适用于 Theta 的所有规格限制。如何使规格限制发挥作用?
我很可能会向不同的分发平台发送单独的消息。下面的脚本可能会给出一些想法
Names Default To Here(1);
dt = Open("$SAMPLE_DATA/Variability Data/2 Factors Crossed.jmp");
nw = New Window("Daily Line Machine Cpk",
dists = dt << Distribution(
Stack(1),
Continuous Distribution(
Column(:Measurement),
Horizontal Layout(1),
Vertical(0),
),
By(:operator)
)
);
specs = Associative Array();
specs["Cindy"] = {0.2, 2};
specs["George"] = {0.3, 3};
specs["Tom"] = {0.4, 4};
For Each({dist}, dists,
cur_report = Report(dist);
curname = Word(-1, cur_report[OutlineBox(1)] << get title, "=");
Eval(EvalExpr(
dist << Capability Analysis(
LSL(Expr(specs[curname][1])),
USL(Expr(specs[curname][2]))
)
));
cur_report[AxisBox(1)] << Min(specs[curname][1] - 0.2);
cur_report[AxisBox(1)] << Max(specs[curname][2] + 0.2);
);
根据您需要的报告类型,您可能还需要检查 JMP 提供的其他平台:流程能力、流程筛选(但有些可能需要您拆分数据)