Subscribe Bookmark RSS Feed

Minimize all Fit data prior to saving graph

senatorx

Community Trekker

Joined:

Jun 12, 2012

Hi, I'm making a bivariate plot with several spline fits.  I want to save only the graph portion to an image file, but not the fit data at the end.  Is there a way to minimize all the fits, or have them populate to a separate window?  When I minimize all the fits then view the script, it creates multiple instances of   Dispatch( {}, "Smoothing Spline Fit", OutlineBox, {Close( 1 )} ), however when re-running the script, it only minimizes the first fit.

Trend = Bivariate(

Y( :Ycol ),

X( :Xcol ),

Fit Where(

  :colName == "fit1",

  Fit Spline( 0.1, Standardized, {Line Color( {213, 72, 87} )} )

),

Fit Where(

  :colName == "fit2",

  Fit Spline( 0.1, Standardized, {Line Color( {57, 177, 67} )} )

),

Fit Where(

  :colName == "fit3",

  Fit Spline( 0.1, Standardized, {Line Color( {64, 111, 223} )} )

),

Fit Where(

  :colName == "fit4",

  Fit Spline( 0.1, Standardized, {Line Color( {207, 121, 38} )} )

),

Fit Where(

  :colName == "fit5",

  Fit Spline( 0.1, Standardized, {Line Color( {33, 189, 145} )} )

),

SendToReport(

  Dispatch( {}, "1", ScaleBox, {Rotated Labels( 1 )} ),

  Dispatch(

   {},

   "Bivar Plot",

   FrameBox,

   {Frame Size( 400, 300 ), Row Legend(

    colName,

    Color( 1 ),

    Color Theme( "JMP Default" ),

    Marker( 1 ),

    Marker Theme( "Standard" ),

    Continuous Scale( 0 ),

    Reverse Scale( 0 ),

    Excluded Rows( 0 )

   )}

  ),

  Dispatch( {}, "Smoothing Spline Fit", OutlineBox, {Close( 1 )} ),

  Dispatch( {}, "Smoothing Spline Fit", OutlineBox, {Close( 1 )} ),

  Dispatch( {}, "Smoothing Spline Fit", OutlineBox, {Close( 1 )} ),

  Dispatch( {}, "Smoothing Spline Fit", OutlineBox, {Close( 1 )} ),

  Dispatch( {}, "Smoothing Spline Fit", OutlineBox, {Close( 1 )} )

)

);

Trend << Save Picture("\\path\file.png", png) ;

4 REPLIES
ms

Super User

Joined:

Jun 23, 2011

There is, at least in JMP 10, a convenient message for outline boxes: << close all like this

dt = Open( "$SAMPLE_DATA/Big Class.jmp" );

splines = dt << Bivariate(

  Y( :weight ),

  X( :height ),

  by( :sex ),

  Fit Spline( 340, Standardized, {Line Color( {208, 64, 86} )} )

);

Report( splines[1] )["Smoothing Spline Fit"] << close all like this;

senatorx

Community Trekker

Joined:

Jun 12, 2012

Ok.  I'm running JMP9.  Any chance there is a more tedious way to accomplish that with JMP9?  I'm guessing there should be some way to give each spline a name or a label that can be individually referenced for closing / minimizing.

thanks.

ms

Super User

Joined:

Jun 23, 2011

The command appears to be supported in JMP 9, but JMP 9 seems to be more picky when it comes to adress display boxes by a string. But using a wildcard (?) seems to work in this case.

Report( splines[1] )["Smoothing Spline Fit?"] << close all like this;

senatorx

Community Trekker

Joined:

Jun 12, 2012

I never got this to work correctly, but I found that I could just do automated formatting on the images afterwards with a powerpoint macro.