Subscribe Bookmark RSS Feed

Journal Graphs with Different Row Legends

robot

Community Trekker

Joined:

Feb 27, 2012

Hi,

I would like to journal an H List Box containing multiple graphs from the same data table, but with different row legends.  What is the best way to do this?  I am using JMP11.  Thanks!

// Example.

dt = Open( Convert File Path( "$Sample_Data" ) || "Big Class.jmp", invisible );

one1 = Platform(

  dt,

  Oneway(

  Y( :height ),

  X( :age ),

  SendToReport( Dispatch( {"Normal Quantile Plot"}, "Oneway QuantilePlot", FrameBox, {Row Legend( age, Color( 1 ), Marker( 1 ) )} ) )

  )

);

one1 << Set Title( "Correct color scheme." );

pic1 = one1 << Get Picture;

one2 = Platform(

  dt,

  Oneway(

  Y( :weight ),

  X( :sex ),

  SendToReport( Dispatch( {"Normal Quantile Plot"}, "Oneway QuantilePlot", FrameBox, {Row Legend( sex, Color( 1 ), Marker( 1 ) )} ) )

  )

);

// New Row Legend on one2 will change color scheme on one1.

one1 << Set Title( "Incorrect color scheme." );

out1 = Outline Box( "Big Class H List Box",

  H List Box( pic1, V List Box( one1, Text Box( "Keep original row legend colors as on left, and keep graph interactive as on right." ) ), one2 )

);

out1 << Journal;

Close( dt, No Save );