334827_de-DE

liliconcom

Automatisieren Sie eine Referenzlinie

Um JMP und ein wenig JSL zu lernen, habe ich die Covid-Raten in meinem Bundesstaat im Auge behalten. In einem Diagramm mit neuen Fällen auf der Y-Achse und dem Datum auf der X-Achse füge ich eine Referenzlinie bei der heutigen Anzahl neuer Fälle hinzu, als eine Art „Wir sind hier“. Gibt es eine Möglichkeit, dies zu automatisieren? Ich kann erkennen, dass „12601“ und „12381“ diejenigen sind, die geändert werden müssen, aber ich weiß nicht, wie ich es anweisen soll, die neuesten Werte von „Neue Fälle“ (rot) und „Gleitender Durchschnitt neuer Fälle“ zu verwenden "(Schwarz).

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

 

Erweiterte statistische ModellierungAutomatisierung und SkripterstellungVerbraucher- und MarktforschungDatenzugriffDatenmischung und -bereinigungMassenanpassungBetreff: Automatisieren Sie eine Referenzlinie

Vielen Dank, das hilft sehr und ja, ich füge etwas am Ende der Tabelle hinzu.

Betreff: Automatisieren Sie eine Referenzlinie

Hier ist eine Modifikation Ihres Skripts, die Referenzlinien für die Werte von „Neue Fälle“ und „Gleitender Durchschnitt neuer Fälle“ basierend auf den Werten der letzten Zeile festlegt.Dabei wird davon ausgegangen, dass die letzte Zeile in der Datentabelle die neuesten Werte enthält.

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