511642_zh-CN

liliconcom

从参考表中添加参考线

你好， @txnelson

我正在尝试创建一个可变性绘图图并为每个单独的图表添加具有不同值的参考线。 目前我可以绘制参考线，但问题是如果参考表不包含数据表中的所有测试列，则脚本将不起作用。

 

这是我尝试过的，如果参考表包含数据表中的所有测试，它就可以工作：

 

Names Default To Here( 1 );
Clear Globals();


dt = Open("Data table.jmp"); // Open data table

// Loop to get column name Currents and Voltages
colist = {};
Col_List = dt << Get Column Names( "String" );
 
 For( q = 1, q <= N Items( Col_List ), q++, 
    
  If( Contains( Col_List[q], "Currents" ) | Contains( Col_List[q], "Voltages" ),
   Column( Col_List[q] ) << Set Selected( 1 );
   Insert Into( colist, Col_List[q] );
  )
 );
 // Var Chart
 vc= dt << Variability Chart(
        Y( (Eval( colist )) ),
        X( :Wafer ID ),
        Analysis Type( "Choose best analysis (EMS REML Bayesian)" ),
        Show Range Bars( 0 ),
        Std Dev Chart( 0 ),
        Points Jittered( 1 )
       
       );<BR />// Reference data table
dt1 = Open ("Reference table.jmp");
xb = Column(dt1, "Reference") << getValues;
// Loop to add reference line to the variability chart 
 For( i = 1, i <= N Items( vc ), i++,
  Report( vc[i] )[Framebox( 1 )] << DispatchSeg( CustomStreamSeg( 3 ), {Line Width( 2 )} );
  Report( vc[i] )[AxisBox( 1 )] << {Add Ref Line( xb[i], "Solid", "Green", "RTS", 2 )};
 );

脚本回复：从参考表中添加参考线

您可以遍历 colist 并使用 if 语句检查 dt1 是否具有该特定值，如果有，则根据从 dt1 找到的值添加参考线。 这是使用关联数组的一个选项（您可能必须为可变性图表添加 Y 轴缩放，因为参考线可以根据它们的值隐藏）。

Names Default To Here(1);

// dt = Open("Data table.jmp"); // Open data table
// dt1 = Open("Reference table.jmp");

// Loop to get column name Currents and Voltages
colist = {};
Col_List = dt << Get Column Names("String");
 
For(q = 1, q <= N Items(Col_List), q++, 
 If(Contains(Col_List[q], "Current") | Contains(Col_List[q], "Voltage"),
  Column(Col_List[q]) << Set Selected(1);
  Insert Into(colist, Col_List[q]);
 )
);
 // Var Chart
vc = dt << Variability Chart(
 Y((Eval(colist))),
 X(:Wafer ID),
 Analysis Type("Choose best analysis (EMS REML Bayesian)"),
 Show Range Bars(0),
 Std Dev Chart(0),
 Points Jittered(1) 
);// Reference data table

aa_refs = Associative Array(dt1:Tests << get values, dt1:Reference << get values);
// Loop to add reference line to the variability chart
For(i = 1, i <= N Items(colist), i++,
 If(Contains(aa_refs, colist[i]),
  Report(vc[i])[Framebox(1)] << DispatchSeg(CustomStreamSeg(3), {Line Width(2)});
  Report(vc[i])[AxisBox(1)] << {Add Ref Line(aa_refs[colist[i]], "Solid", "Green", "RTS", 2)};
 );
);

回复：从参考表中添加参考线

这里有一个稍微不同的解决方案，直接阅读参考表

Names Default To Here( 1 );
Clear Globals();


//dt = Open( "Data table.jmp" ); // Open data table
dt = Data Table( "data table" );

// Loop to get column name Currents and Voltages
colist = {};
Col_List = dt << Get Column Names( "String" );
 
For( q = 1, q <= N Items( Col_List ), q++, 
    
 If( Contains( Col_List[q], "Current" ) | Contains( Col_List[q], "Voltage" ),
  Column( Col_List[q] ) << Set Selected( 1 );
  Insert Into( colist, Col_List[q] );
 )
);
 // Var Chart
vc = dt << Variability Chart(
 Y( (Eval( colist )) ),
 X( :Wafer ID ),
 Analysis Type( "Choose best analysis (EMS REML Bayesian)" ),
 Show Range Bars( 0 ),
 Std Dev Chart( 0 ),
 Points Jittered( 1 )
       
);// Reference data table
//dt1 = Open( "Reference table.jmp" );
dt1 = Data Table( "reference table" );
xb = Column( dt1, "Reference" ) << getValues;
// Loop to add reference line to the variability chart 
For( i = 1, i <= N Items( vc ), i++, 
 //Report( vc[i] )[Framebox( 1 )] << DispatchSeg( CustomStreamSeg( 3 ), {Line Width( 2 )} );
 testVal = Word( -2, Report( vc[i] )[Outline Box( 2 )] << get title, " " ) || " " || Word(
  -1,
  Report( vc[i] )[Outline Box( 2 )] << get title,
  " "
 );
 testRow = dt1 << get rows where( :tests == testVal );
 If( N Rows( testRow ) > 0,
  Report( vc[i] )[AxisBox( 1 )] << Add Ref Line( dt1:Reference[testRow[1]], "Solid", "Green", "RTS", 2 )
 );
);

回复：从参考表中添加参考线

你好@jthi ,

我在叠加图上厌倦了你的代码，但似乎有一个错误。 有什么建议么？

 

Names Default To Here(1);

// dt = Open("Data table.jmp"); // Open data table
// dt1 = Open("Reference table.jmp");

// Loop to get column name Currents and Voltages
colist = {};
Col_List = dt << Get Column Names("String");
 
For(q = 1, q <= N Items(Col_List), q++, 
 If(Contains(Col_List[q], "Current") | Contains(Col_List[q], "Voltage"),
  Column(Col_List[q]) << Set Selected(1);
  Insert Into(colist, Col_List[q]);
 )
);
 // Overlay Plot

  vc = dt2 << Overlay Plot( Y( Eval( colist ) ), No Overlay( 1 ),Ungroup Plots( 1 ) );
         
aa_refs = Associative Array(dt1:Tests << get values, dt1:Reference << get values);
// Loop to add reference line to the variability chart
For(i = 1, i <= N Items(colist), i++,
 If(Contains(aa_refs, colist[i]),
  Report(vc[i])[Framebox(1)] << DispatchSeg(CustomStreamSeg(3), {Line Width(2)});
  Report(vc[i])[AxisBox(1)] << {Add Ref Line(aa_refs[colist[i]], "Solid", "Green", "RTS", 2)};
 );
);

 

 

回复：从参考表中添加参考线

有几个问题。

1. 不同的平台具有不同的树结构，因为它们具有不同的输出结构。因此，输出中不同对象的映射是不同的。
2. 您将 dt 指定为指向“数据表”的指针，但稍后在脚本中，您尝试执行覆盖图，指向由变量 dt2 引用的数据表，该变量在您的代码中不存在。
3. 在创建关联数组的代码中，您使用引用数据表中的一个变量，称为引用。在您在优化循环讨论中提供的示例数据中，该数据表中的变量称为均值。

下面是您的代码的修改，它产生以下输出

Names Default To Here(1);

// dt = Open("Data table.jmp"); // Open data table
dt=data table("Data Table");
// dt1 = Open("Reference table.jmp");
dt1=data table("Reference data table");
// Loop to get column name Currents and Voltages
colist = {};
Col_List = dt << Get Column Names("String");
 
For(q = 1, q <= N Items(Col_List), q++, 
 If(Contains(Col_List[q], "Current") | Contains(Col_List[q], "Voltage"),
  Column(Col_List[q]) << Set Selected(1);
  Insert Into(colist, Col_List[q]);
 )
);
 // Overlay Plot

  vc = dt << Overlay Plot( Y( Eval( colist ) ), No Overlay( 1 ),Ungroup Plots( 1 ) );
         
aa_refs = Associative Array(dt1:Tests << get values, dt1:mean << get values);
// Loop to add reference line to the variability chart
For(i = 14, i <= N Items(colist), i++,
 If(Contains(aa_refs, colist[i]),
  Report(vc)[AxisBox(1)] << Add Ref Line(aa_refs[colist[i]], "Solid", "Green", "RTS", 2);
 );
);

请花时间阅读“脚本指南”中的“显示树”，该指南位于“帮助”下拉菜单下的 JMP 文档库中。