49130_es-ES

liliconcom

Combinando el comando For loop y Dispatch() en un gráfico de variabilidad

Hola a todos,

 

Soy nuevo en JMP y en la programación en general. Mi reto actual:

 

Tengo una gran tabla de datos con 800 columnas. Ahora me gustaría crear diagramas de caja usando el gráfico de variabilidad, pero usando una lista, en la que primero defino qué columnas de las 800 me gustaría usar. Luego creo un For-loop como se muestra a continuación.

 

¿Cuál es la sintaxis adecuada para que el concat funcione?

 

Gracias

Datalist_log = {Test1, Test2, Test33, Test50}; //first I define the list with the tests I Need. It needs to be like this in the code.

imax = N Items( Datalist );

//Boxplots
For( i = 1, i <= imax, i++, 
 Variability Chart(
  Y( Datalist_log[i] ), //Loop cycling through the list putting the respective column on the Y axis
  X( :wafernr ),
  Max Iter( 100 ),
  Conv Limit( 0.00000001 ),
  Number Integration Abscissas( 128 ),
  Number Function Evals( 65536 ),
  Analysis Type( "Choose best analysis (EMS REML Bayesian)" ),
  Std Dev Chart( 1 ),
  Show Box Plots( 1 ),
  SendToReport(
   Dispatch(
    {"Variability Chart for Test1"}, <BR />// This is how it looks when it works. <BR />//But I need to replace the hard coded string with an element from<BR />//the list defined above as a part of the Loop, for example:
    {"Variability Chart for " ||Datalist_log[i]}, <BR />//This is my most promising attempt. But I have failed to understand how the concat works.
//If i manually change the argument to <BR />//{"Variability Chart for XYSomethingElse"}, the outcome is the same, meaning that the <BR />//formatting commands (lot plot, scientific axis etc.) that follow are all ignored.
    "2",
    ScaleBox,
    {Scale( "Log" ), Format( "Scientific", 12 ), Min( 0.0000000001 ), Max( 0.000001 ), Inc( 1 ), Minor Ticks( 0 ),
    Add Ref Line( UpperSpec_log[i], "Dotted", "Black", "USL", 2 )}
   ),
   Dispatch(
    {"Variability Chart for Test1"},
    "Variability Chart",
    FrameBox,
    {Frame Size( 600, 240 ), Marker Size( 1 ), 
    DispatchSeg( Box Plot Seg( 1 ), {Box Type( "Outlier" ), Line Color( "Red" ), Line Width( 2 )} ), 
    DispatchSeg( Box Plot Seg( 2 ), {Box Type( "Outlier" ), Line Color( "Red" ), Line Width( 2 )} ),
    DispatchSeg( Box Plot Seg( 3 ), {Box Type( "Outlier" ), Line Color( "Red" ), Line Width( 2 )} ),
    DispatchSeg( Box Plot Seg( 4 ), {Box Type( "Outlier" ), Line Color( "Red" ), Line Width( 2 )} ),
    DispatchSeg( Box Plot Seg( 5 ), {Box Type( "Outlier" ), Line Color( "Red" ), Line Width( 2 )} ),
    DispatchSeg( Box Plot Seg( 6 ), {Box Type( "Outlier" ), Line Color( "Red" ), Line Width( 2 )} ),
    DispatchSeg( Box Plot Seg( 7 ), {Box Type( "Outlier" ), Line Color( "Red" ), Line Width( 2 )} ),
    DispatchSeg( Box Plot Seg( 8 ), {Box Type( "Outlier" ), Line Color( "Red" ), Line Width( 2 )} ),
    DispatchSeg( Box Plot Seg( 9 ), {Box Type( "Outlier" ), Line Color( "Red" ), Line Width( 2 )} ),
    DispatchSeg( Box Plot Seg( 10 ), {Box Type( "Outlier" ), Line Color( "Red" ), Line Width( 2 )} ),
    DispatchSeg( Box Plot Seg( 11 ), {Box Type( "Outlier" ), Line Color( "Red" ), Line Width( 2 )} ),
    DispatchSeg( Box Plot Seg( 12 ), {Box Type( "Outlier" ), Line Color( "Red" ), Line Width( 2 )} ),
    DispatchSeg( Box Plot Seg( 13 ), {Box Type( "Outlier" ), Line Color( "Red" ), Line Width( 2 )} ),
    DispatchSeg( Box Plot Seg( 14 ), {Box Type( "Outlier" ), Line Color( "Red" ), Line Width( 2 )} ),
    DispatchSeg( Box Plot Seg( 15 ), {Box Type( "Outlier" ), Line Color( "Red" ), Line Width( 2 )} ),
    DispatchSeg( Box Plot Seg( 16 ), {Box Type( "Outlier" ), Line Color( "Red" ), Line Width( 2 )} ),
    DispatchSeg( Box Plot Seg( 17 ), {Box Type( "Outlier" ), Line Color( "Red" ), Line Width( 2 )} ),
    DispatchSeg( Box Plot Seg( 18 ), {Box Type( "Outlier" ), Line Color( "Red" ), Line Width( 2 )} ),
    DispatchSeg( Box Plot Seg( 19 ), {Box Type( "Outlier" ), Line Color( "Red" ), Line Width( 2 )} ),
    DispatchSeg( Box Plot Seg( 20 ), {Box Type( "Outlier" ), Line Color( "Red" ), Line Width( 2 )} ),
    DispatchSeg( Box Plot Seg( 21 ), {Box Type( "Outlier" ), Line Color( "Red" ), Line Width( 2 )} ),
    DispatchSeg( Box Plot Seg( 22 ), {Box Type( "Outlier" ), Line Color( "Red" ), Line Width( 2 )} ),
    DispatchSeg( Box Plot Seg( 23 ), {Box Type( "Outlier" ), Line Color( "Red" ), Line Width( 2 )} ),
    DispatchSeg( Box Plot Seg( 24 ), {Box Type( "Outlier" ), Line Color( "Red" ), Line Width( 2 )} ),
    DispatchSeg( Box Plot Seg( 25 ), {Box Type( "Outlier" ), Line Color( "Red" ), Line Width( 2 )} )}
   ),
   Dispatch( {"Variability Chart for Test1"}, "", NomAxisBox, {Set Width( 573 ), Set Height( 21 )} ),
   Dispatch( {"Variability Chart for Test1"}, "Varability Std Chart", FrameBox, {Frame Size( 559, 180 )} )
  )
 //)
);

 

 

Re: Combinar el comando For loop y Dispatch() en un gráfico de variabilidad

Su fragmento de código no me permite resolver el problema.Mi sugerencia inicial es cerrar JMP y luego reiniciarlo.En raras ocasiones, JMP se confundirá.Reiniciar JMP borrará esa memoria.

 

Sería útil si pudiera proporcionar el script completo y una tabla de datos de muestra.

Re: Combinar el comando For loop y Dispatch() en un gráfico de variabilidad

Hola Jim,

 

Algo sucedió después de editar mi publicación 4-5 veces, el sitio dijo que debe revisarse antes de que se vuelva visible y luego desapareció. Por eso no vi la respuesta.

 

De hecho, después de publicar la pregunta inicial, hice algo tonto y funcionó, así que pensé que lo había resuelto. Pero luego descubrí que funciona sin importar lo que escriba después de Dispatch() (ver más abajo).

 

Intentaré averiguar qué hacen realmente Eval, Expr y Substitute. Muchas gracias

For( q = 1, q <= kmax, q++,  
 Variability Chart(
  Y( Datalist_log[q] ),
  X( :wafernr ),
  Max Iter( 100 ),
  Conv Limit( 0.00000001 ),
  Number Integration Abscissas( 128 ),
  Number Function Evals( 65536 ),
  Analysis Type( "Choose best analysis (EMS REML Bayesian)" ),
  Std Dev Chart( 1 ),
  Show Box Plots( 1 ),
  Disp_String = concat Items ({VarChartText,Datalist_log[q]}), //This is useless
  SendToReport(
   Dispatch(Disp_stringxyuz12034823048, //Does not matter what I write here
    "2",
    ScaleBox,
    {Scale( "Log" ), Format( "Scientific", 12 ), Min( 0.0000000001 ), Max( 0.000001 ), Inc( 1 ), Minor Ticks( 0 ),
    Add Ref Line( UpperSpec_log[q], "Dotted", "Black", "USL", 2 )}
    ),
   Dispatch(Disp_Stringsomethingelse,
    "Variability Chart",
    FrameBox,
    {Frame Size( 600, 240 ), Marker Size( 1 ), 
    DispatchSeg( Box Plot Seg( 1 ), {Box Type( "Outlier" ), Line Color( "Red" ), Line Width( 2 )} ), 
    DispatchSeg( Box Plot S
...
...
...

Re: Combinar el comando For loop y Dispatch() en un gráfico de variabilidad

Aquí hay una reelaboración de su código, usando una capacidad muy poderosa en JSL, Sustitución.Comenté su línea de referencia UpperSpec_log, ya que no tenía esa lista disponible.Sin embargo, Variability Chart Platform trazará automáticamente esos límites de especificación, si los agrega como Propiedades de columna a sus columnas, antes de ejecutar Variability Chart Platform.Una vez que se agregan los límites como propiedades de columna, muchas de las plataformas permitirán la visualización de los límites de especificación.

Aquí está mi código reelaborado

Names Default To Here( 1 );
dt = Open( "$SAMPLE_DATA\Semiconductor Capability.jmp" );
Try(dt:Wafer << Set Name( "wafernr" ));

Datalist_log = {NPN1, PNP1, NPN2}; //first I define the list with the tests I Need. It needs to be like this in the code.

imax = N Items( Datalist_log );

//Boxplots
For( i = 1, i <= imax, i++,
 Eval(
  Substitute(
    Expr(
     Variability Chart(
      Y( __DataList__ ), //Loop cycling through the list putting the respective column on the Y axis
      X( :wafernr ),
      Max Iter( 100 ),
      Conv Limit( 0.00000001 ),
      Number Integration Abscissas( 128 ),
      Number Function Evals( 65536 ),
      Analysis Type( "Choose best analysis (EMS REML Bayesian)" ),
      Std Dev Chart( 1 ),
      Show Box Plots( 1 ),
      SendToReport(
       Dispatch(
        {__VarChart__}, 
        // This is how it looks when it works. 
        //But I need to replace the hard coded string with an element from
        //the list defined above as a part of the Loop, for example:
        //{"Variability Chart for " || Datalist_log[i]}, 
        //This is my most promising attempt. But I have failed to understand how the concat works.
        //If i manually change the argument to 
        //{"Variability Chart for XYSomethingElse"}, the outcome is the same, meaning that the 
        //formatting commands (lot plot, scientific axis etc.) that follow are all ignored.
        "2",
        ScaleBox,
        {Scale( "Log" ), Format( "Scientific", 12 ), Min( 0.0000000001 ), Max( 0.000001 ), Inc( 1 ), Minor Ticks( 0 )//,
        //Add Ref Line( UpperSpec_log[i], "Dotted", "Black", "USL", 2 )
         
        }
       ),
       Dispatch(
        {__VarChart__},
        "Variability Chart",
        FrameBox,
        {Frame Size( 600, 240 ), Marker Size( 1 ), DispatchSeg(
         Box Plot Seg( 1 ),
         {Box Type( "Outlier" ), Line Color( "Red" ), Line Width( 2 )}
        ), DispatchSeg( Box Plot Seg( 2 ), {Box Type( "Outlier" ), Line Color( "Red" ), Line Width( 2 )} ),
        DispatchSeg( Box Plot Seg( 3 ), {Box Type( "Outlier" ), Line Color( "Red" ), Line Width( 2 )} ),
        DispatchSeg( Box Plot Seg( 4 ), {Box Type( "Outlier" ), Line Color( "Red" ), Line Width( 2 )} ),
        DispatchSeg( Box Plot Seg( 5 ), {Box Type( "Outlier" ), Line Color( "Red" ), Line Width( 2 )} ),
        DispatchSeg( Box Plot Seg( 6 ), {Box Type( "Outlier" ), Line Color( "Red" ), Line Width( 2 )} ),
        DispatchSeg( Box Plot Seg( 7 ), {Box Type( "Outlier" ), Line Color( "Red" ), Line Width( 2 )} ),
        DispatchSeg( Box Plot Seg( 8 ), {Box Type( "Outlier" ), Line Color( "Red" ), Line Width( 2 )} ),
        DispatchSeg( Box Plot Seg( 9 ), {Box Type( "Outlier" ), Line Color( "Red" ), Line Width( 2 )} ),
        DispatchSeg( Box Plot Seg( 10 ), {Box Type( "Outlier" ), Line Color( "Red" ), Line Width( 2 )} ),
        DispatchSeg( Box Plot Seg( 11 ), {Box Type( "Outlier" ), Line Color( "Red" ), Line Width( 2 )} ),
        DispatchSeg( Box Plot Seg( 12 ), {Box Type( "Outlier" ), Line Color( "Red" ), Line Width( 2 )} ),
        DispatchSeg( Box Plot Seg( 13 ), {Box Type( "Outlier" ), Line Color( "Red" ), Line Width( 2 )} ),
        DispatchSeg( Box Plot Seg( 14 ), {Box Type( "Outlier" ), Line Color( "Red" ), Line Width( 2 )} ),
        DispatchSeg( Box Plot Seg( 15 ), {Box Type( "Outlier" ), Line Color( "Red" ), Line Width( 2 )} ),
        DispatchSeg( Box Plot Seg( 16 ), {Box Type( "Outlier" ), Line Color( "Red" ), Line Width( 2 )} ),
        DispatchSeg( Box Plot Seg( 17 ), {Box Type( "Outlier" ), Line Color( "Red" ), Line Width( 2 )} ),
        DispatchSeg( Box Plot Seg( 18 ), {Box Type( "Outlier" ), Line Color( "Red" ), Line Width( 2 )} ),
        DispatchSeg( Box Plot Seg( 19 ), {Box Type( "Outlier" ), Line Color( "Red" ), Line Width( 2 )} ),
        DispatchSeg( Box Plot Seg( 20 ), {Box Type( "Outlier" ), Line Color( "Red" ), Line Width( 2 )} ),
        DispatchSeg( Box Plot Seg( 21 ), {Box Type( "Outlier" ), Line Color( "Red" ), Line Width( 2 )} ),
        DispatchSeg( Box Plot Seg( 22 ), {Box Type( "Outlier" ), Line Color( "Red" ), Line Width( 2 )} ),
        DispatchSeg( Box Plot Seg( 23 ), {Box Type( "Outlier" ), Line Color( "Red" ), Line Width( 2 )} ),
        DispatchSeg( Box Plot Seg( 24 ), {Box Type( "Outlier" ), Line Color( "Red" ), Line Width( 2 )} ),
        DispatchSeg( Box Plot Seg( 25 ), {Box Type( "Outlier" ), Line Color( "Red" ), Line Width( 2 )} )}
       ),
       Dispatch( {__VarChart__}, "", NomAxisBox, {Set Width( 573 ), Set Height( 21 )} ),
       Dispatch( {__VarChart__}, "Varability Std Chart", FrameBox, {Frame Size( 559, 180 )} )
      )
     )
    ),
   Expr( __DataList__ ), Parse( ":" || Char( DataList_Log[i] ) ),
   Expr( __VarChart__ ), "Variability Chart for " || Char( DataList_Log[i] )
  )
 )
);