79481_ja-JP

liliconcom

時系列の保存列用のJSLスクリプト

こんにちは、

モデル比較表に示されている最初の2つのモデルの「列を保存」したい場合は、JSLスクリプトの書き方を知りたいです。別紙1を参照すると、最初の2モデルのモデル比較表が示されています。次に、添付2では、「保存列」を開いてほしいと表示しています。上記の両方の手順をスクリプトで書きたいと思います。私に見せてくれる人はいますか？

時系列の列を保存するためのJSLスクリプト

私は同じ問題に遭遇していますが、ソートして特定のものだけを保存するための多くの伝達関数を持つ代わりに、私はソースデータテーブルのいくつかの列に対してARIMA分析を実行しています。これにより、各列のモデルが生成されます。次に、各列のModel：AR（1）ホットボタンから "列を保存"し、スクリプトを使って実行します。

 

obj << Save Columnsアプローチを試しましたが、これはうまくいきますが、ARIMAが行われた最後のコラムに対してのみです。私は一人一人のためにそれをする必要があります。

 

残念ながら、列を手動で保存すると、新しいデータテーブルには「ソース」スクリプトが含まれていないため、JSLでこれを行う方法を理解するのは困難です。

 

私が本当にしているのはモデルからの予測列だけです。

 

これに関する任意のthoguhts /フィードバックは役立ちます。

 

ありがとうございます。

 

時系列の列を保存するためのJSLスクリプト

もちろん。以下が私の解決策です：

すべてのTFAを一時的なリストとしてメインに配置します。そして出力結果をデータテーブルにします。テーブルに表示された最初のTFAの列を保存するだけなので、そのTFA番号を使用して、メインで作成した一時リストを検索し、それを保存列に保存します。

main = {};
obj = dt << Time Series(
 X( :Time ),
 Y( :Shipment ),
 Input List( :Capacity ),
 Number of Autocorrelation Lags( 20 ),
 Number of Forecast Periods( 11 ),
 Input Series( :Capacity, Number of Autocorrelation Lags( 20 ), Number of Forecast Periods( 11 ) )
);
temp = obj << Transfer Function(
 Order( 0, 1, 1 ),
 Seasonal( 0, 0, 0, 12 ),
 :Capacity( Order( 1, 1, 1 ), Seasonal( 0, 0, 0, 12 ), Lag( 0 ) ),
 Number of Forecast Periods( 11 ),

);
Insert Into( main, temp );
temp = obj << Transfer Function(
 Order( 1, 1, 1 ),
 Seasonal( 0, 0, 0, 12 ),
 :Capacity( Order( 1, 1, 1 ), Seasonal( 0, 0, 0, 12 ), Lag( 0 ) ),
 Number of Forecast Periods( 11 ),

);
Insert Into( main, temp );

temp = obj << Transfer Function(
 Order( 1, 1, 0 ),
 Seasonal( 0, 0, 0, 12 ),
 :Capacity( Order( 1, 1, 1 ), Seasonal( 0, 0, 0, 12 ), Lag( 0 ) ),
 Number of Forecast Periods( 11 ),

);
Insert Into( main, temp );
&nbsp;
temp = obj << Transfer Function(
 Order( 0, 1, 1 ),
 Seasonal( 0, 0, 0, 12 ),
 :Capacity( Order( 0, 1, 1 ), Seasonal( 0, 0, 0, 12 ), Lag( 0 ) ),
 Number of Forecast Periods( 11 ),

);
Insert Into( main, temp );

temp = obj << Transfer Function(
 Order( 0, 1, 1 ),
 Seasonal( 0, 0, 0, 12 ),
 :Capacity( Order( 1, 1, 0 ), Seasonal( 0, 0, 0, 12 ), Lag( 0 ) ),
 Number of Forecast Periods( 11 ),

);
Insert Into( main, temp );

temp = obj << Transfer Function(
 Order( 1, 1, 1 ),
 Seasonal( 0, 0, 0, 12 ),
 :Capacity( Order( 0, 1, 1 ), Seasonal( 0, 0, 0, 12 ), Lag( 0 ) ),
 Number of Forecast Periods( 11 ),

);
Insert Into( main, temp );

temp = obj << Transfer Function(
 Order( 1, 1, 1 ),
 Seasonal( 0, 0, 0, 12 ),
 :Capacity( Order( 1, 1, 0 ), Seasonal( 0, 0, 0, 12 ), Lag( 0 ) ),
 Number of Forecast Periods( 11 ),

);
Insert Into( main, temp );

temp = obj << Transfer Function(
 Order( 2, 1, 1 ),
 Seasonal( 0, 0, 0, 12 ),
 :Capacity( Order( 1, 1, 1 ), Seasonal( 0, 0, 0, 12 ), Lag( 0 ) ),
 Number of Forecast Periods( 11 ),

);
Insert Into( main, temp );

obj << Transfer Function(
 Order( 2, 1, 1 ),
 Seasonal( 0, 0, 0, 12 ),
 :Capacity( Order( 1, 1, 0 ), Seasonal( 0, 0, 0, 12 ), Lag( 0 ) ),
 Number of Forecast Periods( 11 ),

);
Insert Into( main, temp );

temp = obj << Transfer Function(
 Order( 1, 1, 2 ),
 Seasonal( 0, 0, 0, 12 ),
 :Capacity( Order( 1, 1, 1 ), Seasonal( 0, 0, 0, 12 ), Lag( 0 ) ),
 Number of Forecast Periods( 11 ),

);
Insert Into( main, temp );

temp = obj << Transfer Function(
 Order( 2, 1, 1 ),
 Seasonal( 0, 0, 0, 12 ),
 :Capacity( Order( 2, 1, 1 ), Seasonal( 0, 0, 0, 12 ), Lag( 0 ) ),
 Number of Forecast Periods( 11 ),

);
Insert Into( main, temp );

temp = obj << Transfer Function(
 Order( 2, 1, 1 ),
 Seasonal( 0, 0, 0, 12 ),
 :Capacity( Order( 0, 1, 1 ), Seasonal( 0, 0, 0, 12 ), Lag( 0 ) ),
 Number of Forecast Periods( 11 ),

);
Insert Into( main, temp );

temp = obj << Transfer Function(
 Order( 2, 1, 1 ),
 Seasonal( 0, 0, 0, 12 ),
 :Capacity( Order( 1, 1, 2 ), Seasonal( 0, 0, 0, 12 ), Lag( 0 ) ),
 Number of Forecast Periods( 11 ),

);
Insert Into( main, temp );

temp = obj << Transfer Function(
 Order( 2, 1, 1 ),
 Seasonal( 0, 0, 0, 12 ),
 :Capacity( Order( 2, 0, 1 ), Seasonal( 0, 0, 0, 12 ), Lag( 0 ) ),
 Number of Forecast Periods( 11 ),

);
Insert Into( main, temp );

temp = obj << Transfer Function(
 Order( 2, 1, 1 ),
 Seasonal( 0, 0, 0, 12 ),
 :Capacity( Order( 1, 0, 1 ), Seasonal( 0, 0, 0, 12 ), Lag( 0 ) ),
 Number of Forecast Periods( 11 ),

);
Insert Into( main, temp );

temp = obj << Transfer Function(
 Order( 2, 1, 1 ),
 Seasonal( 0, 0, 0, 12 ),
 :Capacity( Order( 2, 0, 0 ), Seasonal( 0, 0, 0, 12 ), Lag( 0 ) ),
 Number of Forecast Periods( 11 ),

);
Insert Into( main, temp );

temp = obj << Transfer Function(
 Order( 2, 1, 1 ),
 Seasonal( 0, 0, 0, 12 ),
 :Capacity( Order( 1, 0, 2 ), Seasonal( 0, 0, 0, 12 ), Lag( 0 ) ),
 Number of Forecast Periods( 11 ),

);
Insert Into( main, temp );

temp = obj << Transfer Function(
 Order( 2, 1, 1 ),
 Seasonal( 0, 0, 0, 12 ),
 :Capacity( Order( 1, 0, 0 ), Seasonal( 0, 0, 0, 12 ), Lag( 0 ) ),
 Number of Forecast Periods( 11 ),

);
Insert Into( main, temp );

temp = obj << Transfer Function(
 Order( 2, 1, 1 ),
 Seasonal( 0, 0, 0, 12 ),
 :Capacity( Order( 0, 0, 1 ), Seasonal( 0, 0, 0, 12 ), Lag( 0 ) ),
 Number of Forecast Periods( 11 ),

);
Insert Into( main, temp );

datatable = Report( obj )[Table Box( 5 )] << make into data table;
datatable << Set Name( "table1" );
datatable << New Column( "Model2",
 Numeric,
 Continuous,
 formula( Num( Regex( :Model, "\D", "", GLOBALREPLACE ) ) )
);
maxvalue = datatable[1, 11];
dt2 = main[maxvalue] << Save Columns;
dt2 << Set Name( "Result1" );
Column( dt2, 4 ) << Set Name( "Predicted_Shipment_1" );

 

時系列の列を保存するためのJSLスクリプト

@ReginaHong 、

あなたが問題を自分で解決したことをとても嬉しく思います。  解決策を投稿して、すべてのユーザーコミュニティが解決方法を確認できるようにしますか。

時系列の列を保存するためのJSLスクリプト

こんにちはmsharp、

 

お返事ありがとうございますが、これは私が欲しいものではありません。私はそれに対する解決策を見つけたのでそれは問題ありません。

どうもありがとう。

 

時系列の列を保存するためのJSLスクリプト

<< Save Columnsコマンドをモデルオブジェクトに送信するだけです。  これがスクリプトインデックスの例です。  それが役に立てば幸い！

 

Names Default To Here( 1 );
dt = Open( "$SAMPLE_DATA/Time Series/Steel Shipments.jmp" );
obj = Time Series( Y( :Steel Shipments ) );
obj2 = obj << Arima( 1, 0, 0 );
obj2 << Save Columns;