Ich habe eine numerische Spalte namens Rejects, die auf nominal eingestellt ist. Die meisten Werte sind Null, aber es gibt auch einen Wertebereich von 1 bis N (wobei N je nach Datensatz variabel ist). Ich verwende diese, um eine Karte der Ablehnungsorte zu zeichnen, wobei die Anzahl der Ablehnungen farblich angezeigt wird.
Ich möchte die integrierten chromatischen Farbthemen von JMP nutzen, aber mit einem beliebigen Wert von 0 in Hellgrau angezeigt werden (so dass es leicht zu erkennen ist, wo es Ausschuss gibt). Allerdings kann ich beides nicht.
Ich habe es versucht:
dt:Rejects << Set Property( "Value Colors", Color Theme( "Jet" ) );
dt:Rejects << Set Property( "Value Colors", {0 = 32} );Der zweite Befehl überschreibt jedoch den ersten und setzt das Farbdesign auf die Standardeinstellung zurück. Ich kann dies interaktiv tun, indem ich das Farbthema festlege und dann im Spalteneigenschaftendialog auf die Farbe für 0 klicke, aber ich möchte es skripten.
Ich könnte das standardmäßige kategorische Farbthema in Jet ändern, aber ich möchte mich nicht darauf verlassen, und ich verwende auch nur andere Farbthemen an anderer Stelle in meinen Berichten. Ich möchte die Farben auch nicht fest codieren, da ich die gesamte Farbpalette (blau bis rot) verwenden möchte, unabhängig davon, ob N 5 oder 25 ist.
Vielen Dank für deine Hilfe,
Matthew.
Danke Ian, funktioniert gut!
Grüße,
Matthew.
So etwas vielleicht?
NamesDefaultToHere(1);
// Make a table with defect counts
dt = NewTable("Defects", NewColumn("Rejects", Numeric, Ordinal, Formula(RandomInteger(0, 5))));
dt << addRows(30);
dt << runFormulas;
// Set some default colours . . .
dt:Rejects << Set Property( "Value Colors", Color Theme( "Jet" ) );
// Make a graph
gb = dt << Graph Builder(
Size( 529, 447 ),
Show Control Panel( 0 ),
Variables( X( :Rejects ), Color( :Rejects ) ),
Elements( Bar( X, Legend( 5 ) ) )
);
// Get the default colors
defaultColours = dt:Rejects << getProperty("Value Colors");
// Update the colour for 0 defects
Wait(2);
defaultColours[1] = Expr(0 = 32);
// Renistate updated colours
dt:Rejects << Set Property( "Value Colors", defaultColours);