Come estrarre solo il prob > |t| dal rapporto di prova ?Probabilmente una domanda molto semplice, ma esiste un modo semplice per estrarre solo il prob > |t| dal rapporto di prova ? Da questa riga da cui si estrae il rapporto completo:
dt1 = rpt[Riquadro struttura( "t Test" )][Riquadro tabella( 1 )];
Script completo con un numero minore di 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);
);Automazione e scriptingRi: Come estrarre solo il prob > |t| dal rapporto di prova ?Questo potrebbe non essere un metodo molto robusto ma dà una possibile 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];
Di solito un'opzione abbastanza buona è trasformare la casella della tabella in datatable utilizzando << Make Into Data Table e quindi estrarne il valore. Dopo aver ottenuto il valore, ricordati di chiudere la tabella.
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);
Entrambi possono essere resi più robusti controllando dove Prob > |t| È.