Titel des unvorhersehbaren orthogonalen Fit-AnzeigefenstersIch mache eine Reihe von orthogonalen Fit-Plots mit einem jsl-Skript, und ich muss jedem eine Nachricht senden (ich möchte, dass das Analyseergebnisfeld standardmäßig geschlossen wird). Der Titel dieses Feldes ist jedoch nicht vorhersehbar, da er den Verhältniswert enthält, dessen Format in Abhängigkeit von der Größenordnung des Werts variiert. Einige Beispiele werden unten gezeigt. Orthogonales Anpassungsverhältnis = 0,000 Orthogonales Anpassungsverhältnis = 0,123 Orthogonales Anpassungsverhältnis = 1,234 Orthogonales Anpassungsverhältnis = 12,34 Orthogonales Anpassungsverhältnis = 1234 Orthogonales Anpassungsverhältnis = 12345 Orthogonales Anpassungsverhältnis = 1e + 6 Wie schreibe ich Code, um eine dieser möglichen Fälle zu behandeln ? Die einfache Lösung wäre, wenn ich alle Analyseboxen schließen könnte, die mit Orthogonal beginnen.Betreff: Titel des unvorhersehbaren orthogonalen Fit-AnzeigefenstersÄndern Sie die letzte Zeile, um mit dem richtigen helpKey nach Gliederungsfeldern zu suchen:
Names Default To Here( 1 );
// open data table
dt = Open( "$SAMPLE_DATA/Big Class.jmp" );
// create container for platform references
platform = List();
dt << New Column( "agenum", formula( Num( :age ) ) );
// launch platform
p = dt << Fit Group(
Bivariate( Y( :weight ), X( :height ), Fit Orthogonal( Univariate Variances, {Line Color( {213, 72, 87} )} ) ),
Bivariate( Y( :weight ), X( :agenum ), Fit Orthogonal( Univariate Variances, {Line Color( {213, 72, 87} )} ) ),
<<{Arrange in Rows( 2 )}
);
// save reference in the list
Insert Into( platform, p );
Wait( 1 );
// send message to all platforms
( platform << XPath("//OutlineBox[@helpKey='Bivar Ortho']") ) << Close( 1 );Betreff: Titel des unvorhersehbaren orthogonalen Fit-AnzeigefenstersVielen Dank. Was ich eigentlich machen möchte, ist unten abgebildet. Die letzte Zeile wird nicht funktionieren, aber die Idee ist, die Analysebox zu schließen, nicht die tatsächlichen Diagramme. Normalerweise kann ich dies für die meisten Analyseboxen tun (Fit Line usw.), aber bei der orthogonalen Anpassung besteht ein besonderes Problem, da ein Ergebnis der Analyse tatsächlich im Namen der Box enthalten ist.
Klopfen
Namensvorgabe für Hier (1);
// Datentabelle öffnen
dt = Open ("$ SAMPLE_DATA / Big Class.jmp");
// Container für Plattformreferenzen erstellen
Plattform = Liste ();
dt << Neue Spalte ("agenum", Formel (Num (: age)));
// Plattform starten
p = dt << Fit Group (
Bivariate (
Y (: Gewicht),
X (: Höhe),
Orthogonal anpassen (univariate Varianzen, {Linienfarbe ({213, 72, 87})})
),
Bivariate (
Y (: Gewicht),
X (: agenum),
Orthogonal anpassen (univariate Varianzen, {Linienfarbe ({213, 72, 87})})
),
<< {In Zeilen anordnen (2)}
);
// Referenz in der Liste speichern
Einfügen in (Plattform, p);
Warte (1);
// Nachricht an alle Plattformen senden
Plattform << Versand ({}, "Orthogonal Fit Ratio =?", OutlineBox, {Close (1)});
Betreff: Titel des unvorhersehbaren orthogonalen Fit-AnzeigefenstersSie können den Verweis auf die Fenster auch beim Start speichern und ihnen dann eine Nachricht senden. Wenn Sie die Referenzen in einer Liste speichern, verteilt die Liste die Nachricht an alle Elemente. Siehe dieses Beispiel:
Names Default to Here( 1 );
// open data table
dt = Open( "$SAMPLE_DATA/Big Class.jmp" );
// create container for platform references
platform = List();
// launch first platform
p = dt << Distribution( Y( :weight, :height ) );
// save reference in the list
Insert Into( platform, p );
Wait( 1 );
// launch second platform
p = dt << Bivariate( Y( :weight ), X( :height ), Fit Line );
// save reference in the list
Insert Into( platform, p );
Wait( 1 );
// send message to all platforms
platform << Close Window;
Betreff: Titel des unvorhersehbaren orthogonalen Fit-AnzeigefenstersIch würde XPath verwenden, vielleicht können Sie damit anfangen:
Names default to here( 1);
dt = Open( "$Sample_data/iris.jmp" );
win = New Window( "Bivariate Fits",
dt << Bivariate(
Y( :Sepal length ),
X( :Sepal width ),
Fit Orthogonal( Univariate Variances, {Line Color( {213, 72, 87} )} )
),
dt << Bivariate(
Y( :Petal length ),
X( :Petal width ),
Fit Orthogonal( Univariate Variances, {Line Color( {213, 72, 87} )} )
)
);
( win << XPath("//OutlineBox[@helpKey='Bivar Ortho']") ) << Close( 1 );
( win << XPath("//OutlineBox[@helpKey='Bivar Ortho']") )[1] << Close( 0 );
//Here is how I found the helpKey:
win << Show tree structure