262302_de-DE

liliconcom

GRR-Bericht

Hi,

 

Ich habe ein Skript, um ein GRR-Diagramm zu generieren und dann eine Übersichtstabelle zu erstellen.Das Problem ist, wenn ich eine Mischung aus einer Seite und zwei Seitenspezifikationen habe und den Befehl "kombinierte Datentabelle erstellen" verwende, wird basierend auf dem ersten Parameter entweder nur eine Seitenspezifikation oder zwei Seitenspezifikationen angezeigt.

 

Wie kann ich die zusammenfassende Tabelle von beiden im Skript erhalten?

 

 

 

new window ("GRR",
for (i = 1, i <= N items (ColList), i++,
  
 variability chart (
  Y ((ColList [i])),
  X (:Operators, :Parts),
  Model ("Crossed"),
  Analysis Type( "Choose best analysis (EMS REML Bayesian)" ),
  Show group means (1),
  Points Jittered( 1 ),
  AIAG Labels( 0 ),
  Show Box Plots( 1 ),
  Mean Diamonds( 1 ),
  Mean Plots( 1 ),
  Historical Sigma(0),
  Name( "Gauge R&R" )(5.15),
  Name( "Gauge R&R Report" )(1),
  Automatic Recalc( 1 ),
  )
);
);


temp = report (variability chart[1])["GaugeR&R"][table box(1)] << make combined data table; 


temp = report (variability chart[1])["GaugeR&R"][table box(1)] << make combined data table; 
temp << set name("GR&R summary");

data table ("GR&R summary") << select where (:Measurement Source != "Gauge R&R");
data table ("GR&R summary") << delete rows;

 

Re: GRR-Bericht

Was ich mit einem Anzeigeobjekt meine, sind alle Objekte, die in ein neues Fenster () platziert werden können und angezeigt werden.Sie können diese Objekte verwenden, ohne sich in einem neuen Fenster zu befinden, und Sie können Ausgaben in diese Objekte platzieren, und sie werden nicht angezeigt, bis sie in ein neues Fenster eingefügt werden.Unten sehen Sie ein sehr einfaches Beispiel für die Verwendung eines <

Names Default To Here( 1 );
dt = Open( "$SAMPLE_DATA/big class.jmp" );

vlb = V List Box(
 Graph Builder(
  Size( 1000, 1000 ),
  Show Control Panel( 0 ),
  Variables( X( :weight ), Y( :height ) ),
  Elements( Points( X, Y, Legend( 3 ) ), Smoother( X, Y, Legend( 4 ) ) )
 ),
 Graph Builder(
  Size( 1000, 1000 ),
  Show Control Panel( 0 ),
  Variables( X( :age ), Y( :height ) ),
  Elements( Box Plot( X, Y, Legend( 9 ) ) )
 )
);

nw = New Window( "pptslide", <<JOURNAL></JOURNAL>

Re: GRR-BerichtKönnen Sie mir ein Beispiel zum Erstellen des Anzeigeobjekts zeigen?Re: GRR-Bericht

Die Methode, die ich dazu verwende, besteht darin, ein Anzeigeobjekt mit den Diagrammen zu erstellen, die ich auf der ppt-Folie haben möchte, und dann ein Bildobjekt aus dem Anzeigeobjekt zu erstellen und dieses in ein Journal zu platzieren.Die Präsentation aus dem Journaleintrag speichern;

Re: GRR-Bericht

Hi,

 

Das GRR-Diagramm ist korrekt, jedoch keine Daten in der GR&R-Zusammenfassung. Wie auch immer, heute Nachmittag versuche ich es anders. Ich habe das Diagramm in 2 Registerkarten aufgeteilt. erste Registerkarte für eine Seitenspezifikation und eine weitere für zwei Seitenspezifikationen. Jetzt scheint es zu funktionieren.

 

 

Mein nächstes Problem ist, dass ich Diagramme in .ppt speichern möchte. Ich möchte ein Variablendiagramm pro Seite.

Wenn ich versuche, die Präsentation als .ppt zu speichern. Es zeigt ein kleines Diagramm (innerhalb des Variablendiagramms) pro Seite. Gibt es eine Möglichkeit, sie zu kombinieren?

 

data table("split_spec") << select where (:spec type == "one side") ;
rows = data table("split_spec")<< get selected rows;
ColList1 = :Label[rows];
 
data table("split_spec") << select where (:spec type == "two side") ;
rows = data table("split_spec")<< get selected rows;
ColList2 = :Label[rows];
 
 


dtOut = New Table( "GRR_Summary");

current data table(dt_raw);

nw = new window ("GRR",tb = tab box(),vlb = vlist box());
tb << add ("OneSideSpec", vlb = v list box());

 for (i = 1, i <= N items (ColList1), i++,
 vlb << append(
 v1 = variability chart (
  Y ((ColList1 [i])),
  X (:Operators, :Parts),
  Model ("Crossed"),
  Analysis Type( "Choose best analysis (EMS REML Bayesian)" ),
  Show group means (1),
  Points Jittered( 1 ),
  AIAG Labels( 0 ),
  Show Box Plots( 1 ),
  Mean Diamonds( 1 ),
  Mean Plots( 1 ),
  Historical Sigma(0),
  Name( "Gauge R&R" )(5.15),
  Name( "Gauge R&R Report" )(1),
  Automatic Recalc( 1 ),
  );
  
  );


);
 
temp = report (v1)["GaugeR&R"][table box(1)] << make combined data table; 
dtOut << concatenate( temp, append to first table( 1 ) );
close(temp, nosave);

tb << Add( "TwoSideSpec", vlb2 = V List Box() ) ;
current data table(dt_raw);
 For( i = 1, i <= N Items( ColList2 ), i++,
 vlb2 << append(
  v2 = variability chart(
   Y( (ColList2[i]) ),
   X( :Operators, :Parts ),
   Model( "Crossed" ),
   Analysis Type( "Choose best analysis (EMS REML Bayesian)" ),
   Show group means( 1 ),
   Points Jittered( 1 ),
   AIAG Labels( 0 ),
   Show Box Plots( 1 ),
   Mean Diamonds( 1 ),
   Mean Plots( 1 ),
   Historical Sigma( 0 ),
   Name( "Gauge R&R" )(5.15),
   Name( "Gauge R&R Report" )(1),
   Automatic Recalc( 1 ),
  );
  
 
 );
 

);

temp = report(v2)["GaugeR&R"][table box(1)] << make combined data table; 
dtOut << concatenate( temp, append to first table( 1 ) );
close(temp, nosave);

data table ("GRR_Summary") << select where (:Measurement Source != "Gauge R&R");
data table ("GRR_Summary") << delete rows;

Re: GRR-Bericht

Ich habe den Code überarbeitet und mit einer Datentabelle getestet, die ich zur Verfügung hatte, und es scheint zu funktionieren.Sehen Sie, ob es für Sie funktioniert

Names Default To Here( 1 );
dt = Current Data Table();
dtOut = New Table( "Guage R&R Summary" );
colList = dt << get column names( continuous, string );
New Window( "GRR",
 For( i = 1, i <= N Items( ColList ), i++,
  theChart = dt << variability chart(
   Y( (ColList[i]) ),
   X( :Operators, :Parts ),
   Model( "Crossed" ),
   Analysis Type( "Choose best analysis (EMS REML Bayesian)" ),
   Show group means( 1 ),
   Points Jittered( 1 ),
   AIAG Labels( 0 ),
   Show Box Plots( 1 ),
   Mean Diamonds( 1 ),
   Mean Plots( 1 ),
   Historical Sigma( 0 ),
   Name( "Gauge R&R" )(5.15, 0, 0, 0),
   Name( "Gauge R&R Report" )(1),
   Automatic Recalc( 1 ), 

  );
  temp = Report( theChart )["GaugeR&R"][Table Box( 1 )] << make combined data table;
  dtOut << concatenate( temp, append to first table( 1 ) );
  Close( temp, nosave );
 )
);

Re: GRR-Bericht

Ich habe dein Skript ausprobiert. Die for-Schleife funktioniert nicht. es meldet nur den ersten Parameter.

Re: GRR-Bericht

Ich würde die fragliche Tabelle nach jedem Variabilitätsdiagramm ausgeben und sie dann zu einer Haupttabelle verketten und dann zum nächsten Variabilitätsdiagramm übergehen.Etwas wie:

dtOut = New Data Table( "Guage R&R Summary" );

New Window( "GRR",
 For( i = 1, i <= N Items( ColList ), i++, 
  
  variability chart(
   Y( (ColList[i]) ),
   X( :Operators, :Parts ),
   Model( "Crossed" ),
   Analysis Type( "Choose best analysis (EMS REML Bayesian)" ),
   Show group means( 1 ),
   Points Jittered( 1 ),
   AIAG Labels( 0 ),
   Show Box Plots( 1 ),
   Mean Diamonds( 1 ),
   Mean Plots( 1 ),
   Historical Sigma( 0 ),
   Name( "Gauge R&R" )(5.15),
   Name( "Gauge R&R Report" )(1),
   Automatic Recalc( 1 ),

  );
  temp = Report( variability chart[1] )["GaugeR&R"][Table Box( 1 )] << make combined data table;
  dtOut << concatenate( temp, append to first table( 1 ) );
  Close( temp, nosave );
 )
);

data table ("GR&R summary") << select where (:Measurement Source != "Gauge R&R");
data table ("GR&R summary") << delete rows;