jsl colorise le profileur et affiche les données dans les tracés marginauxSalut,
Quelqu'un peut-il me dire comment activer les fonctions "Colorize Profiler" (Importance variable) et "Afficher les données" (tracé de modèle marginal) avec JSL?
Après un script de test où je peux activer la coloration et les données à la main, mais pas via JSL.
Names Default To Here( 1 );
dt = Open( "$SAMPLE_DATA/Tiretread.jmp" );
Profiler(
Y( :Pred Formula ABRASION, :Pred Formula MODULUS, :Pred Formula ELONG, :Pred Formula HARDNESS ),
Expand,
Dependent Resampled Inputs( 1 ),
Link Profilers( 1 )
);
Re: jsl colorise le profileur et affiche les données dans les tracés marginauxJe vous remercie! Ça marche. Mais mon rapport est un peu danamique (un à six ans). A cause de cela, j'ai modifié votre script avec une fonction "Pour" et "Essayer".
Names Default To Here( 1 );
// Open Tire Tread
dt = Open( "$SAMPLE_DATA/Tiretread.jmp" );
// Use Profiler with predictions
pr = dt << Profiler(Y( :Pred Formula ABRASION, :Pred Formula MODULUS, :Pred Formula HARDNESS ),);
// Assess variable importance
pr << Dependent Resampled Inputs( 1 );
// Get the 'little red triangle' for Variable Importance
lrt = Report(pr)[OutlineBox(3)] << getScriptableObject;
lrt << Colorize Profiler;
// Get the 'little red triangle' for Marginal Plots
For (i = 1, i <= 20, i++,
Try(lrt = Report(pr)[OutlineBox(i)] << getScriptableObject;
lrt << Data;))
Re: jsl colorise le profileur et affiche les données dans les tracés marginauxJe suis sûr qu'il existe un moyen direct de procéder, mais je ne me souviens pas de la syntaxe pour le moment. Voici donc un moyen indirect (les instructions 'Wait' concernent un effet cosmétique, bien sûr):
Names Default To Here( 1 );
// Open Tire Tread
dt = Open( "$SAMPLE_DATA/Tiretread.jmp" );
// Use Profiler with predictions
pr = dt << Profiler(Y( :Pred Formula ABRASION, :Pred Formula MODULUS, :Pred Formula ELONG, :Pred Formula HARDNESS ),);
// Assess variable importance
Wait(2);
pr << Dependent Resampled Inputs( 1 );
// Get the 'little red triangle' for Variable Importance
Wait(2);
lrt = Report(pr)[OutlineBox(3)] << getScriptableObject;
lrt << Colorize Profiler;
// Get the 'little red triangle' for Marginal Plots
Wait(2);
lrt = Report(pr)[OutlineBox(10)] << getScriptableObject;
lrt << Data;