79481_fr-FR

liliconcom

Script JSL pour enregistrer la colonne dans la série chronologique

Salut,

J'aimerais savoir comment écrire en script JSL si je veux "enregistrer des colonnes" pour les 2 premiers modèles présentés dans le tableau de comparaison des modèles. La référence à la pièce jointe 1 montre le tableau de comparaison des modèles pour les 2 premiers modèles. Ensuite, dans la pièce jointe 2, les "colonnes de sauvegarde" que je veux ouvrir sont affichées. Je veux écrire les deux procédures ci-dessus dans le script. Y a-t-il quelqu'un qui peut me montrer?

Re : Script JSL pour enregistrer la colonne dans la série chronologique

Je rencontre un problème similaire, mais au lieu d'avoir de nombreuses fonctions de transfert pour trier et n'en enregistrer que certaines, j'exécute l'analyse ARIMA sur plusieurs colonnes de ma table de données source. Cela génère un modèle pour chaque colonne. Je souhaite ensuite "enregistrer les colonnes" à partir du bouton de raccourci Model:AR(1) pour chaque colonne, et le faire via un script.

 

J'ai essayé l'approche obj << Save Columns, qui fonctionne, mais uniquement pour la dernière colonne où l'ARIMA a été effectuée. Je dois le faire pour chacun.

 

Malheureusement, lorsque j'enregistre les colonnes manuellement, la nouvelle table de données ne vient pas avec un script "source", il est donc difficile de comprendre comment faire cela avec JSL.

 

Ce que je recherche vraiment, c'est uniquement la colonne prédite du modèle.

 

Tout thoguhts/commentaires à ce sujet aiderait.

 

Merci!

 

Re : Script JSL pour enregistrer la colonne dans la série chronologique

Bien sûr. Ci-dessous ma solution :

J'ai mis tous les TFA sous forme de liste temporaire dans le main. Transformez ensuite le résultat de sortie en table de données. Puisque je veux juste enregistrer la colonne pour le premier TFA qui est apparu dans le tableau, j'utilise ce numéro TFA pour rechercher dans la liste temporaire que j'ai créée dans le principal et l'enregistrer dans la colonne de sauvegarde.

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

 

Re : Script JSL pour enregistrer la colonne dans la série chronologique

@ReginaHong ,

Je suis très heureux que vous ayez résolu le problème vous-même.Souhaitez-vous publier votre solution afin que toute la communauté des utilisateurs puisse voir comment vous l'avez résolue ?

Re : Script JSL pour enregistrer la colonne dans la série chronologique

Salut msharp,

 

Merci pour votre réponse mais ce n'est pas ce que je veux. C'est bon car j'ai trouvé la solution.

Merci beaucoup.

 

Re : Script JSL pour enregistrer la colonne dans la série chronologique

Envoyez simplement la commande << Enregistrer les colonnes à l'objet modèle.Voici l'exemple dans l'index de script.J'espère que cela aide!

 

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;