339053_en-US

liliconcom

two graphs side by side

Hi there are a few similar posts but I have not found exactly what i'm looking for.

I made alpha-diversity plots of two different indices and want to present them side by side (they are different scales) 

using two Y-axes e.g. right and left is confusing. 

So I want to actually make two separate graphs and just display them side by side.

here is output from the phyloseq package in R.

 

I have the data as a table as well and want to recreate the plots in JMP. Any ideas?

Thanks,Ezra

 

GraphicsRe: two graphs side by side

dt = Open( "$sample_data/big class.jmp" );
New Window( "two graphs",
 V List Box(
  H List Box(
   dt << Graph Builder(
    Size( 512, 442 ),
    Show Control Panel( 0 ),
    Show Legend( 0 ),
    Variables( X( :age ), Y( :height ) ),
    Elements( Points( X, Y, Legend( 5 ) ) ),
    SendToReport(
     Dispatch( {}, "Graph Builder", OutlineBox, {Set Title( "" ), Image Export Display( Normal )} ),
     Dispatch( {}, "X title", TextEditBox, {Set Text( "" )} ),
     Dispatch( {}, "Y title", TextEditBox, {Set Text( "" )} ),
     Dispatch( {}, "age", ScaleBox, {Label Row( {Major Grid Line Color( 2 ), Show Major Grid( 1 )} )} ),
     Dispatch( {}, "height", ScaleBox, {Label Row( {Major Grid Line Color( 2 ), Show Major Grid( 1 )} )} ),
     Dispatch( {}, "graph title", TextEditBox, {Set Text( "Height" )} ),
     Dispatch( {}, "Graph Builder", FrameBox, {Background Color( 32 )} )
    )
   );
// identical but for height...weight in three places
   dt << Graph Builder(
    Size( 512, 442 ),
    Show Control Panel( 0 ),
    Show Legend( 0 ),
    Variables( X( :age ), Y( :weight ) ),
    Elements( Points( X, Y, Legend( 5 ) ) ),
    SendToReport(
     Dispatch( {}, "Graph Builder", OutlineBox, {Set Title( "" ), Image Export Display( Normal )} ),
     Dispatch( {}, "X title", TextEditBox, {Set Text( "" )} ),
     Dispatch( {}, "Y title", TextEditBox, {Set Text( "" )} ),
     Dispatch( {}, "age", ScaleBox, {Label Row( {Major Grid Line Color( 2 ), Show Major Grid( 1 )} )} ),
     Dispatch( {}, "weight", ScaleBox, {Label Row( {Major Grid Line Color( 2 ), Show Major Grid( 1 )} )} ),
     Dispatch( {}, "graph title", TextEditBox, {Set Text( "Weight" )} ),
     Dispatch( {}, "Graph Builder", FrameBox, {Background Color( 32 )} )
    )
   );
  ),
  H Center Box( Text Box( "two graphs", <<SETFONTSIZE></SETFONTSIZE>

Re: two graphs side by side

And if you just want 'point and click', you can get close by setting up the graphs the way you want 'by hand', then using 'Window > Combine Windows...':