79481_de-DE

liliconcom

JSL-Skript zum Speichern der Spalte in der Zeitreihe

Hallo,

Ich würde gerne wissen, wie man in einem JSL-Skript schreibt, wenn ich „Spalten“ für die ersten beiden in der Modellvergleichstabelle angezeigten Modelle speichern möchte. Anhang 1 zeigt die Modellvergleichstabelle für die ersten beiden Modelle. Als nächstes werden in Anhang 2 die „Spalten speichern“ angezeigt, die ich öffnen möchte. Ich möchte beide oben genannten Vorgehensweisen im Skript schreiben. Gibt es jemanden, der es mir zeigen kann?

Betreff: JSL-Skript zum Speichern der Spalte in der Zeitreihe

Ich stoße auf ein ähnliches Problem, aber anstatt viele Übertragungsfunktionen zu sortieren und nur bestimmte zu speichern, führe ich die ARIMA-Analyse für mehrere Spalten in meiner Quelldatentabelle aus. Dadurch wird für jede Spalte ein Modell generiert. Ich möchte dann für jede Spalte „Spalten speichern“ über den Hotbutton „Model:AR(1)“ und dies per Skripterstellung.

 

Ich habe den Ansatz obj << Save Columns ausprobiert, der funktioniert, aber nur für die letzte Spalte, in der die ARIMA erstellt wurde. Ich muss es für jeden einzelnen tun.

 

Wenn ich Spalten manuell speichere, enthält die neue Datentabelle leider kein „Quell“-Skript, sodass es schwierig ist, herauszufinden, wie das mit JSL geht.

 

Was ich wirklich suche, ist nur die vorhergesagte Spalte aus dem Modell.

 

Alle Gedanken/Feedback dazu wären hilfreich.

 

Danke!

 

Betreff: JSL-Skript zum Speichern der Spalte in der Zeitreihe

Natürlich. Unten ist meine Lösung:

Ich habe alle TFA als temporäre Liste in die Hauptliste eingefügt. Machen Sie dann das Ausgabeergebnis in eine Datentabelle. Da ich nur die Spalte für den ersten TFA speichern möchte, der in der Tabelle angezeigt wird, verwende ich diese TFA-Nummer, um in der temporären Liste, die ich in der Hauptliste erstellt habe, zurückzusuchen und diese in der Speicherspalte zu speichern.

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" );

 

Betreff: JSL-Skript zum Speichern der Spalte in der Zeitreihe

@ReginaHong ,

Ich freue mich sehr, dass Sie das Problem selbst gelöst haben.Würden Sie Ihre Lösung veröffentlichen, damit die gesamte Benutzergemeinschaft sehen kann, wie Sie sie gelöst haben?

Betreff: JSL-Skript zum Speichern der Spalte in der Zeitreihe

Hallo msharp,

 

Vielen Dank für Ihre Antwort, aber das ist nicht das, was ich will. Es ist in Ordnung, weil ich die Lösung dafür gefunden habe.

Vielen Dank.

 

Betreff: JSL-Skript zum Speichern der Spalte in der Zeitreihe

Senden Sie einfach den Befehl << Spalten speichern an das Modellobjekt.Hier ist das Beispiel im Skriptindex.Ich hoffe es hilft!

 

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;