nav[aria-label="Primary Navigation"] { padding: 0; & ul { list-style: none; width: 100%; display: flex; flex-direction: row; justify-content: start; align-items: start; gap: 30px; padding: 0; & li { margin: 0; } & ul li { list-style: none; } } }

57744_it-IT

liliconcom

Scripting di un problema di Gauge R&R

come sotto lo script JMP è per Gauge R&R 5 sigma
ma nella mia tabella di variabilità, ho sempre ottenuto un primo elemento che può essere impostato correttamente su Gauge RR 5 sigma.

non capisco, perché non riesco a ottenere tutti gli elementi "y list" su 5 sigma.

Qualcuno può aiutarmi?

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

Ri: scripting di un problema di Gauge R&R

Incredibile e funziona.
grazie per la tua condivisione.

Ri: scripting di un problema di Gauge R&R

Ignora la versione originale di questa risposta. Vado con la scusa "era prima della mia scusa per il caffè mattutino".

Prova questo.Un paio di correzioni. La s, lsl, usl non è stata memorizzata in un elenco nei post precedenti, quindi i valori erano obsoleti. risolto qui. Ho inavvertitamente usato la "N" come parametro di iterazione invece di i. Risolto qui. Sicuramente ricontrolla che questo stia facendo quello che vuoi.

//clear log();
namespace("here")<<REMOVE></REMOVE>

Ri: scripting di un problema di Gauge R&R

grazie per la tua risposta,

ma incontro ancora problemi qui

dopo aver eseguito lo script, ho ottenuto il grafico del misuratore di variabilità

Il primo elemento su Gauge R&R => può mostrare 5K nel grafico VC. è corretto

ma il secondo elemento sul risultato Gauge R&R => mostra "6K" nel grafico VC.

Voglio che tutti gli elementi della tua lista siano calcolati 5K in Guage R&R

@mikedriscoll Hai qualche idea migliore qui?

Ri: scripting di un problema di Gauge R&R

Ecco la riscrittura. Se non altro, la funzione di richiamo rende le cose più facili da eseguire il debug.

Modifica: non utilizzare questa versione. Ci sono problemi con le variabili s, lsl e usl che sono obsolete e inoltre non risolve il problema dell'OP.

//clear log();
namespace("here")<<remove(namespace("here")<<getkeys);
names default to here(1);
dt = current data table();

showErrorMsg = expr(New Window("Must select at least one column...",<<Modal, textBox("Must select at least one column in Y and X roles.               "),
ButtonBox("OK")));

//grrFunction = Function({ylist, xlist, bbylist}, // pass GUI variables to locals here, downside is can't hover to observe values
grrFunction = Function({x}, // x not used here, just using the variables from the GUI and re-assinging to existing vars

 ylist = yParamNames;
 xlist = xParamNames;
 bbylist = byParamNames;

 N = N Items( ylist );
 For( i = 1, i <= N, i++,
  s = column(dt, ylist[i]) << 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 ); 

);

nw = new window("Select Columns For Gauge R&R Analysis",
 hlistbox( // horizontal list box
  cflObj = filter col selector(data table(dt << get name()), nlines(20)), //first item in hlist box
  
  panelbox( "Cast selected columns into roles",      // second item
   lineupbox(ncol(2),
     bb_y = buttonbox("Y, Response",
      newParams = cflObj << get selected;
      yColObj << append(newParams);
     ),
     yColObj = col list box(data table(dt << get name()),numeric,nlines(5), min items(1)),
     
     bb_x = buttonbox("X, Factor",
      newParams = cflObj << get selected;
      xColObj << append(newParams);
     ),
     xColObj = col list box(data table(dt << get name()),nlines(3), min items(1), <<Set Analysis Type(Nominal)),
     
     bb_by = buttonbox("By",
      newParams = cflObj << get selected;
      byColObj << append(newParams);
     ),
     byColObj = col list box(data table(dt << get name()),nlines(3))
   )// end lineupbox 
  )// end roles panel box
  ,
  panelbox("Actions",             // final item
   vlistbox(
    button box("Ok",
      yParamNames = yColObj << get items;
      xParamNames = xColObj << get items;
      byParamNames = byColObj << get items;
      
      if ( nitems(yParamNames) == 0 | nitems(xParamNames) == 0  ,
       showErrorMsg
      ,
       //else
       new namespace("recall_grr");
       recall_grr:yParamNames_rcl = yColObj << get items;
       recall_grr:xParamNames_rcl = xColObj << get items;
       recall_grr:byParamNames_rcl = byColObj << get items;
       nw << close window; 
       //grrFunction(yParamNames, xParamNames, byParamNames)  //pass to local
       grrFunction(1)  // use these 3 (above) vars directly without passing
      );

    ),
    button box("Remove", yColObj << remove selected; xColObj << remove selected; byColObj << remove selected),
    button box("Cancel", nw << close window),
    spacerbox(Size(1,80)),
    button box("Recall",
     try(yColObj << append(recall_grr:yParamNames_rcl));
     try(xColObj << append(recall_grr:xParamNames_rcl));
     try(byColObj << append(recall_grr:byParamNames_rcl));
     
    )
   )
  )//end actions panel box
 ) // end hlistbox
);//end new window nw

Ri: scripting di un problema di Gauge R&R

Non avevi definito dt ma presumo che l'avessi definito separatamente. Ma anche così, stavi usando questo comando nel ciclo:

s <SPAN class="token operator">=</SPAN> dt <SPAN class="token operator"><</SPAN><SPAN class="token operator"><</SPAN><SPAN class="token messages"> Get Property</SPAN><SPAN class="token punctuation">(</SPAN> <SPAN class="token string">"Spec Limits"</SPAN> <SPAN class="token punctuation">)</SPAN><SPAN class="token punctuation">;</SPAN>

Questo non funziona (supponendo che dt sia una tabella di dati) perché i limiti delle specifiche sono una proprietà di una colonna, non della tabella di dati. Vedere di seguito per informazioni su come fare riferimento alla colonna e accedere alla proprietà dei limiti di specifica. Ho aggiunto una riga dt = current data table().

Inoltre, il comando della colonna dialog() è deprecato (credo) e sostituito dal nuovo comando window() che utilizza tutta una serie di caselle di visualizzazione tra cui "filter col selector()", "col list box()" e " casella dei pulsanti()". Se hai appena iniziato, potresti considerare di cambiare. Dipende da te, ma considera solo il passaggio rispetto alla creazione di molti script con funzionalità deprecate.

dt = current data table();

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 = column(dt, ylist[N]) << 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 );

Comments

There are no comments yet