252365_de-DE

liliconcom

Betreff: Um Variabilitätsdiagramme basierend auf verfügbaren Y-Variablen zu generieren und diese in PNG-Bildern zu speichern

Ich habe Ihren Code geändert.  Ich habe Ihren Code nicht getestet, aber ich glaube, dass er funktionieren wird.  Ich habe es nicht getestet.

dt = Open( "D:\My Drive\Program.jmp" );

// Find the Y Columns
numericColNamesList = dt << get column names( string, numeric );

For( i = N Items( numericColNamesList ), i >= 1, i--,
 If( Not( Is Missing( Num( Word( 1, numericColNamesList[i], ":" ) ) ) == 0 & Word( 2, numericColNamesList[i], ":" ) != "" ),
  numericColNamesList = Remove( numericColNamesList, i, 1 )
 )
);


// With varying Y columns and fixed X columns

For( i = 2, i <= N Items( numericColNamesList ), i++, 

 obj = dt << Variability Chart(
  Y( ::Column( numericColNamesList[i] ) ),
  X( :code, :lot, :Label, :wafer ),
  Analysis Type( "Choose best analysis (EMS REML Bayesian)" ),
  Connect Cell Means( 1 ),
  Std Dev Chart( 0 ),
  Automatic Recalc( 1 ),
  SendToReport(
   Dispatch(
    {"Variability Chart for numericColNamesList[i]"},
    "Variability Chart",
    FrameBox,
    {Marker Size( 6 ), Row Legend(
     Label,
     Color( 1 ),
     Color Theme( "JMP Default" ),
     Marker( 0 ),
     Marker Theme( "" ),
     Continuous Scale( 0 ),
     Reverse Scale( 0 ),
     Excluded Rows( 0 )
    )}
   )
  )
 );
 fName = Report( obj )[Outline Box( 1 )] << Get Title;
 Report( obj )[Outline Box( 1 )] << Save Picture( "$TEMP/myPics/" || fName || ".png", "PNG", append );
);

Betreff: Um Variabilitätsdiagramme basierend auf verfügbaren Y-Variablen zu generieren und diese in PNG-Bildern zu speichern

Vielen Dank Jim. 

Ich habe den Code ausprobiert, aber jetzt sind mehrere Fenster des Var-Diagramms angezeigt worden, aber keines davon wurde als PNG auf dem angegebenen Laufwerk gespeichert.  Vielleicht habe ich etwas in der Nähe des Segments "Bild speichern" verpasst.  

Betreff: Um Variabilitätsdiagramme basierend auf verfügbaren Y-Variablen zu generieren und diese in PNG-Bildern zu speichernHallo,

Ich habe die Ursache dafür gefunden. Das Skript kann jetzt ausgeführt werden.
Bei Variablen mit "/" im Namen (Beispiel A_B / Tox / Cap) fordert das Skript jedoch einen Fehler auf und kann nicht fortfahren.

Report (obj) << Bild speichern ("$ TEMP / myPics /" || colList [i] || ".png", PNG);

Liegt es an colList [i]?

So generieren Sie Variabilitätsdiagramme basierend auf verfügbaren Y-Variablen und speichern sie in PNG-Bildern

Hallo,

 

Ich versuche, einige Codes zu skripten, die mir helfen, einige Variabilitätsdiagramme basierend auf den verfügbaren Spaltennamen automatisch zu generieren und unter zu speichern Individuell PNG-Bilder, damit ich die Bilder mit meinem Powerpoint verknüpfen kann.

 

Ich bin mir aber nicht sicher, warum das "obj" während des Debugs immer undefiniert war. 

 

Möchte hierzu einen Rat einholen. Vielen Dank.

 

- Ann

 

dt = Open( "D:\My Drive\Program.jmp" );

// Find the Y Columns
numericColNamesList = dt << get column names( string, numeric );

For( i = N Items( numericColNamesList ), i >= 1, i--,
 If(
  Not(
   Is Missing( Num( Word( 1, numericColNamesList[i], ":" ) ) ) == 0 &
   Word( 2, numericColNamesList[i], ":" ) != ""
  ),
  numericColNamesList = Remove( numericColNamesList, i, 1 )
 )
);


// With varying Y columns and fixed X columns

For( i = 2, i <= N Items( numericColNamesList ), i++, 

 obj = dt << Variability Chart(
  Y( ::Column( numericColNamesList[i] ) ),
  X( :code, :lot, :Label, :wafer ),
  Analysis Type( "Choose best analysis (EMS REML Bayesian)" ),
  Connect Cell Means( 1 ),
  Std Dev Chart( 0 ),
  Automatic Recalc( 1 ),
  SendToReport(
   Dispatch(
    {"Variability Chart for numericColNamesList[i]"},
    "Variability Chart",
    FrameBox,
    {Marker Size( 6 ), Row Legend(
     Label,
     Color( 1 ),
     Color Theme( "JMP Default" ),
     Marker( 0 ),
     Marker Theme( "" ),
     Continuous Scale( 0 ),
     Reverse Scale( 0 ),
     Excluded Rows( 0 )
    )}
   )
  )
 )
);

obj = List( obj[i] );
For( i = 1, i <= N Items( obj ), i++,
 fName = Report( obj )[Outline Box( 1 )] << Get Title;
 Report( obj )[Outline Box( 1 )] << Save Picture( "$TEMP/myPics/" || fName || ".png", "PNG" );
 Report( obj )[Outline Box( 1 )] << Save Picture( "$TEMP/myPics/" || fName || ".png", "PNG", append );
);

 

Skripting