Recentemente ho iniziato con i linguaggi di scripting e desidero utilizzare i linguaggi di modifica per automatizzare i test di equivalenza dei modelli ridotti. Tuttavia, dopo il test di equivarianza, non è chiaro come utilizzare la modifica del linguaggio di script per consentire al software di selezionare test di equivalenza di equivarianza o di varianza disuguale in base ai risultati di Levene
.
Ecco un esempio che dovrebbe darti un'idea di come codificare il problema
Names Default To Here( 1 );
dt =
// Open Data Table: Big Class.jmp
// → Data Table( "Big Class" )
Open( "$SAMPLE_DATA/Big Class.jmp" );
ow = Oneway(
Y( :height ),
X( :age ),
Std Dev Lines( 1 ),
Unequal Variances( 1 )
);
// Get the p-value from the Levene results
value = (Report( ow )["Tests that the Variances are Equal",
Number Col Box( "Prob > F" )] << get)[3];
// If the Levene result is less than 0.05
If( value < 0.05,
ow << Equivalence Tests( 1, 0.05, "Unequal Variances", "Equivalence" ),
ow << Equivalence Tests( 1, 0.05, "Pooled Variance", "Equivalence" );
);
