<meta http-equiv="Content-Type" content="text/html; charset=UTF-8" />// Dieses einfache Skript veranschaulicht eine Methode, um die Achseneinstellungen zuzulassen
// eine Plattform, um dieselben Einstellungen auf einer anderen Plattform zu replizieren
// Grafik.
// Dieses Beispiel platziert die Ausgabe beider Plattformen im selben Fenster, aber
// Sie könnten sich in einem separaten Fenster befinden, wenn dies erwünscht ist
Namen standardmäßig hierher ( 1 ) ;
dt = Offen ( "$SAMPLE_DATA/Große Klasse.jmp" ) ;
// Flagging-Variablen initialisieren
// Diese Variablen enthalten die letzten Einstellungen für die
// Y-Ursprung und Y-Bereich für jedes Diagramm.Wenn einer der
// Die Y-Achse wird geändert, dies wird durch Vergleich mit erkannt
// der letzte Wert, der in diesen Spalten gehalten wird
BivYOUrsprung = 0 ;
BivYRange = 0 ;
OWYUrsprung = 0 ;
OWYRange = 0 ;
// Erstellen Sie eine einfache Anzeigeausgabe
Neues Fenster ( "Eine Achseneinstellung ändert beide Diagramme" ,
H Listenfeld (
AU = dt << Einweg (
Y ( : Höhe ) ,
X ( : Sex ) ,
Bedeutet ( 1 ) ,
Boxplots ( 1 ) ,
Mittlere Diamanten ( 1 ) ,
SendToReport (
Versenden (
{} ,
"Oneway-Plot" ,
FrameBox ,
{ VersandSeg ( Box-Plot-Seg ( 1 ) , { Box-Typ ( "Ausreißer" ) , Linienfarbe ( "Rot" )} ) ,
VersandSeg ( Box-Plot-Seg ( 2 ) , { Box-Typ ( "Ausreißer" ) , Linienfarbe ( "Rot" )} ) ,
Zeilenlegende (
Sex ,
Farbe ( 1 ) ,
Farbthema ( „JMP-Standard“ ) ,
Marker ( 0 ) ,
Markierungsthema ( "" ) ,
Kontinuierliche Skala ( 0 ) ,
Umgekehrte Skala ( 0 ) ,
Ausgeschlossene Zeilen ( 0 )
)}
)
)
) ;
Biv = dt << Bivariat (
Y ( : Höhe ) ,
X ( : Gewicht ) ,
Wo passen ( : Sex == "F" , Linie anpassen ( { Linienfarbe ( { 213 , 72 , 87 } )} ) ) ,
Wo passen ( : Sex == "M" , Linie anpassen ( { Linienfarbe ( { 64 , 111 , 223 } )} ) )
) ;
)
) ;
// Fügen Sie dem OneWay-Diagramm ein Grafikskript hinzu, das die erkennt
// wechselt zu seiner Y-Achse und kopiert die neuen Einstellungen nach
// die Y-Achse des bivariaten Diagramms
Bericht ( AU )[ Rahmenbox ( 1 )] << Grafikskript hinzufügen (
// Auf Änderung prüfen
Wenn ( OWYUrsprung != Y Ursprung () | OWYRange != Y-Bereich () ,
// Wenn eine Änderung gefunden wird, kopieren Sie den neuen Y-Ursprung und Y-Bereich
// zu den Flagging(Holding)-Variablen
OWYUrsprung = Y Ursprung () ;
OWYRange = Y-Bereich () ;
// Kopieren Sie die neuen Achseneinstellungen aus der OneWay-Anzeige
// zur bivariaten Y-Achse
Bericht ( AU )[ Achskasten ( 1 )] << Achseneinstellungen kopieren ;
Bericht ( Biv )[ Achskasten ( 1 )] << Achseneinstellungen einfügen ;
)
) ;
// Fügen Sie das Grafikskript zum bivariaten Diagramm hinzu, um die auszuführen
// gleiche Aktionen, aber aus der Sicht des bivariaten Diagramms.
Bericht ( Biv )[ Rahmen
Kasten ( 1 )] << Grafikskript hinzufügen (
Wenn ( BivYOUrsprung != Y Ursprung () | BivYRange != Y-Bereich () ,
BivYOUrsprung = Y Ursprung () ;
BivYRange = Y-Bereich () ;
Bericht ( Biv )[ Achskasten ( 1 )] << Achseneinstellungen kopieren ;
Bericht ( AU )[ Achskasten ( 1 )] << Achseneinstellungen einfügen ;
)
) ;