Is this what you are looking for?
Names Default To Here( 1 );
dt =
// Open Data Table: Big Class.jmp
// → Data Table( "Big Class" )
Open( "$SAMPLE_DATA/Big Class.jmp" );
New Window( "Oneway Analysis",
V List Box(
Text Box( " Please Click on the Age" ),
Text Box( " Value to Change the Analysis" ),
Text Box( " " ),
Oneway(
Y( :height ),
X( :sex ),
Means( 1 ),
Mean Diamonds( 1 ),
Local Data Filter( Add Filter( columns( :age ), Display( :age, N Items( 6 ) ) ) )
)
)
);
Jim