如何使用列切換器在控製圖中添加/使參考線保持一致?我正在嘗試重新創建類似於下面的控製圖。 我是帶有列切換器的 Levey-Jennings 控製圖。 x 軸一致,是字母數字批次代碼。 我目前需要幫助添加批次 ID 的垂直藍色參考線。 理想情況下,當我在列切換器中移動時,這些線將保留。
我目前使用的是 Windows 10 上的 JMP 15.2.0
謝謝!
視窗回复:如何在帶有列切換器的控製圖中添加/使參考線保持一致?您還可以使用圖形腳本。 首先計算您擁有的參考線的索引,然後使用 V Line 添加圖形腳本:
Names Default To Here(1);
dt = Open("$SAMPLE_DATA/Quality Control/Coating.jmp");
ccb = dt << Control Chart Builder(
Size(528, 456),
Show Two Shewhart Charts(0),
Show Control Panel(0),
Show Limit Summaries(0),
Variables(Subgroup(:Sample), Y(:Pin)),
Chart(Points(Statistic("Average")), Limits(Sigma("Levey Jennings"))),
Column Switcher(:Pin, {:Pin, :Weight, :Weight 2})
);
//calculate indices for references
uniq_vals = Associative Array(dt[0, "Sample"]) << get keys;
ref_vals = {4, 5, 6, 8};
/*jmp16
ref_idx = Transform Each({ref_val}, ref_vals,
Contains(uniq_vals, ref_val) - 1
);
*/
//jmp15
ref_idx = [];
For(i = 1, i <= N Items(ref_vals), i++,
idx = Contains(uniq_vals, ref_vals[i]);
If(idx,
Insert Into(ref_idx, idx - 1);
)
);
//add reference lines as Graphic Script
rep = ccb << report;
framebox = rep[frame box(1)];
Eval(EvalExpr(framebox << Add Graphics Script(
Pen Size(1);
Pen Color("Blue");
V Line(Expr(Transpose(ref_idx)));
)));
回复:如何在帶有列切換器的控製圖中添加/使參考線保持一致?您附加的腳本添加了 5 條參考線。它們將被放置在 x 值 1、2、3、4、5 處。 如果您希望將它們放置在不同的位置,則需要使用適當的位置更新腳本。
請查看 OSI 中的“添加參考線”條目,了解參考線的語法如何工作。

回复:如何在帶有列切換器的控製圖中添加/使參考線保持一致?謝謝你, @tonya_mauldin 。 我能夠讓腳本運行,沒有任何錯誤;但是,它將這些參考點移至控製圖的開頭;而不是將它們整合到一起。 對此有什麼想法嗎?
再次感謝!
回复:如何在帶有列切換器的控製圖中添加/使參考線保持一致?你好@布蘭登P1092 ,
除了什麼@tonya_mauldin建議,您還可以考慮將規格限或控制限作為元數據添加到您的列中。 右鍵單擊您的列並選擇列信息。 從“列屬性”下拉菜單中,選擇適合您需要的一項。

輸入規格/控制限值後,您可以選擇“顯示為圖形參考線”,每次使用數據製作圖形、分佈等時,都會有細藍線表示 USL、LSL、和目標(如果沒有丟失)。

如果您更高級並且編寫了大量腳本,則可以使用分析 > 質量和流程 > 管理規格限制平台自動執行此過程。 如果您必須經常這樣做,它會讓您的生活變得更加輕鬆。

希望這可以幫助!,
DS
回复:如何在帶有列切換器的控製圖中添加/使參考線保持一致?這是您可以使用的類似示例。
dt=Open("$SAMPLE_DATA/Cities.jmp");
Control Chart Builder(
Show Two Shewhart Charts( 0 ),
Variables( Subgroup( :Region ), Y( :"pop- m"n ) ),
Chart( Points( Statistic( "Average" ) ), Limits( Sigma( "Levey Jennings" ) ) ),
Column Switcher( :"pop- m"n, {:"pop- m"n, :POP, :Max deg. F Jan, :OZONE, :CO} ),
SendToReport(
Dispatch(
{},
"Region",
ScaleBox,
{Add Ref Line( 1, "Solid", "Blue", "", 1 ),
Add Ref Line( 2, "Solid", "Blue", "", 1 ),
Add Ref Line( 3, "Solid", "Blue", "", 1 )}
)
)
)