612111_fr-FR

liliconcom

JSL pour générer une boîte à moustaches et enregistrer l'image

Dans "44322.jmp" il y a 28 FAI#, je souhaite modifier le script pour enregistrer 28 images comme "44322 - Graph Builder.jpg". Je sais que les ":FAI_1.1&:FAI_1.2&:FAI_1.3" suivants doivent être modifiés, mais je ne sais pas quoi changer.

Variables(
	X( :FAI_1.1, Combine( "Parallel Merged" ) ),
	X( :FAI_1.2, Position( 1 ), Combine( "Parallel Merged" ) ),
	X( :FAI_1.3, Position( 1 ), Combine( "Parallel Merged" ) ),
	Group X( Phase ),
	Color( Phase )
),

Automatisation et scriptsOrganisation du contenuAccès aux donnéesMélange et nettoyage des donnéesPersonnalisation de massePartager et communiquer les résultatsles fenêtresRe : JSL pour générer une boîte à moustaches et enregistrer une image

Comment ces noms de colonne doivent-ils changer ? Une image pour chaque FAI_X (où X est le nombre qui peut être suivi de .Y) ?

Re : JSL pour générer une boîte à moustaches et enregistrer une image

Voici une modification du script qui gère les 28 FAI trouvés dans les données.Il ajuste également le graphique pour compenser le nombre différent de colonnes trouvées pour chaque FAI.

Names Default To Here( 1 );
dt = Data Table( "44322.jmp" );
New Window( "Box Plot Compaire", 

 Excluded( Row State( 1 ) ) = 1;
 Excluded( Row State( 2 ) ) = 1;
 Excluded( Row State( 3 ) ) = 1;
 For( i = 2, i < N Col() + 1, i++, 
// determine the number of columns for the current FAI
  nFAI = 1;
  FAI = Word( 1, Column Name( i ), "." );
  Try( If( Word( 1, Column Name( i + 1 ), "." ) == FAI, nFAI = 2 ) );
  Try( If( Word( 1, Column Name( i + 2 ), "." ) == FAI, nFAI = 3 ) );
  If(
   nFAI == 3,
    mybox = Graph Builder(
     Size( 568, 458 ),
     Show Control Panel( 0 ),
     Variables(
      X( As Column( Column Name( i ) ), Position( 1 ), Combine( "Parallel Merged" ) ),
      X( As Column( Column Name( i + 1 ) ), Position( 1 ), Combine( "Parallel Merged" ) ),
      X( As Column( Column Name( i + 2 ) ), Position( 1 ), Combine( "Parallel Merged" ) ),
      Group X( Phase ),
      Color( Phase )
     ),
     Elements(
      Box Plot( X( 1 ), X( 2 ), X( 3 ), Legend( 9 ) ),
      Points( X( 1 ), X( 2 ), X( 3 ), Legend( 10 ) ),
      Caption Box( X( 1 ), X( 2 ), X( 3 ), Legend( 11 ) )
     ),
     SendToReport(
      Dispatch(
       {},
       "",
       ScaleBox,
       {Min(
        Col Min( Column( i ) ) - (Col Max( Column( i ) ) - Col Min( Column( i ) )) /
        100
       ), Max(
        Col Max( Column( i ) ) + (Col Max( Column( i ) ) - Col Min( Column( i ) )) /
        100
       ), /*Inc( (col max(column(i)) - col min(column(i)))/100 ),*/ Minor Ticks( 1 ),
       Add Ref Line(
        Column( i )[1],
        "Solid",
        "Dark Red",
        Eval Insert( "LSL ^column(i)[1]^" ),
        1
       ), Add Ref Line(
        Column( i )[2],
        "Solid",
        "Dark Red",
        Eval Insert( "USL ^column(i)[2]^" ),
        1
       ), Add Ref Line(
        Column( i )[3],
        "Solid",
        "Dark Blue",
        Eval Insert( "Target ^column(i)[3]^" ),
        1
       )}
      )
     )
    );,
   nFAI == 2,
    mybox = Graph Builder(
     Size( 568, 458 ),
     Show Control Panel( 0 ),
     Variables(
      X( As Column( Column Name( i ) ), Position( 1 ), Combine( "Parallel Merged" ) ),
      X( As Column( Column Name( i + 1 ) ), Position( 1 ), Combine( "Parallel Merged" ) ),
      Group X( Phase ),
      Color( Phase )
     ),
     Elements(
      Box Plot( X( 1 ), X( 2 ), X( 3 ), Legend( 9 ) ),
      Points( X( 1 ), X( 2 ), X( 3 ), Legend( 10 ) ),
      Caption Box( X( 1 ), X( 2 ), X( 3 ), Legend( 11 ) )
     ),
     SendToReport(
      Dispatch(
       {},
       "",
       ScaleBox,
       {Min(
        Col Min( Column( i ) ) - (Col Max( Column( i ) ) - Col Min( Column( i ) )) /
        100
       ), Max(
        Col Max( Column( i ) ) + (Col Max( Column( i ) ) - Col Min( Column( i ) )) /
        100
       ), /*Inc( (col max(column(i)) - col min(column(i)))/100 ),*/ Minor Ticks( 1 ),
       Add Ref Line(
        Column( i )[1],
        "Solid",
        "Dark Red",
        Eval Insert( "LSL ^column(i)[1]^" ),
        1
       ), Add Ref Line(
        Column( i )[2],
        "Solid",
        "Dark Red",
        Eval Insert( "USL ^column(i)[2]^" ),
        1
       ), Add Ref Line(
        Column( i )[3],
        "Solid",
        "Dark Blue",
        Eval Insert( "Target ^column(i)[3]^" ),
        1
       )}
      )
     )
    );,
   mybox = Graph Builder(
    Size( 568, 458 ),
    Show Control Panel( 0 ),
    Variables(
     X( As Column( Column Name( i ) ), Position( 1 ), Combine( "Parallel Merged" ) ),
     Group X( Phase ),
     Color( Phase )
    ),
    Elements(
     Box Plot( X( 1 ), X( 2 ), X( 3 ), Legend( 9 ) ),
     Points( X( 1 ), X( 2 ), X( 3 ), Legend( 10 ) ),
     Caption Box( X( 1 ), X( 2 ), X( 3 ), Legend( 11 ) )
    ),
    SendToReport(
     Dispatch(
      {},
      "",
      ScaleBox,
      {Min(
       Col Min( Column( i ) ) - (Col Max( Column( i ) ) - Col Min( Column( i ) )) / 100
      ), Max(
       Col Max( Column( i ) ) + (Col Max( Column( i ) ) - Col Min( Column( i ) )) / 100
      ), /*Inc( (col max(column(i)) - col min(column(i)))/100 ),*/ Minor Ticks( 1 ),
      Add Ref Line(
       Column( i )[1],
       "Solid",
       "Dark Red",
       Eval Insert( "LSL ^column(i)[1]^" ),
       1
      ), Add Ref Line(
       Column( i )[2],
       "Solid",
       "Dark Red",
       Eval Insert( "USL ^column(i)[2]^" ),
       1
      ), Add Ref Line(
       Column( i )[3],
       "Solid",
       "Dark Blue",
       Eval Insert( "Target ^column(i)[3]^" ),
       1
      )}
     )
    )
   );
  ); 
 
  Myboxplot = mybox << report;
  Myboxplot << save picture( FAI || ".emf", emf );
 
 // Increase variable i if nFAI is greater than 1 
 i=i+nFAI-1;
 );

);

Re : JSL pour générer une boîte à moustaches et enregistrer une image

Comme suit, " Min(……) " peut utiliser " :: " pour échantillonner ? J'ai écrit " Min( Col Min( Colonne( je :: je + 12 ))); " & " Min( Col Min( Colonne( je ) :: Col Min( Colonne( je + 12 ))); "mais c'est une erreur.

 

Pour( je = 2, je < N Col() + 1, je++,

……

Min(Col Min( Colonne( i )), Col Min( Colonne( i + 1 )), Col Min( Colonne( i + 2 )), Col Min( Colonne( i + 3 )), Col Min( Colonne( i + 2 )), Col Min( Colonne( i + 2 )) + 4 )), Col Min( Colonne( i + 5 )), Col Min( Colonne( i + 6 )), Col Min( Colonne( i + 7 )), Col Min( Colonne( i + 8 )), Col Min( Colonne( i + 9 )), Col Min( Colonne( i + 10 )), Col Min( Colonne( i + 11 )), Col Min( Colonne( i + 12 )));

……

);