Names Default To Here( 1 );
dt = Open( "$Sample_data/big class.jmp" );
dt:age << Set Name( "Description" );
dt:sex << Set Name( "Platform" );
dt:height << Set Name( "EH" );
dt:Platform[loc(dt:Platform << get values,"M")] = "A";
dt:Platform[loc(dt:Platform << get values,"F")] = "B";
Graph Builder(
Size( 528, 450 ),
Show Control Panel( 0 ),
Variables( X( :Description ), Y( :EH ), Overlay( :Platform ) ),
Elements(
Line( X, Y, Legend( 9 ), Summary Statistic( "Min" ) ),
Line( X, Y, Legend( 10 ), Summary Statistic( "Max" ) )
),
SendToReport(
Dispatch(
{},
"400",
ScaleBox,
{Legend Model(
9,
Properties( 0, {Transparency( 0 )}, Item ID( "A", 1 ) )
), Legend Model(
10,
Base( 0, 0, 0, Item ID( "A", 1 ) ),
Base( 1, 0, 0, Item ID( "B", 1 ) ),
Properties( 1, {Transparency( 0 )}, Item ID( "B", 1 ) )
)}
),
Dispatch(
{},
"400",
LegendBox,
{Legend Position( {9, [-1, 0], 10, [1, -1]} )}
)
)
);
dtSplit = dt << Split(
Split By( :Platform ),
Split( :EH ),
Group( :name, :Description, :weight ),
Sort by Column Property
);
dtSplit << Graph Builder(
Size( 528, 450 ),
Show Control Panel( 0 ),
Variables( X( :Description ), Y( :A ), Y( :B, Position( 1 ) ) ),
Elements(
Line( X, Y( 2 ), Legend( 4 ), Summary Statistic( "Min" ) ),
Line( X, Y( 1 ), Legend( 5 ), Summary Statistic( "Max" ) )
)
);