Cómo extraer sólo el problema > |t| del informe de prueba?Probablemente sea una pregunta muy simple, pero ¿existe una manera sencilla de extraer solo el problema > |t| del informe de prueba? De esta línea se extrae el informe completo:
dt1 = rpt[Cuadro de esquema( "t Test" )][Cuadro de tabla( 1 )];
Guión completo con menor número de X e Y:
// Entrer analyse et column switchers
Oneway(
Y(:Name("553")),
X(:Name("1")),
t Test(1),
Column Switcher(:Name("1"), {:Name("1"), :Name("2"), :Name("3")}),
Column Switcher(:Name("553"), {:Name("553"), :Name("554")}));
//Report
rpt = Current Report();
colswitcher_obj = rpt[ColumnSwitcherCOntextOutlinebox( 1 )] << get scriptable object;
colswitcher_obj2 = rpt[ColumnSwitcherCOntextOutlinebox( 2 )] << get scriptable object;
colswitch_list = colswitcher_obj << get list;
colswitch_list2 = colswitcher_obj2 << get list;
// Loop column switcher 1
For(j = 1, j <= N Items(colswitch_list2), j++,
// Loop column switcher 2
For(k = 1, k <= N Items(colswitch_list), k++,
// Changer le test ici
dt1 = rpt[Outline Box( "t Test" )][Table Box( 1 )];
// Concatenate table
If(j == 1 & k == 1,
main_tb = dt1;
main_tb << Set Name( "All" );
,
Try( main_tb << Concatenate( dt1, Append to First Table ) );
Close( dt1, No Save );
);
colSwitcher_obj << Next;
wait(0);
);
colSwitcher_obj2 << Next;
wait(0);
);Automatización y secuencias de comandosRe: Cómo extraer sólo el problema > |t| del informe de prueba?Puede que este no sea un método muy sólido, pero da una posible idea.
Names Default To Here(1);
dt = Open("$SAMPLE_DATA/Big Class.jmp");
ow = dt << Oneway(
Y(:height),
X(:sex),
t Test(1),
);
tb = Report(ow)[OutlineBox("t Test"), Table Box(1)];
vals = tb[ColStackBox(2), NumberColBox(2)] << get;
prob = vals[1];
Por lo general, una opción bastante buena es convertir el cuadro de la tabla en una tabla de datos usando << Convertir en tabla de datos y luego extraer el valor de allí. Una vez que tengas el valor, recuerda cerrar la tabla.
Names Default To Here(1);
dt = Open("$SAMPLE_DATA/Big Class.jmp");
ow = dt << Oneway(
Y(:height),
X(:sex),
t Test(1),
);
dt_ttest = Report(ow)[OutlineBox("t Test"), Table Box(1)] << Make Into Data Table(Invisible(1));
val = dt_ttest[3, 6];
Close(dt_ttest, no save);
Ambos pueden hacerse más robustos comprobando dónde Prob > |t| es.