Hola,
Tengo un script que incluye un análisis bivariado, sin embargo, me gustaría que solo se muestre la tabla de estadísticas de Ajuste lineal y ocultar el gráfico en sí.
this_dt << Bivariate(
Y( Column(this_dt, this_cols[j])),
X( :"Time (Months)" ),
By( :"Lot Number" ),
Fit Line,
Invisible
)
Como puede ver, incluí la condición Invisible en Bivariado (), pero el gráfico todavía aparece en mi archivo JRN y no estoy seguro de cómo deshacerme de él.
Hola,
Estoy usando la función bivariada solo para generar estadísticas de ajuste lineal para mi gráfico principal. Estoy usando el cuadro de lista V y el cuadro de lista H para generar un gráfico usando el generador de gráficos, y luego bivariado para generar las estadísticas de ajuste lineal para cada número de lote en un cuadro de lista H al lado del gráfico. Cada gráfico del generador de gráficos puede tener hasta 20-30 bivariantes asociados.
Si puedes sugerir una mejor alternativa, ¡me encantaría escucharla! A continuación se muestra un ejemplo de mi secuencia de comandos, lo siento si es confuso, tuve que ocultar rutas de archivos y nombres de columnas específicos.
// Generating Graphs
setup = Function({dt}, {Default Local},
dt = Open ( "file.JMP" );
dt << Select Where(:"column example" == "string example" );
cfg1 = EvalList({dt << Data View, { "col1", "col2", "col3", "coln"}});
EvalList({cfg1});
);
build_graphs = Function({cfgs}, {Default Local},
win = New Window( "window", vlb = V List Box() );
ncfg = NItems(cfgs);
for(i = 1, i <= ncfg, i++,
{this_dt, this_cols} = cfgs[i];
ncols = NItems(this_cols);
for(j = 1, j <= ncols, j++,
vlb << Append(H List Box (
this_dt << Graph Builder(
Show Control Panel( 0 ),
Size( 600, 400),
Variables(
X( :"X axis" ),
Y( Column(this_dt, this_cols[j]) ),
Overlay( :"overlay" )
),
Elements(
Points( X, Y, Legend(12) )
),
SendToReport(
Dispatch(
{},
"",
ScaleBox,
{Format( "Fixed Dec", 10, 0 ), Min(0), Max(50), Inc(6),
Minor Ticks(0)}
)
)
),
this_dt << Bivariate(
Y( Column(this_dt, this_cols[j])),
X( :"X axis" ),
By( :"overlay" ),
Fit Line,
SendToReport( Dispatch( {}, "", ListBox, {Visibility( "Collapse" )} ) )
)
));
)
);
win
);
dt = Open ( "file.JMP" );
cfgs = setup(dt);
Show(cfgs);
win = build_graphs(cfgs);
Show(win);
win << Save Journal("file.jrn", embed data(1));
Gracias por su sugerencia.
También encontré una solución alternativa que puedo escribir dentro de Bivariate().
SendToReport( Dispatch( {}, "", ListBox, {Visibility( "Collapse" )} ) )La línea anterior oculta el cuadro que contiene el gráfico bivariado.
biv = this_dt << Bivariate(
Y( Column(this_dt, this_cols[j])),
X( :"Time (Months)" ),
By( :"Lot Number" ),
Fit Line,
Invisible
);
biv rep = biv << Report;
// one way
biv rep[PictureBox(1)] << Delete;
// other way
biv rep[PictureBox(1)] << Visibility( "Collapse" );