dt = Open( "$SAMPLE_DATA/Big Class.jmp" );

df = dt << Data Filter(

	Add Filter(

		Columns(:年齢, :性別, :Name("身長(インチ)"), :Name("体重(ポンド)") ),

		Where( :性別 == "F" ),

		Where( :Name("身長(インチ)") >= 55 & :Name("身長(インチ)") <= 65 )

	),

	Mode( Select )

);

Wait( 1 ); // デモ用

fav1 = df << Add Favorites( "平均的な身長の女子" );

dt = Open( "$SAMPLE_DATA/Big Class.jmp" );

df = dt << Data Filter(

     Add Filter( Columns( :年齢, :性別 ), Where( :年齢 == 12 ) )

);

txt = df << Get Script;

Show( txt );

dist = Distribution( Automatic Recalc( 1 ), Continuous Distribution( Column( : 人口) ) );

filter = dist << Local Data Filter( Add Filter( Columns( : 地域) ) );

f = Function( {a}, Print( a ) );

rs = filter << Make Filter Change Handler( f );