nav[aria-label="Primary Navigation"] { padding: 0; & ul { list-style: none; width: 100%; display: flex; flex-direction: row; justify-content: start; align-items: start; gap: 30px; padding: 0; & li { margin: 0; } & ul li { list-style: none; } } }

how to automate the exporting of grouped graphs to .jpg with scripting

robust1972

hi, all

how to automate the exporting of grouped graphs to .jpg with scripting? any helps and hints will be appreciated.

I used the sample data animals to illustrate what I what to do. I plot the data like below. I intend to export each graph/plot with the title part and legend into a single .jpg or whatever format with scripting.

1stly, In my data, I do not know how many plots will be plotted before hand. 2nd thing is that I am not familiar the construct of the plots, and how to handle them one by one in jmp script.

Oneway(

Y( :miles ),

X( :season ),

All Graphs( 0 ),

Plot Quantile by Actual( 1 ),

Line of Fit( 0 ),

X Axis Proportional( 0 ),

Grand Mean( 0 ),

By( :species )

);

Accepted answers

Craige_Hales

Open( "$sample_data/animals.jmp" );

p = Oneway(

Y( :miles ),

X( :season ),

All Graphs( 0 ),

Plot Quantile by Actual( 1 ),

Line of Fit( 0 ),

by( species )

);

// p is a { list } of platforms, 1 per by group value

For( ip = 1, ip <= N Items( p ), ip++,

r = Report( p[ip] ); // get the report

image = r << getpicture;

image << savepicture( "$temp/picture" || Char( ip ) || ".png", "png" );

Open( "$temp/picture" || Char( ip ) || ".png" );

);

and

All comments

Craige_Hales

Open( "$sample_data/animals.jmp" );

p = Oneway(

Y( :miles ),

X( :season ),

All Graphs( 0 ),

Plot Quantile by Actual( 1 ),

Line of Fit( 0 ),

by( species )

);

// p is a { list } of platforms, 1 per by group value

For( ip = 1, ip <= N Items( p ), ip++,

r = Report( p[ip] ); // get the report

image = r << getpicture;

image << savepicture( "$temp/picture" || Char( ip ) || ".png", "png" );

Open( "$temp/picture" || Char( ip ) || ".png" );

);

and

robust1972

Thanks,Craig!

Would it be possible to name the pictures by the title of the plots? As in my data, there are more than 20 combinations and it is hard to find the picture interested without this kind of naming convention.

Craige_Hales

Sure. Note the regex that sanitizes the file name...you might want to adjust it for your needs. As shown, it converts all odd looking character (spaces and equal sign in this case) to underscore. Windows is probably OK with both of those, but they don't help some programs.

Open( "$sample_data/animals.jmp" );

p = Oneway(

Y( :miles ),

X( :season ),

All Graphs( 0 ),

Plot Quantile by Actual( 1 ),

Line of Fit( 0 ),

by( species )

);

// p is a { list } of platforms, 1 per by group value

For( ip = 1, ip <= N Items( p ), ip++,

r = Report( p[ip] ); // get the report

image = r << getpicture; // r *is* the outline

title = (r << gettitle); // use the outline name

// you *might* want to replace problematic characters:

title = Regex( title, "[^a-zA-Z0-9]", "_", GLOBALREPLACE );

path = "$temp/" || title || ".png";

image << savepicture( path, "png" );

Open( path );

);

robust1972

Craig

Thank you again for timely response and solving the problem for me.

Is there a document or a way to check the architecture of the grouped plots, i.e. how to understand the tree structure and hierarchy of it.