49223_fr-FR

liliconcom

Titre de la fenêtre d'affichage de l'ajustement orthogonal imprévisibleJe suis en train de faire une série de tracés d'ajustement orthogonal à l'aide d'un script jsl et je dois envoyer un message à chacun d'eux (je veux que la valeur par défaut ferme le champ des résultats de l'analyse). Toutefois, le titre de cette zone est imprévisible, car il contient la valeur du rapport, dont le format varie en fonction de l'ordre de grandeur de la valeur. Quelques exemples sont présentés ci-dessous. Ratio d'ajustement orthogonal = 0,000 Ratio d'ajustement orthogonal = 0,123 Ratio d'ajustement orthogonal = 1,234 Ratio d'ajustement orthogonal = 12,34 Ratio d'ajustement orthogonal = 1234 Ratio d'ajustement orthogonal = 12345 Ratio d'ajustement orthogonal = 1e + 6 ? La solution la plus simple serait de fermer toutes les boîtes d’analyse commençant par Orthogonal.Titre de la fenêtre d'affichage de l'ajustement orthogonal imprévisible

Modifiez la dernière ligne pour rechercher les zones de contour avec la bonne clé helpKey:

 

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 );

Titre de la fenêtre d'affichage de l'ajustement orthogonal imprévisibleMerci. Ce que je veux réellement faire est illustré ci-dessous. La dernière ligne ne fonctionnera pas, mais l’idée est de fermer la zone d’analyse, pas les tracés réels. Je peux normalement le faire pour la plupart des boîtes d’analyses (Fit Line, etc.), mais Orthogonal Fit pose un problème particulier, car le résultat de l’analyse est en fait incorporé dans le nom de la boîte.

Tapoter


Noms par défaut ici (1);

// table de données ouverte
dt = Open ("$ SAMPLE_DATA / Big Class.jmp");

// crée un conteneur pour les références de plate-forme
plate-forme = liste ();

dt << Nouvelle colonne ("agenum", formule (Num (: age)));

// plateforme de lancement
p = dt << Groupe d'ajustement (
Bivarié (
Y (: poids),
X (: hauteur),
Ajuster orthogonal (variances univariées, {couleur de trait ({213, 72, 87})})
),
Bivarié (
Y (: poids),
X (: agenum),
Ajuster orthogonal (variances univariées, {couleur de trait ({213, 72, 87})})
),
<< {Disposer en rangées (2)}
)

// enregistrer la référence dans la liste
Insérer dans (plate-forme, p);
Attendre (1);

// envoyer un message à toutes les plateformes

platform << Dispatch ({}, "Ratio d'ajustement orthogonal =?", OutlineBox, {Close (1)});


Titre de la fenêtre d'affichage de l'ajustement orthogonal imprévisible

Vous pouvez également enregistrer la référence aux fenêtres lors de leur lancement, puis leur envoyer un message. Si vous stockez les références dans une liste, celle-ci distribue le message à tous les éléments. Voir cet exemple:

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;

Titre de la fenêtre d'affichage de l'ajustement orthogonal imprévisible

Je voudrais utiliser XPath, peut-être que cela vous aidera à démarrer:

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