9632_es-ES

liliconcom

Scripting a Gauge R & R estudio

JMP 9

 

Me gustaría escribir un estudio de Gauge R&R que incluya múltiples variables, en lugar de usar los menús desplegables del triángulo rojo varias veces desde la plataforma Gráfico-> Variable / Gráfico de indicadores.

 

Si realiza el análisis manualmente, y selecciona del menú desplegable del triángulo rojo Gauge Studies / Gauge RR, obtiene dos cuadros de diálogo, uno que pregunta si el diseño está cruzado o anidado (el mío está cruzado), y un segundo cuadro de diálogo que pregunta por las especificaciones de Gauge R&R.

 

Cuando creo un script para realizar esta tarea en todas las variables Y, el primer cuadro de diálogo no aparece, pero no puedo descubrir cómo hacer que el segundo cuadro de diálogo no aparezca, siempre aparece sin importar lo que haga. Si sabe cómo cambiar la secuencia de comandos para que ya no aparezca el segundo cuadro de diálogo, hágamelo saber.

 

Aquí está mi guión:

 

 

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: Scripting a Gauge R & R estudio

El gráfico de variabilidad solo muestra el primer elemento en 5 kigma.
Quiero obtener todos los elementos en 5 sigma. ¿Quién me puede dar una sugerencia? 

 

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: Scripting a Gauge R & R estudio

Algo como lo siguiente podría ser útil. Saqué el conjunto de datos de muestra "2 factores cruzados" y agregué una columna a la que llamé MyY con una fórmula aleatoria de media normal 0 var 1. El código siguiente apila la salida en una ventana para todas las columnas Y seleccionadas. Si omite la envoltura Nueva ventana, cada columna Y tendrá su propia ventana. El supuesto es que cada columna permitida tiene valores ingresados para la propiedad "Límites de especificaciones".

 

 

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