15598_zh-CN

liliconcom

引用带有变量的比例框

你好，

 

我正在尝试使用 for 循环生成多个图形，并将列标题分配给 Y 轴。

绘图后，我想用 Dispatch 命令向 Y 轴添加三个参考线，但不知道如何动态参考 Y 轴框，请参见下面的 ***：

 

For( i = 12, i <= 18, i++,
 Col_name = Column( i ) << Get Name;
 temp = Expr( Col_name );
//Graph Line Data
 Split_dt << Graph Builder(
  Size( 536, 500 ),
  Variables( X( :Year ), X( :Month, Position( 1 ) ), X( :Day, Position( 1 ) ), Y( Column( i ) ) ),
  Elements(
   Box Plot( X( 1 ), X( 2 ), Y, Legend( 9 ), Jitter( 1 ), Outliers( 1 ), Box Style( "Outlier" ) )
  ),
  SendToReport(
   Dispatch(
    {},
    ,
    ScaleBox,
    {Add Ref Line( 9, Solid, "Black", "LSL" ), Add Ref Line( 21, Solid, "Black", "USL" ),
    Add Ref Line( 16, Dashed, "Medium Dark Green", "Target" )}
   )
  ),
  SendToReport(
   Dispatch(
    {},
    "graph title",
    TextEditBox,
    {Set Text( "Line " || Char( Line_Number ) || " " || Col_name )}
   )
  )
 );
);

此代码返回错误“在 {} 找不到 ScaleBox[“Col_name”]”，就好像 JSL 正在将 Col_name 评估为字符串一样。

关于使 Col_name 评估其价值或以不同方式添加参考线的任何想法？

 

谢谢！

 

回复：引用带有变量的比例框

下面是通过 JSL 向轴添加参考线的一种方法：

 

Names Default To Here( 1 );
// Make some data and make a graph
dt = New Table( "Test", New Column( "Y", Numeric, Continuous, Formula( Random Normal() ) ), AddRows( 20 ) );
gb = dt << Graph Builder(
 Size( 528, 420 ),
 Show Control Panel( 0 ),
 Variables( Y( :Y ) ),
 Elements( Points( Y, Legend( 16 ) ) ),

);
// Template expression to add a reference line
addRefLine = Expr(
 gb << SendToReport( Dispatch( {}, "Y", ScaleBox, {Add Ref Line( TBD, "Solid", "Black", "", 1 )} ) )
);
// Loop . . .
For( i = -3, i <= 3, i++,
 Wait( 1 );
 Eval( Substitute( Name Expr( addRefLine ), Expr( TBD ), i ) );
);

 

回复：引用带有变量的比例框<meta http-equiv="Content-Type" content="text/html; charset=UTF-8" />

我发现了一种解决方法，方法是为要绘制图表的列设置规范限制并将显示设置为参考线：

我仍然不知道有什么方法可以让 Dispatch 函数计算变量。它只是把它当作一个字符串。

回复：引用带有变量的比例框

忘记加***了，见下图：

 

For( i = 12, i <= 18, i++,
 Col_name = Column( i ) << Get Name;
 temp = Expr( Col_name );
//Graph Line Data
 Split_dt << Graph Builder(
  Size( 536, 500 ),
  Variables( X( :Year ), X( :Month, Position( 1 ) ), X( :Day, Position( 1 ) ), Y( Column( i ) ) ),
  Elements(
   Box Plot( X( 1 ), X( 2 ), And, Legend( 9 ), Jitter( 1 ), Outliers( 1 ), Box Style( "Outlier" ) )
  ),
  SendToReport(
   Dispatch(
    {}, 
&nbsp;&nbsp;&nbsp; 
&nbsp;&nbsp;&nbsp;    ScaleBox,
    {Add Ref Line( 9, Solid, "Black", "LSL" ), Add Ref Line( 21, Solid, "Black", "USL" ),
    Add Ref Line( 16, Dashed, "Medium Dark Green", "Target" )}
   )
  ),
  SendToReport(
   Dispatch(
    {},
    "graph title",
    TextEditBox,
    {Set Text( "Line " || Char( Line_Number ) || " " || Col_name )}
   )
  )
 );
);