Titolo della finestra di visualizzazione di adattamento ortogonale imprevedibileSto facendo una serie di grafici di Orthogonal Fit usando uno script jsl e ho bisogno di inviare un messaggio a ciascuno di essi (voglio che l'impostazione predefinita chiuda la finestra dei risultati dell'analisi). Tuttavia, il titolo di quella casella è imprevedibile perché contiene il valore del rapporto, il cui formato varia a seconda dell'ordine di grandezza del valore. Alcuni esempi sono mostrati di seguito. Rapporto di adattamento ortogonale = 0,000 Rapporto di adattamento ortogonale = 0,123 Rapporto di adattamento ortogonale = 1,234 Rapporto di adattamento ortogonale = 12,34 Rapporto di adattamento ortogonale = 1234 Rapporto di adattamento ortogonale = 12345 Rapporto di adattamento ortogonale = 1e + 6 Come scrivere un codice per affrontare una di queste potenziali eventualità ? La soluzione facile sarebbe se potessi chiudere tutte le caselle di analisi che iniziano con Orthogonal.Ri: Titolo finestra di visualizzazione adattamento ortogonale imprevedibileModificare l'ultima riga per cercare le caselle del profilo con l'helpkey corretto:
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 );Ri: Titolo finestra di visualizzazione adattamento ortogonale imprevedibileGrazie. Quello che in realtà voglio fare è illustrato di seguito. L'ultima riga non funzionerà, ma l'idea è di chiudere la casella di analisi, non i grafici reali. Normalmente posso farlo per la maggior parte delle caselle di analisi (Fit Line, ecc.) Ma Orthogonal Fit ha un problema speciale perché un risultato dell'analisi è effettivamente incorporato nel nome della scatola.
colpetto
Nomi predefiniti qui (1);
// apri tabella dati
dt = Open ("$ SAMPLE_DATA / Big Class.jmp");
// crea il contenitore per i riferimenti della piattaforma
platform = List ();
dt << Nuova colonna ("agenum", formula (Num (: age)));
// piattaforma di lancio
p = dt << Fit Group (
bivariate (
Y (: peso),
X (: altezza),
Adatta ortogonale (varianze univariate, {colore linea ({213, 72, 87})})
),
bivariate (
Y (: peso),
X (: agenum),
Adatta ortogonale (varianze univariate, {colore linea ({213, 72, 87})})
),
<< {Disponi in righe (2)}
);
// salva il riferimento nell'elenco
Insert Into (platform, p);
Aspetta (1);
// invia un messaggio a tutte le piattaforme
platform << Dispatch ({}, "Orthogonal Fit Ratio =?", OutlineBox, {Close (1)});
Ri: Titolo finestra di visualizzazione adattamento ortogonale imprevedibileÈ anche possibile salvare il riferimento a Windows quando si avvia e quindi inviare un messaggio a loro. Se si memorizzano i riferimenti in un elenco, l'elenco distribuirà il messaggio a tutti gli elementi. Vedi questo esempio:
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;
Ri: Titolo finestra di visualizzazione adattamento ortogonale imprevedibileVorrei usare XPath, forse questo ti farà iniziare:
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