プラットフォーム レポート内の要素にコマンドを送信する方法についてヘルプが必要です。Xan Gregg の提案の助けを借りて以前に実行しました。 別のケースでたまたま正しいコードを取得したときに自分でそれを実行しましたが、毎回それを行う方法を実際に説明するものは何も見つかりません。 Time Series プラットフォームから出力されるレポートがあり、最初のモデルが表示されるアウトライン ボックスの [列の保存] コマンドをレポートに送信したいと考えています。 このアウトライン ボックスにはドロップダウン ウィンドウがあります。 Update Element()、Save Columns(1)、Save columns を試してみました。 私の推測では、アウトラインボックスを適切に識別できておらず、その方法に関する情報が見つからないため、毎回適切な要素を識別する方法について議論していただければ幸いです。 レポート ウィンドウのスクリーン ショットを添付し、以下に私の JSL の試みを示します。 ご協力をよろしくお願いいたします。
dt = Current Data Table();
ts = dt << Time Series(
Y( :"Forming Line-Forming Line Speed"n ),
Input List( :Mat Length ),
Variogram( 1 ),
Transfer Function(
Order( 0, 1, 6 ),
Seasonal( 0, 0, 0, 1 ),
:Mat Length( Order( 0, 1, 0 ), Seasonal( 0, 0, 0, 1 ), Lag( 0 ) ),
Prediction Interval( 0.85 ),
Number of Forecast Periods( 6 )
),
Model Comparison Report( Select Reports( [1] ), Select Graphs( Empty() ) ),
Input Series( :Mat Length, Variogram( 0 ) ),
SendToReport(
Dispatch(
{"Time Series Forming Line-Forming Line Speed", "Model Comparison"},
"",
ScrollBox,
{Background Color( {246, 250, 254} )}
),
Dispatch(
{"Time Series Forming Line-Forming Line Speed", "Transfer Function Model (1)",
"Interactive Forecasting"},
"Time Series",
FrameBox,
{DispatchSeg( CustomStreamSeg( 2 ), {Line Color( "Red" )} ),
DispatchSeg( CustomStreamSeg( 3 ), {Line Color( "Blue" )} ),
DispatchSeg( CustomStreamSeg( 4 ), {Line Color( "Blue" )} ),
DispatchSeg( CustomStreamSeg( 5 ), {Line Color( "Blue" )} )}
)
)
);
tsr = Report( ts );
tsb = tsr( Outline Box( "Transfer Function Model (1)" ) );
tsb << Save Columns;
// tsr << Update Element(1, 1, 1, 1, 8, 1, {Save Columns}));
// tsr << Update Element(1, 1, 3, {Save Columns}));
;以下は、あなたにとってうまくいくかもしれないいくつかのオプションです(または、少なくとも何をすべきかのアイデアを与えるかもしれません)
Names Default To Here(1);
dt = Open("$SAMPLE_DATA/Time Series/SeriesJ.jmp");
obj = dt << Time Series(Y(:Output CO2), Input List(:Input Gas Rate));
obj << Transfer Function(
Order(2, 0, 0),
Seasonal(0, 0, 0, 0),
:Input Gas Rate(Order(2, 0, 2), Seasonal(0, 0, 0, 0), Lag(3))
);
obj2 = obj << Transfer Function(
Order(2, 0, 0),
Seasonal(0, 0, 0, 0),
:Input Gas Rate(Order(2, 0, 2), Seasonal(0, 0, 0, 0), Lag(3)),
No Intercept(1),
Alternative Parameterization(1),
Confidence Intervals(0.99),
Number of Forecast Periods(10)
);
dt1 = obj2 << Save Columns; // using second reference
// using timeseries reference
dt2 = (Report(obj)[OutlineBox("Transfer Function Model (1)")] << get scriptable object) << Save Columns;
show(dt1, dt2);
助けてくれてありがとう! それはうまくいきます! ほんとうにありがとう!
ダン