グラフをプロットしました。軸を削除し、PPTとして保存する前に、グラフのx軸の値をグラフのタイトルに送信するために使用できるテーブルスクリプトが必要です。 手動で軸を再スケーリングする機会が得られるまで(設定値を使用するにはデータの変動が大きすぎる)、グラフの軸を非表示にしたくないので、後でプレゼンテーションの挿入グラフとして使用できます。 これは実行可能ですか?
軸を削除する2つのコードと、軸を再表示するコードを次に示します。
Names Default To Here( 1 );
obj = Current Report();
(obj << xpath( "//AxisBox" )) << visibility( "collapse" );
Names Default To Here( 1 );
obj = Current Report();
(obj << xpath( "//AxisBox" )) << visibility( "visible" );
に加えて@txnelsonこれがどのように機能するかの例です。
XPathの使用は、そのタイプのすべての項目に対応するため、少し注意が必要です。具体的に(またはすべて)変更/評価する項目を調べる必要があります。
x値(最小最大)を取得するための私の最善のアイデアは、スクリプトを評価することでした。 別のオプションがあるかもしれません。
Names Default To Here( 1 );
dt = Open( "$SAMPLE_DATA/Big Class.jmp" );
obj = dt << Graph Builder(
Size( 528, 454 ),
Show Control Panel( 0 ),
Graph Spacing( 5 ),
Variables( X( :height ), Y( :weight ) ),
Elements( Points( X, Y, Legend( 3 ) ), Smoother( X, Y, Legend( 4 ) ) )
);
obj << bring window to front();
Wait( 1 );
// change the x-axis of the graph
obj << SendToReport( Dispatch( {}, "height", ScaleBox, {Min( 60.50 ), Max( 65 ), Inc( 2 ), Minor Ticks( 0 )} ) );
Wait( 3 );
// get title of x-axis and show result in log
x_axis_text = (obj << xpath( "//TextEditBox" ))[3] << get text();
Show( x_axis_text );
// collapse x-axis
(obj << xpath( "//AxisBox" ))[1] << visibility( "collapse" );
// get script of Graph Builder to evaluate min and max values
script = obj << get script();
min_txt = Regex( Char( Name Expr( script ) ), "Min\([0-9]+[.]*[0-9]*\)" );
max_txt = Regex( Char( Name Expr( script ) ), "Max\([0-9]+[.]*[0-9]*\)" );
Show( min_txt, Type( max_txt ) );
// set graph title accordingly
(obj << xpath( "//TextEditBox" ))[1] << set text( x_axis_text || " from " || min_txt || " to " || max_txt );