Overlay graph pics onto other graph picsFolks,
What are the ways (or best way) to overlay another graph pic onto another as shown in first attachment? Final objective is to generate multiple plots, arrange them in a window that is saved as a table property. This table property is then run so the final composite picture is able to be copied and pasted to Powerpoint.
The script I have so far almost gets me there (see attached script and 2nd attachment). My current script obviously goes into the Report for each generated graph and a "Get Picture" command is used to populate the Lineup Box. I have tried to treat the Histogram only as an image, and do an "Add Image", but was not able to make it work (// below).
If an Add Image command is the way to go, my additional question is to how to appropriately come up with the "bounds" arguments to position properly (i.e. "get size" of pic window first, etc. ?
Neil
cr = Current Data Table() << Run Script("Cumulative Resistivity");
rpt_cr = Report(cr);
rpt_cr_pic = rpt_cr[PictureBox(1)] << Get Picture;
ds = Current Data Table() << Run Script("Distribution");
rpt_ds = Report(ds);
rpt_ds_pic = rpt_ds[PictureBox(1)] << Get Picture;
//comb = New Image( rpt_ds_pic );
//rpt_cr_pic << Add Image( comb, bounds(left(0), top(500),bottom(0),right(724)));
nw = Eval Expr( New Window("BR",
a = V List Box(
Lineup Box(N Col(2), rpt_cr_pic, rpt_ds_pic ),
)
)
);
Current Data Table() << New Script("RP", nw) ;


Re: Overlay graph pics onto other graph picsWith JMP 16 now, there are options in Graph Builder to 'show' various aspects such as titles, axes, and axis labels. You may be able to easily use JSL to customize to your situation.
Re: Overlay graph pics onto other graph picsFolks,
How do I turn off the X and Y axis so only a box outline shows?
Got this to work almost the way I want. But apparently needs to have the Graph Box in place. I was not able to get any other Display element to work for me. With that being said, axis elements are showing and I need to hide them ("X", "Y", tick marks, etc.). Relevant code attached.
Many thanks.
Neil

cr = Current Data Table() << Run Script("Cumulative Resistivity");
rpt_cr = Report(cr);
rpt_cr_pic = rpt_cr[PictureBox(1)] << Get Picture ;
Print(rpt_cr_pic << Get Size);
cp = Current Data Table() << Run Script("Cumulative Permeability");
rpt_cp = Report(cp);
rpt_cp_pic = rpt_cp[PictureBox(1)] << Get Picture;
Print(rpt_cp_pic << Get Size);
ds = Current Data Table() << Run Script("Distribution");
rpt_ds = Report(ds);
rpt_ds_pic = rpt_ds[PictureBox(1)] << Get Picture;
g = Graph Box(
FrameSize( 750, 1000 ),
X Scale( 0, 100 ),
Y Scale( 0, 100 ),
<<ADD image=""></ADD>