変数を使用してスケール ボックスを参照する
やあ、
for ループを使用して複数のグラフを作成し、列のタイトルを Y 軸に割り当てようとしています。
グラフ作成後、Dispatch コマンドを使用して Y 軸に 3 つの基準線を追加したいのですが、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 )}
)
)
);
);
このコードは、JSL が Col_name を文字列として評価しているかのように、「{} に ScaleBox[ "Col_name" ] が見つかりません」というエラーを返します。
Col_name をその値に評価するか、参照行を別の方法で追加するためのアイデアはありますか?
ありがとう!
Re: 変数でスケールボックスを参照するJSL を使用して軸に基準線を追加する 1 つの方法を次に示します。
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 ) );
);
Re: 変数でスケールボックスを参照する<meta http-equiv="Content-Type" content="text/html; charset=UTF-8" />グラフ化したい列の仕様制限を設定し、参照線として表示を設定することで、回避策を発見しました。

Dispatch 関数に変数を評価させる方法はまだわかりません。文字列として受け取るだけです。
Re: 変数でスケールボックスを参照する*** を追加するのを忘れました。以下を参照してください。
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(
{},
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 )}
)
)
);
);