당연하지. 아래는 나의 해결책이다.
모든 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 );
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" );