Will be fixed in Jmp18:
generate via:
Names Default to Here(1);
dt = Open( "$SAMPLE_DATA/Big Class.jmp" );
mytitle=Jmp version();
:sex << Set Property(
"Value Colors",
{"F" = 43, "M" = 45}
);
dt << Graph Builder(
Size( 390, 386 ),
Show Control Panel( 0 ),
Variables( X( :height ), Y( :sex ), Y( :weight ), Color( :sex ) ),
Elements( Position( 1, 1 ), Points( X, Y, Legend( 12 ) ) ),
Elements(
Position( 1, 2 ),
Points( X, Y, Legend( 13 ) ),
Smoother( X, Y, Legend( 14 ) )
),
SendToReport(
Dispatch( {}, "graph title", TextEditBox, {Set Text( mytitle )} )
)
)