最近スクリプト言語を使い始めたのですが、編集言語を使って縮小モデルの等価性テストを自動化したいと思っています。しかし、等価性テストの後、スクリプト言語編集を使用してソフトウェアがLeveneの結果に基づいて等価性テストまたは不等分散等価性テストを選択できるようにする方法が不明です。

.
問題をどのようにコード化するかについてのアイデアを与える例を以下に示します。
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" );
);