334827_fr-FR

liliconcom

Automatiser une ligne de référence

Afin d'apprendre JMP et un peu de JSL, j'ai suivi les taux de Covid dans mon état. Sur un graphique avec les nouveaux cas en y et la date en x, j'ajoute une ligne de référence au nombre de nouveaux cas d'aujourd'hui comme une sorte de « nous sommes là ». Existe-t-il un moyen d'automatiser cela ? Je peux dire que "12601" et "12381" sont ceux qui doivent changer, mais je ne sais pas comment lui dire d'utiliser les valeurs les plus récentes de "Nouveaux cas" (rouge) et "Moyenne mobile des nouveaux cas". "(noir).

Graph Builder(
 Size( 1245, 660 ),
 Show Control Panel( 0 ),
 Fit to Window( "Maintain Aspect Ratio" ),
 Variables(
  X( :Date ),
  Y( :New Cases ),
  Y( :New Case Rolling Average, Position( 1 ) ),
  Color( :Month )
 ),
 Elements(
  Line( X, Y( 1 ), Y( 2 ), Legend( 5 ) ),
  Points( X, Y( 1 ), Y( 2 ), Legend( 6 ) )
 ),
 SendToReport(
  Dispatch(
   {},
   "New Cases",
   ScaleBox,
   {Min( -245.726960373999 ), Max( 19090.397676905 ), Inc( 2000 ),
   Minor Ticks( 1 ), Add Ref Line( 0, "Solid", "Black", "", 1 ),
   Add Ref Line( <FONT color="#FF00FF">12601</FONT>, "Solid", "Red", "", 1 ),
   Add Ref Line( <FONT color="#FF00FF">12381</FONT>, "Solid", "Black", "", 1 )}
  )
 )
);

 

Modélisation statistique avancéeAutomatisation et scriptsÉtudes de consommation et de marchéAccès aux donnéesMélange et nettoyage des donnéesPersonnalisation de masseRe : Automatiser une ligne de référence

Merci beaucoup, cela aide beaucoup et oui j'ajoute au bas du tableau.

Re : Automatiser une ligne de référence

Voici une modification de votre script, qui définit des lignes de référence pour les valeurs des nouveaux cas et de la moyenne mobile des nouveaux cas en fonction des valeurs de la dernière ligne.Cela suppose que la dernière ligne du tableau de données contient les dernières valeurs.

Names Default To Here( 1 );
dt = Current Data Table();

gb = dt << Graph Builder(
 Size( 1245, 660 ),
 Show Control Panel( 0 ),
 Fit to Window( "Maintain Aspect Ratio" ),
 Variables(
  X( :Date ),
  Y( :New Cases ),
  Y( :New Case Rolling Average, Position( 1 ) ),
  Color( :Month )
 ),
 Elements(
  Line( X, Y( 1 ), Y( 2 ), Legend( 5 ) ),
  Points( X, Y( 1 ), Y( 2 ), Legend( 6 ) )
 ),
 SendToReport(
  Dispatch(
   {},
   "New Cases",
   ScaleBox,
   {Minor Ticks( 1 ), Add Ref Line( 0, "Solid", "Black", "", 1 )}
  )
 )
);

gbrpt = gb << report;
gbrpt[AxisBox( 2 )] << add ref line(
 dt:New Cases[N Rows( dt )],
 "Solid",
 "Red",
 "",
 1
);
gbrpt[AxisBox( 2 )] << add ref line(
 dt:New Case Rolling Average[N Rows( dt )],
 "Solid",
 "Black",
 "",
 1
);