9632_fr-FR

liliconcom

Script d'une étude R&R de jauge

JMP 9

 

Je souhaite créer un script d'étude Gauge R&R impliquant plusieurs variables, au lieu d'utiliser plusieurs fois les menus déroulants du triangle rouge à partir de la plate-forme Chart->Variabliity/Gauge Chart.

 

Si vous effectuez l'analyse manuellement et que vous sélectionnez dans le menu déroulant du triangle rouge l'élément Gauge Studies/Gauge RR, vous obtenez deux boîtes de dialogue, une qui demande si le plan est croisé ou imbriqué (le mien est croisé), et une deuxième boîte de dialogue qui demande les spécifications R&R de la jauge.

 

Lorsque je crée un script pour effectuer cette tâche sur toutes les variables Y, la première boîte de dialogue n'apparaît pas, mais je n'arrive pas à comprendre comment faire pour que la 2ème boîte de dialogue n'apparaisse pas, elle apparaît toujours quoi que je fasse. Si vous savez comment modifier le script pour que la 2e boîte de dialogue n'apparaisse plus, faites-le moi savoir.

 

Voici mon script :

 

 

rezults = Column Dialog( 
        title( "Select Columns For Gauge R&R Analysis" ), 
        yycol = ColList( "Y, Response",  Mincol( 1 ), DataType( Numeric ) ), 
        xxcol = ColList( "X, Factor",  Mincol( 1 ), Modeling Type( Nominal ) ), 
        bbycol = ColList( "By"  ));
ylist = rezults["yycol"]; 
xlist = rezults["xxcol"]; 
bbylist = rezults["bbycol"];
Variability Chart(
      Y( eval(ylist) ),
      X( eval(xlist) ),
      By ( eval(bbylist) ),
      Model( "Crossed" ),
      Max Iter( 100 ),
      Conv Limit( 0.00000001 ),
      Number Integration Abscissas( 128 ),
      Number Function Evals( 65536 ),
      Analysis Type( Name( "Choose best analysis (EMS REML Bayesian)" ) ),
      Historical Mean( 0 ),
      Historical Sigma( 1 ),
      Process Variation( 0 ),
      Std Dev Chart( 0 ),
      Gauge RR( 6, 0, 0, 0 ),
      Gauge RR Report( 1 )
);

 

Re : Script d'une étude R&R de jauge

Le tableau de variabilité ne montre que le 1er élément sur 5 kigma.
Je veux obtenir tous les articles sur 5 sigma. qui peut me donner une suggestion?

 

rezults = Column Dialog(
title( "Select Columns For Gauge R&R Analysis" ),
yycol = ColList( "Y, Response", Mincol( 1 ), DataType( Numeric ) ),
xxcol = ColList( "X, Factor", Mincol( 1 ), Modeling Type( Nominal ) ),
bbycol = ColList( "By" )
);
ylist = rezults["yycol"];
xlist = rezults["xxcol"];
bbylist = rezults["bbycol"];
N = N Items( ylist );
For( i = 1, i <= N, i++,
s = dt << Get Property( "Spec Limits" );
usl = s["USL"];
lsl = s["LSL"];
);
obj = Variability Chart(
Y( Eval( ylist ) ),
X( Eval( xlist ) ),
By( Eval( bbylist ) ),
Model( "Main Effect" ),
Max Iter( 100 ),
Conv Limit( 0.00000001 ),
Number Integration Abscissas( 128 ),
Number Function Evals( 65536 ),
Analysis Type( "Choose best analysis (EMS REML)" ),
Historical Mean( 0 ),
Historical Sigma( 0 ),
//Process Variation( 0 ),
Std Dev Chart( 0 ),
);
obj << Gauge RR( 5, usl - lsl, lsl, usl );

 

---

Re : Script d'une étude R&R de jauge

Quelque chose comme ce qui suit pourrait être utile. J'ai extrait l'échantillon de données "2 facteurs croisés" et ajouté une colonne que j'ai appelée MyY avec la formule moyenne aléatoire normale 0 var 1. Le code ci-dessous empile la sortie dans une fenêtre pour toutes les colonnes Y sélectionnées. Si vous omettez le wrapper Nouvelle fenêtre, chaque colonne Y aurait sa propre fenêtre. L'hypothèse est que chaque colonne autorisée a des valeurs entrées pour la propriété "Spec Limits".

 

 

nw = new window("Test Window",
 
rezults = Column Dialog(
        title( "Select Columns For Gauge R&R Analysis" ),
        yycol = ColList( "Y, Response",  Mincol( 1 ), DataType( Numeric ) ),
        xxcol = ColList( "X, Factor",  Mincol( 1 ), Modeling Type( Nominal ) ),
        bbycol = ColList( "By"  ));
 
ylist = rezults["yycol"];
xlist = rezults["xxcol"];
bbylist = rezults["bbycol"];
 
N = NItems(ylist);
 
//show(ylist,xlist,bbylist);
//show(ylist[1],xlist[1]);
 
for(i=1,i<=N,i++,
 
    specs = ylist << get property("Spec Limits");
    usl = specs["USL"];
    lsl = specs["LSL"];
 
    //show(specs);
    //show(usl);
    //show(lsl);
 
//)
 
    vc = Variability Chart(
        Y( ylist),
        X( :Operator, :part# ),
        Model( "Crossed" ),
        Max Iter( 100 ),
        Conv Limit( 0.00000001 ),
        Number Integration Abscissas( 128 ),
        Number Function Evals( 65536 ),
        Analysis Type( Name( "Choose best analysis (EMS REML Bayesian)" ) ),
        Historical Sigma( 0 ),
        Std Dev Chart( 1 ),
        Gauge RR( 6, usl-lsl, lsl, usl ),
        Gauge RR Report( 1 )
    );
 
)
)