86555_de-DE

liliconcom

JSL – generische Verteilung auf dem Tisch

Hey,

 

Ich möchte ein Histogramm für eine Tabelle ausführen.

Die Ausgabe jeder Tabelle ist die Spalte „Ergebnis“ und wird durch „Testname“ unterteilt.

Ich möchte einen generischen Code, der unterschiedliche „Testnamen“ verarbeiten kann.

Ich habe versucht:

dt1 = Open();
:result << Set Data Type( Numeric, "Continuous" );
:range_min << Set Name( "LSL" );
:range_max << Set Name( "USL" );
limits = dt1 << Summary( Group( :test_name ), Mean( Eval( "LSL" ) ), Mean( Eval( "USL" ) ), );
Current Data Table( limits );
rowsTest = limits[0, 1];
iMax = N Rows( limits );
Current Data Table( dt1 );

vl = V List Box( Text Box( "Spec Limits Script" ) );

For( i = 0, i < iMax, i++,
 vv = V List Box(
  Distribution(
   Stack( 1 ),
   Continuous Distribution( Column( :result ), Horizontal Layout( 1 ), Vertical( 0 ) ),
   Where( :test_name == rowsTest[i] )
  )
 ),
 vl << append( vv )
);
newFit = New Window( "Spec Limits Collection", vl );

Aber es hat nicht funktioniert.

Ist das die richtige Vorgehensweise?

 

Dank im Voraus.

Betreff: JSL – generische Verteilung auf dem Tisch

Danke für die Hilfe!

Ich habe noch 3 weitere Probleme...

 

1. Wenn ich mit dem „Graph Builder“ eine Überlagerung durchführen muss (z. B. Test1 in Maschine1 vs. Maschine2).

Ich versuche das Gleiche zu tun, ohne Erfolg:

For( i = 1, i <= N Rows( SummaryDT ), i++,
 CurrentTest = Column( SummaryDT, 1 )[i];
 CurrentMin = Column( SummaryDT, 2 )[i];
 CurrentMax = Column( SummaryDT, 3 )[i];
 NewMin = Column( SummaryDT, 4 )[i];
 NewMax = Column( SummaryDT, 5 )[i];
 CurrentStDev = Column( SummaryDT, 7 )[i];

 CurBox = V List Box(
  CurDist = StackedResults << 
  Graph Builder(
   Show Control Panel( 0 ),
   Variables( X( :Result ), Page( :Test Name ), Overlay( :Facility ) ),
   Elements( Histogram( X, Legend( 13 ) ) )
  ),
  V List Box(
   H List Box( Text Box( "Current Low:   " ), Text Box( CurrentMin ), Text Box( "   New Low:   " ), Text Box( NewMin ) ),
   (H List Box( Text Box( "Current High:   " ), Text Box( CurrentMax ), Text Box( "   New High:   " ), Text Box( NewMax ) ))
  )
 );
 (CurDist << report)[AxisBox( 1 )] << Min( Min( CurrentMin || NewMin ) - Abs( Min( CurrentMin || NewMin ) ) * 0.005 );
 (CurDist << report)[AxisBox( 1 )] << Max( Max( CurrentMax || NewMax ) * 1.005 );
 (CurDist << report)[AxisBox( 1 )] << Add Ref Line( CurrentMin, "Solid", blue, "Min", 1 );
 (CurDist << report)[AxisBox( 1 )] << Add Ref Line( CurrentMax, "Solid", blue, "Max", 1 );
 (CurDist << report)[AxisBox( 1 )] << Inc( CurrentStDev );
 //(CurDist << report)[AxisBox( 2 )] << Show Major Grid( 1 );
 //(CurDist << report)[AxisBox( 2 )] << Scale( "Log" );
 (CurDist << report)[Outline Box( 1 )] << Set Title( "Test: " || CurrentTest );
 MainContainer << append( CurBox );
);

2. Ich versuche, die Y-Achse im logarithmischen Maßstab zu skalieren, damit ich den Ausreißer leichter erkennen kann, aber das funktioniert nicht richtig ...

3. Warum meine „Listenbox“ ausgeblendet ist und ich sie nur sehen kann, wenn ich den Plot schließe.

 

Danke!

Betreff: JSL – generische Verteilung auf dem Tisch

Hier ist Ihr Code, viel Spaß:

 

 

dt = Current Data Table();
SummaryDT = dt << Summary( Group( :test_name, :range_min, :range_max ), Std Dev( :result ) );

win = New Window( "My Analysis", MainContainer = V List Box() );

For( i = 1, i <= N Rows( SummaryDT ), i++,
CurrentTest = Column( SummaryDT, 1 )[i];
CurrentMin = Column( SummaryDT, 2 )[i];
CurrentMax = Column( SummaryDT, 3 )[i];
CurrentStDev = Column( SummaryDT, 5 )[i];

CurBox = V List Box( CurDist = dt << Distribution( Continuous Distribution( Column( :result ),Horizontal Layout(1) ), Where( :test_name == CurrentTest ) ) );

(CurDist << report)[AxisBox(1)] << Max(Maximum(CurrentMax,(CurDist << report)[AxisBox(1)] << Get Max) + (CurrentMax-CurrentMin)*0.05);
(CurDist << report)[AxisBox(1)] << Min(Minimum(CurrentMin,(CurDist << report)[AxisBox(1)] << Get Min) - (CurrentMax-CurrentMin)*0.05);
(CurDist << report)[AxisBox(1)] << Add Ref Line( CurrentMin, "Solid", blue, "Min", 1 );
(CurDist << report)[AxisBox(1)] << Add Ref Line( CurrentMax, "Solid", blue, "Max", 1 );
(CurDist << report)[AxisBox(1)] << Inc(CurrentStDev);
(CurDist << report)[OutlineBox(1)] << Set Title("Test: " || CurrentTest);
MainContainer << append(CurBox);
);
close(SummaryDT,nosave);
(win << XPath("//TextBox[contains(./text(), 'Where')]")) << delete();

 

Betreff: JSL – generische Verteilung auf dem TischBei Interesse schicken Sie mir bitte einen Tisch zu
tom.abramov@ald.co.il
und ich werde hier das Drehbuch veröffentlichenBetreff: JSL – generische Verteilung auf dem Tisch

Wie wäre es mit der Änderung der Bin-Größenskala und dem Hinzufügen von LSL, USL usw. zu jedem Ergebnisfenster?

Zwei Probleme:

1. Wie erhalte ich den Sigma-Wert aus dem Histogramm, das ich gerade gezeichnet habe, in den Skalenbereich des Diagramms?

2. Wie füge ich Ref-Zeilen hinzu, ohne einen Zähler für die Testnamen zu haben?

Vielen Dank im Voraus!

 

„std“ – ist der Standardwert aus der Statistiktabelle

„???“ – ist ein Wert aus der Tabelle „Limits“.

 

dt1 = Open();
:result << Set Data Type( Numeric, "Continuous" );
limits = dt1 << Summary( Group( :test_name ), Mean( Eval( "range_min" ) ), Mean( Eval( "range_max" ) ), );
Ntests = N Rows( limits );

vl = V List Box( Text Box( "Spec Limits Script" ) );

dt1 << Distribution(
 Continuous Distribution( Column( :result ), Horizontal Layout( 1 ), Vertical( 0 ) ),
 By( :test_name ),
 SendToReport(
  Dispatch(
   {"result"},
   "1",
   ScaleBox,
   {Min( 97.5173285198556 ), Max( 97.9576714801444 ), Inc( <U><STRONG>std</STRONG></U>), Minor Ticks( 0 ),
   Add Ref Line( limits[<U><STRONG>???</STRONG></U>,3], "Solid", "Black", "", 1 ), Add Ref Line( limits[<U><STRONG>???</STRONG></U>,4], "Solid", "Black", "", 1 )}
  )
 )
);

 

 

Betreff: JSL – generische Verteilung auf dem Tisch

Sie können es auch ohne Schleife ausführen:

Distribution(
Continuous Distribution(
Column( :result ),
Horizontal Layout( 1 ),
Vertical( 0 )
),
By( :test_name )
);

Betreff: JSL – generische Verteilung auf der Tabelle

Hallo,

Hier ist der Code nach einigen Korrekturen:

 

 

dt1 = Open();
:result << Set Data Type( Numeric, "Continuous" );
:range_min << Set Name( "LSL" );
:range_max << Set Name( "USL" );
limits = dt1 << Summary( Group( :test_name ), Mean( Eval( "LSL" ) ), Mean( Eval( "USL" ) ), );
Ntests = NRows(limits);
vl = V List Box( Text Box( "Spec Limits Script" ) );
For( i = 1, i <= Ntests, i++,
vv = V List Box(
dt1 << Distribution(
Stack( 1 ),
Continuous Distribution( Column( :result ), Horizontal Layout( 1 ), Vertical( 0 ) ),
Where( :test_name == Column(limits,"test_name")[i] )
)
);
vl << append( vv )
);
newFit = New Window( "Spec Limits Collection", vl );