Spline for scatterplot matrix graphs

Question

Hello,

Is there a way to calculate a spline for the x-y plots presented in a scatterplot matrix?

(such an option exists for the bivariate plot).

Through JSL would be great if possible.

Thanks

txnelson · Answer

From your question: "Do you think there might be a way of doing the mentioned above through graph builder, with a stacked plot (various y scales on the same X axis)?" it appears that you are not schooled in JSL. When asking most question about JSL and output manipulation, the answer will be "YES". The real question needs to be: "How do you do.............?" I will strongly suggest that you read the JSL Scripting Guide to start your journey of learning JSL. Help==>Books==>Scripting Guide Getting back to your question......it is a bit ambigous. So I am going to guess that what you want is a matrix of outputs from Graph Builder. I am also guessing that you are aware that Graph Builder has the capability of generating a matrix of outputs, but can not change the Y column specifications from graph to graph.....thus your question. Below is my example of one way of doing this. It is a fairly hardwired piece of JSL, but it does show that you can do the kind of thing you were asking about. I will leave the specifics of what you actually need to your code development. (The Community Discussion forum is not a place to go to get someone to write scripts for you) Names default to here( 1 ); dt = Open( "$SAMPLE_DATA/Semiconductor Capability.jmp" ); // Build a window to place the output into nw = New Window( "Plots", vlb = V List Box() ); // I chose to do a 4x4 matrix so the Row loop needs to loop 1-4 For( theRow = 1, theRow <= 4, theRow++, // Create an object to place each rows output into hlb = H List Box(); // Starting in the 5th column grab 4 pairs of columns, 2 at a time for each of the // 4 graphs to be generated for the current row For( theCol = 5 + (theRow - 1) * 8, theCol <= (5 + (theRow - 1) * 8) + 7, theCol = theCol + 2, // Append into the object that is being built for the current row, the graph output hlb << append( // The graph code was generated by first interactively creating the Graph Builder // to the way I wanted it to look, and then saving the script to a script window. // The only change that I made after that, was to change the column reference // for the 2 Y column references, to point to column number from variable "theCol" // taken from the For() loop Graph Builder( Size( 227, 213 ), Show Control Panel( 0 ), Show Legend( 0 ), Variables( X( :lot_id ), Y( Column( theCol ) ), Y( Column( theCol+1 ), Position( 1 ) ) ), Elements( Bar( X, Y( 1 ), Y( 2 ), Legend( 6 ), Bar Style( "Stacked" ) ) ), SendToReport( Dispatch( {}, "Graph Builder", OutlineBox, {Set Title( "" )} ), Dispatch( {}, "lot_id", ScaleBox, {Label Row( Label Orientation( "Vertical" ) )} ), Dispatch( {}, "graph title", TextEditBox, {Set Text( "" )} ) ) ) ) ); // Add the current row's object to the verticle list box in the display window vlb << append( hlb ); );

vsr · Answer

Thanks!!

That should work great.

Do you think there might be a way of doing the mentioned above through graph builder, with a stacked plot (various y scales on the same X axis)?

txnelson · Answer

The scatterplot matrix platform does not have a spline fit, however you may be able to get bivariate close to what you want....

Here is a less than perfect script that does the above...you may find it a good starting point

names default to here(1);
dt=open("$SAMPLE_DATA/Semiconductor Capability.jmp" );

fg=Fit Group(
	Bivariate(
		Y( :NPN1 ),
		X( :NPN1 ),
		Fit Spline( 1000, {Line Color( {212, 73, 88} )} ),
		SendToReport(
			Dispatch( {}, "Bivar Plot", FrameBox, {Frame Size( 119, 111 )} )
		)
	),
	Bivariate(
		Y( :NPN1 ),
		X( :PNP1 ),
		Fit Spline( 1000, {Line Color( {212, 73, 88} )} ),
		SendToReport(
			Dispatch( {}, "Bivar Plot", FrameBox, {Frame Size( 119, 111 )} )
		)
	),
	Bivariate(
		Y( :NPN1 ),
		X( :PNP2 ),
		Fit Spline( 1000, {Line Color( {212, 73, 88} )} ),
		SendToReport(
			Dispatch( {}, "Bivar Plot", FrameBox, {Frame Size( 119, 111 )} )
		)
	),
	Bivariate(
		Y( :NPN1 ),
		X( :NPN2 ),
		Fit Spline( 1000, {Line Color( {212, 73, 88} )} ),
		SendToReport(
			Dispatch( {}, "Bivar Plot", FrameBox, {Frame Size( 119, 111 )} )
		)
	),
	Bivariate(
		Y( :NPN1 ),
		X( :PNP3 ),
		Fit Spline( 1000, {Line Color( {212, 73, 88} )} ),
		SendToReport(
			Dispatch( {}, "Bivar Plot", FrameBox, {Frame Size( 119, 111 )} )
		)
	),
	Bivariate(
		Y( :NPN1 ),
		X( :IVP1 ),
		Fit Spline( 1000, {Line Color( {212, 73, 88} )} ),
		SendToReport(
			Dispatch( {}, "Bivar Plot", FrameBox, {Frame Size( 119, 111 )} )
		)
	),
	Bivariate(
		Y( :NPN1 ),
		X( :PNP4 ),
		Fit Spline( 1000, {Line Color( {212, 73, 88} )} ),
		SendToReport(
			Dispatch( {}, "Bivar Plot", FrameBox, {Frame Size( 119, 111 )} )
		)
	),
	Bivariate(
		Y( :NPN1 ),
		X( :NPN3 ),
		Fit Spline( 1000, {Line Color( {212, 73, 88} )} ),
		SendToReport(
			Dispatch( {}, "Bivar Plot", FrameBox, {Frame Size( 119, 111 )} )
		)
	),
	Bivariate(
		Y( :NPN1 ),
		X( :IVP2 ),
		Fit Spline( 1000, {Line Color( {212, 73, 88} )} ),
		SendToReport(
			Dispatch( {}, "Bivar Plot", FrameBox, {Frame Size( 119, 111 )} )
		)
	),
	Bivariate(
		Y( :NPN1 ),
		X( :NPN4 ),
		Fit Spline( 1000, {Line Color( {212, 73, 88} )} ),
		SendToReport(
			Dispatch( {}, "Bivar Plot", FrameBox, {Frame Size( 119, 111 )} )
		)
	),
	Bivariate(
		Y( :PNP1 ),
		X( :NPN1 ),
		Fit Spline( 1000, {Line Color( {212, 73, 88} )} ),
		SendToReport(
			Dispatch( {}, "Bivar Plot", FrameBox, {Frame Size( 119, 111 )} )
		)
	),
	Bivariate(
		Y( :PNP1 ),
		X( :PNP1 ),
		Fit Spline( 1000, {Line Color( {212, 73, 88} )} ),
		SendToReport(
			Dispatch( {}, "Bivar Plot", FrameBox, {Frame Size( 119, 111 )} )
		)
	),
	Bivariate(
		Y( :PNP1 ),
		X( :PNP2 ),
		Fit Spline( 1000, {Line Color( {212, 73, 88} )} ),
		SendToReport(
			Dispatch( {}, "Bivar Plot", FrameBox, {Frame Size( 119, 111 )} )
		)
	),
	Bivariate(
		Y( :PNP1 ),
		X( :NPN2 ),
		Fit Spline( 1000, {Line Color( {212, 73, 88} )} ),
		SendToReport(
			Dispatch( {}, "Bivar Plot", FrameBox, {Frame Size( 119, 111 )} )
		)
	),
	Bivariate(
		Y( :PNP1 ),
		X( :PNP3 ),
		Fit Spline( 1000, {Line Color( {212, 73, 88} )} ),
		SendToReport(
			Dispatch( {}, "Bivar Plot", FrameBox, {Frame Size( 119, 111 )} )
		)
	),
	Bivariate(
		Y( :PNP1 ),
		X( :IVP1 ),
		Fit Spline( 1000, {Line Color( {212, 73, 88} )} ),
		SendToReport(
			Dispatch( {}, "Bivar Plot", FrameBox, {Frame Size( 119, 111 )} )
		)
	),
	Bivariate(
		Y( :PNP1 ),
		X( :PNP4 ),
		Fit Spline( 1000, {Line Color( {212, 73, 88} )} ),
		SendToReport(
			Dispatch( {}, "Bivar Plot", FrameBox, {Frame Size( 119, 111 )} )
		)
	),
	Bivariate(
		Y( :PNP1 ),
		X( :NPN3 ),
		Fit Spline( 1000, {Line Color( {212, 73, 88} )} ),
		SendToReport(
			Dispatch( {}, "Bivar Plot", FrameBox, {Frame Size( 119, 111 )} )
		)
	),
	Bivariate(
		Y( :PNP1 ),
		X( :IVP2 ),
		Fit Spline( 1000, {Line Color( {212, 73, 88} )} ),
		SendToReport(
			Dispatch( {}, "Bivar Plot", FrameBox, {Frame Size( 119, 111 )} )
		)
	),
	Bivariate(
		Y( :PNP1 ),
		X( :NPN4 ),
		Fit Spline( 1000, {Line Color( {212, 73, 88} )} ),
		SendToReport(
			Dispatch( {}, "Bivar Plot", FrameBox, {Frame Size( 119, 111 )} )
		)
	),
	Bivariate(
		Y( :PNP2 ),
		X( :NPN1 ),
		Fit Spline( 1000, {Line Color( {212, 73, 88} )} ),
		SendToReport(
			Dispatch( {}, "Bivar Plot", FrameBox, {Frame Size( 119, 111 )} )
		)
	),
	Bivariate(
		Y( :PNP2 ),
		X( :PNP1 ),
		Fit Spline( 1000, {Line Color( {212, 73, 88} )} ),
		SendToReport(
			Dispatch( {}, "Bivar Plot", FrameBox, {Frame Size( 119, 111 )} )
		)
	),
	Bivariate(
		Y( :PNP2 ),
		X( :PNP2 ),
		Fit Spline( 1000, {Line Color( {212, 73, 88} )} ),
		SendToReport(
			Dispatch( {}, "Bivar Plot", FrameBox, {Frame Size( 119, 111 )} )
		)
	),
	Bivariate(
		Y( :PNP2 ),
		X( :NPN2 ),
		Fit Spline( 1000, {Line Color( {212, 73, 88} )} ),
		SendToReport(
			Dispatch( {}, "Bivar Plot", FrameBox, {Frame Size( 119, 111 )} )
		)
	),
	Bivariate(
		Y( :PNP2 ),
		X( :PNP3 ),
		Fit Spline( 1000, {Line Color( {212, 73, 88} )} ),
		SendToReport(
			Dispatch( {}, "Bivar Plot", FrameBox, {Frame Size( 119, 111 )} )
		)
	),
	Bivariate(
		Y( :PNP2 ),
		X( :IVP1 ),
		Fit Spline( 1000, {Line Color( {212, 73, 88} )} ),
		SendToReport(
			Dispatch( {}, "Bivar Plot", FrameBox, {Frame Size( 119, 111 )} )
		)
	),
	Bivariate(
		Y( :PNP2 ),
		X( :PNP4 ),
		Fit Spline( 1000, {Line Color( {212, 73, 88} )} ),
		SendToReport(
			Dispatch( {}, "Bivar Plot", FrameBox, {Frame Size( 119, 111 )} )
		)
	),
	Bivariate(
		Y( :PNP2 ),
		X( :NPN3 ),
		Fit Spline( 1000, {Line Color( {212, 73, 88} )} ),
		SendToReport(
			Dispatch( {}, "Bivar Plot", FrameBox, {Frame Size( 119, 111 )} )
		)
	),
	Bivariate(
		Y( :PNP2 ),
		X( :IVP2 ),
		Fit Spline( 1000, {Line Color( {212, 73, 88} )} ),
		SendToReport(
			Dispatch( {}, "Bivar Plot", FrameBox, {Frame Size( 119, 111 )} )
		)
	),
	Bivariate(
		Y( :PNP2 ),
		X( :NPN4 ),
		Fit Spline( 1000, {Line Color( {212, 73, 88} )} ),
		SendToReport(
			Dispatch( {}, "Bivar Plot", FrameBox, {Frame Size( 119, 111 )} )
		)
	),
	Bivariate(
		Y( :NPN2 ),
		X( :NPN1 ),
		Fit Spline( 1000, {Line Color( {212, 73, 88} )} ),
		SendToReport(
			Dispatch( {}, "Bivar Plot", FrameBox, {Frame Size( 119, 111 )} )
		)
	),
	Bivariate(
		Y( :NPN2 ),
		X( :PNP1 ),
		Fit Spline( 1000, {Line Color( {212, 73, 88} )} ),
		SendToReport(
			Dispatch( {}, "Bivar Plot", FrameBox, {Frame Size( 119, 111 )} )
		)
	),
	Bivariate(
		Y( :NPN2 ),
		X( :PNP2 ),
		Fit Spline( 1000, {Line Color( {212, 73, 88} )} ),
		SendToReport(
			Dispatch( {}, "Bivar Plot", FrameBox, {Frame Size( 119, 111 )} )
		)
	),
	Bivariate(
		Y( :NPN2 ),
		X( :NPN2 ),
		Fit Spline( 1000, {Line Color( {212, 73, 88} )} ),
		SendToReport(
			Dispatch( {}, "Bivar Plot", FrameBox, {Frame Size( 119, 111 )} )
		)
	),
	Bivariate(
		Y( :NPN2 ),
		X( :PNP3 ),
		Fit Spline( 1000, {Line Color( {212, 73, 88} )} ),
		SendToReport(
			Dispatch( {}, "Bivar Plot", FrameBox, {Frame Size( 119, 111 )} )
		)
	),
	Bivariate(
		Y( :NPN2 ),
		X( :IVP1 ),
		Fit Spline( 1000, {Line Color( {212, 73, 88} )} ),
		SendToReport(
			Dispatch( {}, "Bivar Plot", FrameBox, {Frame Size( 119, 111 )} )
		)
	),
	Bivariate(
		Y( :NPN2 ),
		X( :PNP4 ),
		Fit Spline( 1000, {Line Color( {212, 73, 88} )} ),
		SendToReport(
			Dispatch( {}, "Bivar Plot", FrameBox, {Frame Size( 119, 111 )} )
		)
	),
	Bivariate(
		Y( :NPN2 ),
		X( :NPN3 ),
		Fit Spline( 1000, {Line Color( {212, 73, 88} )} ),
		SendToReport(
			Dispatch( {}, "Bivar Plot", FrameBox, {Frame Size( 119, 111 )} )
		)
	),
	Bivariate(
		Y( :NPN2 ),
		X( :IVP2 ),
		Fit Spline( 1000, {Line Color( {212, 73, 88} )} ),
		SendToReport(
			Dispatch( {}, "Bivar Plot", FrameBox, {Frame Size( 119, 111 )} )
		)
	),
	Bivariate(
		Y( :NPN2 ),
		X( :NPN4 ),
		Fit Spline( 1000, {Line Color( {212, 73, 88} )} ),
		SendToReport(
			Dispatch( {}, "Bivar Plot", FrameBox, {Frame Size( 119, 111 )} )
		)
	),
	Bivariate(
		Y( :PNP3 ),
		X( :NPN1 ),
		Fit Spline( 1000, {Line Color( {212, 73, 88} )} ),
		SendToReport(
			Dispatch( {}, "Bivar Plot", FrameBox, {Frame Size( 119, 111 )} )
		)
	),
	Bivariate(
		Y( :PNP3 ),
		X( :PNP1 ),
		Fit Spline( 1000, {Line Color( {212, 73, 88} )} ),
		SendToReport(
			Dispatch( {}, "Bivar Plot", FrameBox, {Frame Size( 119, 111 )} )
		)
	),
	Bivariate(
		Y( :PNP3 ),
		X( :PNP2 ),
		Fit Spline( 1000, {Line Color( {212, 73, 88} )} ),
		SendToReport(
			Dispatch( {}, "Bivar Plot", FrameBox, {Frame Size( 119, 111 )} )
		)
	),
	Bivariate(
		Y( :PNP3 ),
		X( :NPN2 ),
		Fit Spline( 1000, {Line Color( {212, 73, 88} )} ),
		SendToReport(
			Dispatch( {}, "Bivar Plot", FrameBox, {Frame Size( 119, 111 )} )
		)
	),
	Bivariate(
		Y( :PNP3 ),
		X( :PNP3 ),
		Fit Spline( 1000, {Line Color( {212, 73, 88} )} ),
		SendToReport(
			Dispatch( {}, "Bivar Plot", FrameBox, {Frame Size( 119, 111 )} )
		)
	),
	Bivariate(
		Y( :PNP3 ),
		X( :IVP1 ),
		Fit Spline( 1000, {Line Color( {212, 73, 88} )} ),
		SendToReport(
			Dispatch( {}, "Bivar Plot", FrameBox, {Frame Size( 119, 111 )} )
		)
	),
	Bivariate(
		Y( :PNP3 ),
		X( :PNP4 ),
		Fit Spline( 1000, {Line Color( {212, 73, 88} )} ),
		SendToReport(
			Dispatch( {}, "Bivar Plot", FrameBox, {Frame Size( 119, 111 )} )
		)
	),
	Bivariate(
		Y( :PNP3 ),
		X( :NPN3 ),
		Fit Spline( 1000, {Line Color( {212, 73, 88} )} ),
		SendToReport(
			Dispatch( {}, "Bivar Plot", FrameBox, {Frame Size( 119, 111 )} )
		)
	),
	Bivariate(
		Y( :PNP3 ),
		X( :IVP2 ),
		Fit Spline( 1000, {Line Color( {212, 73, 88} )} ),
		SendToReport(
			Dispatch( {}, "Bivar Plot", FrameBox, {Frame Size( 119, 111 )} )
		)
	),
	Bivariate(
		Y( :PNP3 ),
		X( :NPN4 ),
		Fit Spline( 1000, {Line Color( {212, 73, 88} )} ),
		SendToReport(
			Dispatch( {}, "Bivar Plot", FrameBox, {Frame Size( 119, 111 )} )
		)
	),
	Bivariate(
		Y( :IVP1 ),
		X( :NPN1 ),
		Fit Spline( 1000, {Line Color( {212, 73, 88} )} ),
		SendToReport(
			Dispatch( {}, "Bivar Plot", FrameBox, {Frame Size( 119, 111 )} )
		)
	),
	Bivariate(
		Y( :IVP1 ),
		X( :PNP1 ),
		Fit Spline( 1000, {Line Color( {212, 73, 88} )} ),
		SendToReport(
			Dispatch( {}, "Bivar Plot", FrameBox, {Frame Size( 119, 111 )} )
		)
	),
	Bivariate(
		Y( :IVP1 ),
		X( :PNP2 ),
		Fit Spline( 1000, {Line Color( {212, 73, 88} )} ),
		SendToReport(
			Dispatch( {}, "Bivar Plot", FrameBox, {Frame Size( 119, 111 )} )
		)
	),
	Bivariate(
		Y( :IVP1 ),
		X( :NPN2 ),
		Fit Spline( 1000, {Line Color( {212, 73, 88} )} ),
		SendToReport(
			Dispatch( {}, "Bivar Plot", FrameBox, {Frame Size( 119, 111 )} )
		)
	),
	Bivariate(
		Y( :IVP1 ),
		X( :PNP3 ),
		Fit Spline( 1000, {Line Color( {212, 73, 88} )} ),
		SendToReport(
			Dispatch( {}, "Bivar Plot", FrameBox, {Frame Size( 119, 111 )} )
		)
	),
	Bivariate(
		Y( :IVP1 ),
		X( :IVP1 ),
		Fit Spline( 1000, {Line Color( {212, 73, 88} )} ),
		SendToReport(
			Dispatch( {}, "Bivar Plot", FrameBox, {Frame Size( 119, 111 )} )
		)
	),
	Bivariate(
		Y( :IVP1 ),
		X( :PNP4 ),
		Fit Spline( 1000, {Line Color( {212, 73, 88} )} ),
		SendToReport(
			Dispatch( {}, "Bivar Plot", FrameBox, {Frame Size( 119, 111 )} )
		)
	),
	Bivariate(
		Y( :IVP1 ),
		X( :NPN3 ),
		Fit Spline( 1000, {Line Color( {212, 73, 88} )} ),
		SendToReport(
			Dispatch( {}, "Bivar Plot", FrameBox, {Frame Size( 119, 111 )} )
		)
	),
	Bivariate(
		Y( :IVP1 ),
		X( :IVP2 ),
		Fit Spline( 1000, {Line Color( {212, 73, 88} )} ),
		SendToReport(
			Dispatch( {}, "Bivar Plot", FrameBox, {Frame Size( 119, 111 )} )
		)
	),
	Bivariate(
		Y( :IVP1 ),
		X( :NPN4 ),
		Fit Spline( 1000, {Line Color( {212, 73, 88} )} ),
		SendToReport(
			Dispatch( {}, "Bivar Plot", FrameBox, {Frame Size( 119, 111 )} )
		)
	),
	Bivariate(
		Y( :PNP4 ),
		X( :NPN1 ),
		Fit Spline( 1000, {Line Color( {212, 73, 88} )} ),
		SendToReport(
			Dispatch( {}, "Bivar Plot", FrameBox, {Frame Size( 119, 111 )} )
		)
	),
	Bivariate(
		Y( :PNP4 ),
		X( :PNP1 ),
		Fit Spline( 1000, {Line Color( {212, 73, 88} )} ),
		SendToReport(
			Dispatch( {}, "Bivar Plot", FrameBox, {Frame Size( 119, 111 )} )
		)
	),
	Bivariate(
		Y( :PNP4 ),
		X( :PNP2 ),
		Fit Spline( 1000, {Line Color( {212, 73, 88} )} ),
		SendToReport(
			Dispatch( {}, "Bivar Plot", FrameBox, {Frame Size( 119, 111 )} )
		)
	),
	Bivariate(
		Y( :PNP4 ),
		X( :NPN2 ),
		Fit Spline( 1000, {Line Color( {212, 73, 88} )} ),
		SendToReport(
			Dispatch( {}, "Bivar Plot", FrameBox, {Frame Size( 119, 111 )} )
		)
	),
	Bivariate(
		Y( :PNP4 ),
		X( :PNP3 ),
		Fit Spline( 1000, {Line Color( {212, 73, 88} )} ),
		SendToReport(
			Dispatch( {}, "Bivar Plot", FrameBox, {Frame Size( 119, 111 )} )
		)
	),
	Bivariate(
		Y( :PNP4 ),
		X( :IVP1 ),
		Fit Spline( 1000, {Line Color( {212, 73, 88} )} ),
		SendToReport(
			Dispatch( {}, "Bivar Plot", FrameBox, {Frame Size( 119, 111 )} )
		)
	),
	Bivariate(
		Y( :PNP4 ),
		X( :PNP4 ),
		Fit Spline( 1000, {Line Color( {212, 73, 88} )} ),
		SendToReport(
			Dispatch( {}, "Bivar Plot", FrameBox, {Frame Size( 119, 111 )} )
		)
	),
	Bivariate(
		Y( :PNP4 ),
		X( :NPN3 ),
		Fit Spline( 1000, {Line Color( {212, 73, 88} )} ),
		SendToReport(
			Dispatch( {}, "Bivar Plot", FrameBox, {Frame Size( 119, 111 )} )
		)
	),
	Bivariate(
		Y( :PNP4 ),
		X( :IVP2 ),
		Fit Spline( 1000, {Line Color( {212, 73, 88} )} ),
		SendToReport(
			Dispatch( {}, "Bivar Plot", FrameBox, {Frame Size( 119, 111 )} )
		)
	),
	Bivariate(
		Y( :PNP4 ),
		X( :NPN4 ),
		Fit Spline( 1000, {Line Color( {212, 73, 88} )} ),
		SendToReport(
			Dispatch( {}, "Bivar Plot", FrameBox, {Frame Size( 119, 111 )} )
		)
	),
	Bivariate(
		Y( :NPN3 ),
		X( :NPN1 ),
		Fit Spline( 1000, {Line Color( {212, 73, 88} )} ),
		SendToReport(
			Dispatch( {}, "Bivar Plot", FrameBox, {Frame Size( 119, 111 )} )
		)
	),
	Bivariate(
		Y( :NPN3 ),
		X( :PNP1 ),
		Fit Spline( 1000, {Line Color( {212, 73, 88} )} ),
		SendToReport(
			Dispatch( {}, "Bivar Plot", FrameBox, {Frame Size( 119, 111 )} )
		)
	),
	Bivariate(
		Y( :NPN3 ),
		X( :PNP2 ),
		Fit Spline( 1000, {Line Color( {212, 73, 88} )} ),
		SendToReport(
			Dispatch( {}, "Bivar Plot", FrameBox, {Frame Size( 119, 111 )} )
		)
	),
	Bivariate(
		Y( :NPN3 ),
		X( :NPN2 ),
		Fit Spline( 1000, {Line Color( {212, 73, 88} )} ),
		SendToReport(
			Dispatch( {}, "Bivar Plot", FrameBox, {Frame Size( 119, 111 )} )
		)
	),
	Bivariate(
		Y( :NPN3 ),
		X( :PNP3 ),
		Fit Spline( 1000, {Line Color( {212, 73, 88} )} ),
		SendToReport(
			Dispatch( {}, "Bivar Plot", FrameBox, {Frame Size( 119, 111 )} )
		)
	),
	Bivariate(
		Y( :NPN3 ),
		X( :IVP1 ),
		Fit Spline( 1000, {Line Color( {212, 73, 88} )} ),
		SendToReport(
			Dispatch( {}, "Bivar Plot", FrameBox, {Frame Size( 119, 111 )} )
		)
	),
	Bivariate(
		Y( :NPN3 ),
		X( :PNP4 ),
		Fit Spline( 1000, {Line Color( {212, 73, 88} )} ),
		SendToReport(
			Dispatch( {}, "Bivar Plot", FrameBox, {Frame Size( 119, 111 )} )
		)
	),
	Bivariate(
		Y( :NPN3 ),
		X( :NPN3 ),
		Fit Spline( 1000, {Line Color( {212, 73, 88} )} ),
		SendToReport(
			Dispatch( {}, "Bivar Plot", FrameBox, {Frame Size( 119, 111 )} )
		)
	),
	Bivariate(
		Y( :NPN3 ),
		X( :IVP2 ),
		Fit Spline( 1000, {Line Color( {212, 73, 88} )} ),
		SendToReport(
			Dispatch( {}, "Bivar Plot", FrameBox, {Frame Size( 119, 111 )} )
		)
	),
	Bivariate(
		Y( :NPN3 ),
		X( :NPN4 ),
		Fit Spline( 1000, {Line Color( {212, 73, 88} )} ),
		SendToReport(
			Dispatch( {}, "Bivar Plot", FrameBox, {Frame Size( 119, 111 )} )
		)
	),
	Bivariate(
		Y( :IVP2 ),
		X( :NPN1 ),
		Fit Spline( 1000, {Line Color( {212, 73, 88} )} ),
		SendToReport(
			Dispatch( {}, "Bivar Plot", FrameBox, {Frame Size( 119, 111 )} )
		)
	),
	Bivariate(
		Y( :IVP2 ),
		X( :PNP1 ),
		Fit Spline( 1000, {Line Color( {212, 73, 88} )} ),
		SendToReport(
			Dispatch( {}, "Bivar Plot", FrameBox, {Frame Size( 119, 111 )} )
		)
	),
	Bivariate(
		Y( :IVP2 ),
		X( :PNP2 ),
		Fit Spline( 1000, {Line Color( {212, 73, 88} )} ),
		SendToReport(
			Dispatch( {}, "Bivar Plot", FrameBox, {Frame Size( 119, 111 )} )
		)
	),
	Bivariate(
		Y( :IVP2 ),
		X( :NPN2 ),
		Fit Spline( 1000, {Line Color( {212, 73, 88} )} ),
		SendToReport(
			Dispatch( {}, "Bivar Plot", FrameBox, {Frame Size( 119, 111 )} )
		)
	),
	Bivariate(
		Y( :IVP2 ),
		X( :PNP3 ),
		Fit Spline( 1000, {Line Color( {212, 73, 88} )} ),
		SendToReport(
			Dispatch( {}, "Bivar Plot", FrameBox, {Frame Size( 119, 111 )} )
		)
	),
	Bivariate(
		Y( :IVP2 ),
		X( :IVP1 ),
		Fit Spline( 1000, {Line Color( {212, 73, 88} )} ),
		SendToReport(
			Dispatch( {}, "Bivar Plot", FrameBox, {Frame Size( 119, 111 )} )
		)
	),
	Bivariate(
		Y( :IVP2 ),
		X( :PNP4 ),
		Fit Spline( 1000, {Line Color( {212, 73, 88} )} ),
		SendToReport(
			Dispatch( {}, "Bivar Plot", FrameBox, {Frame Size( 119, 111 )} )
		)
	),
	Bivariate(
		Y( :IVP2 ),
		X( :NPN3 ),
		Fit Spline( 1000, {Line Color( {212, 73, 88} )} ),
		SendToReport(
			Dispatch( {}, "Bivar Plot", FrameBox, {Frame Size( 119, 111 )} )
		)
	),
	Bivariate(
		Y( :IVP2 ),
		X( :IVP2 ),
		Fit Spline( 1000, {Line Color( {212, 73, 88} )} ),
		SendToReport(
			Dispatch( {}, "Bivar Plot", FrameBox, {Frame Size( 119, 111 )} )
		)
	),
	Bivariate(
		Y( :IVP2 ),
		X( :NPN4 ),
		Fit Spline( 1000, {Line Color( {212, 73, 88} )} ),
		SendToReport(
			Dispatch( {}, "Bivar Plot", FrameBox, {Frame Size( 119, 111 )} )
		)
	),
	Bivariate(
		Y( :NPN4 ),
		X( :NPN1 ),
		Fit Spline( 1000, {Line Color( {212, 73, 88} )} ),
		SendToReport(
			Dispatch( {}, "Bivar Plot", FrameBox, {Frame Size( 119, 111 )} )
		)
	),
	Bivariate(
		Y( :NPN4 ),
		X( :PNP1 ),
		Fit Spline( 1000, {Line Color( {212, 73, 88} )} ),
		SendToReport(
			Dispatch( {}, "Bivar Plot", FrameBox, {Frame Size( 119, 111 )} )
		)
	),
	Bivariate(
		Y( :NPN4 ),
		X( :PNP2 ),
		Fit Spline( 1000, {Line Color( {212, 73, 88} )} ),
		SendToReport(
			Dispatch( {}, "Bivar Plot", FrameBox, {Frame Size( 119, 111 )} )
		)
	),
	Bivariate(
		Y( :NPN4 ),
		X( :NPN2 ),
		Fit Spline( 1000, {Line Color( {212, 73, 88} )} ),
		SendToReport(
			Dispatch( {}, "Bivar Plot", FrameBox, {Frame Size( 119, 111 )} )
		)
	),
	Bivariate(
		Y( :NPN4 ),
		X( :PNP3 ),
		Fit Spline( 1000, {Line Color( {212, 73, 88} )} ),
		SendToReport(
			Dispatch( {}, "Bivar Plot", FrameBox, {Frame Size( 119, 111 )} )
		)
	),
	Bivariate(
		Y( :NPN4 ),
		X( :IVP1 ),
		Fit Spline( 1000, {Line Color( {212, 73, 88} )} ),
		SendToReport(
			Dispatch( {}, "Bivar Plot", FrameBox, {Frame Size( 119, 111 )} )
		)
	),
	Bivariate(
		Y( :NPN4 ),
		X( :PNP4 ),
		Fit Spline( 1000, {Line Color( {212, 73, 88} )} ),
		SendToReport(
			Dispatch( {}, "Bivar Plot", FrameBox, {Frame Size( 119, 111 )} )
		)
	),
	Bivariate(
		Y( :NPN4 ),
		X( :NPN3 ),
		Fit Spline( 1000, {Line Color( {212, 73, 88} )} ),
		SendToReport(
			Dispatch( {}, "Bivar Plot", FrameBox, {Frame Size( 119, 111 )} )
		)
	),
	Bivariate(
		Y( :NPN4 ),
		X( :IVP2 ),
		Fit Spline( 1000, {Line Color( {212, 73, 88} )} ),
		SendToReport(
			Dispatch( {}, "Bivar Plot", FrameBox, {Frame Size( 119, 111 )} )
		)
	),
	Bivariate(
		Y( :NPN4 ),
		X( :NPN4 ),
		Fit Spline( 1000, {Line Color( {212, 73, 88} )} ),
		SendToReport(
			Dispatch( {}, "Bivar Plot", FrameBox, {Frame Size( 119, 111 )} )
		)
	),
	<<{Arrange in Rows( 10 )}
);
For( i = 1, i <= N Items( fg << xPath( "//OutlineBox" ) ), i++,
	if( Contains( Report( fg )[Outline Box( i )] << get title, "Smoothing Spline Fit," ) == 1,
				Report( fg )[Outline Box( i )] << delete
	)
);

For( i = 1, i <= N Items( fg << xPath( "//OutlineBox" ) ), i++,
	If( Contains( Report( fg )[Outline Box( i )] << get title, "Bivariate Fit of" ) == 1,
			Report( fg )[Outline Box( i )] << set title(
			Substr( Report( fg )[Outline Box( i )] << get title, 18 ));
			Report( fg )[Outline Box( i )][Picture Box( 2 )] << delete;
	)
);