jsl colorear el generador de perfiles y mostrar datos en diagramas de modelos marginalesHola,
¿Alguien puede decirme cómo activar la función "Colorize Profiler" (Importancia variable) y "Mostrar datos" (Diagrama de modelo marginal) con JSL?
Siguiendo un guión de prueba donde puedo activar la coloración y los datos a mano pero no a través de 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 colorize profiler y muestra datos en gráficos de modelos marginales¡Gracias! Funciona. Pero mi informe es un poco danámico (de uno a seis Y). Por eso modifiqué el script con las funciones "For" y "Try".
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 colorize profiler y muestra datos en gráficos de modelos marginalesEstoy seguro de que hay una forma directa de hacerlo, pero no puedo recordar la sintaxis en este momento. Así que aquí hay una forma indirecta (las declaraciones de 'Espera' son para efectos cosméticos, por supuesto):
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;