cancel
Showing results for 
Show  only  | Search instead for 
Did you mean: 
Check out the JMP® Marketplace featured Capability Explorer add-in
Choose Language Hide Translation Bar
pmroz
Super User

Remove Data Filter and Range Plot Text from Graph

I have a series of graphs that look like this:

pmroz_0-1618842902187.png

I'm using a local data filter to display several graphs in one window.  

How can I remove the text at the bottom of the graph?  I've looked through the tree structure but can't find this text.

The error bars are constructed by using Summary Statistic: Median and Error Bars: Range.

3 REPLIES 3
Thierry_S
Super User

Re: Remove Data Filter and Range Plot Text from Graph

Hi,
As far as I can tell, there is no specific structure that specifically captures the Filter information at the bottom of the GB plots. However, I wonder if using the opposite approach of only capturing the GraphBuilderBox (exact id of this element needs to be defined based on the structure of the GB plots) that does not contain the offending text could be meeting your goal.
Just a thought.
Best,
TS
Thierry R. Sornasse
pmroz
Super User

Re: Remove Data Filter and Range Plot Text from Graph

I figured it out.  If I click on the text to be removed in the graph, it gets highlighted in the tree structure.  Then it was a matter of removing the text boxes like this:

fp_win[textbox(35)] << delete box();
fp_win[textbox(28)] << delete box();
fp_win[textbox(21)] << delete box();
fp_win[textbox(14)] << delete box();
fp_win[textbox(7)]  << delete box();

fp_win points to the new window() containing the graphs.

ih
Super User (Alumni) ih
Super User (Alumni)

Re: Remove Data Filter and Range Plot Text from Graph

Another option might be to search for the text box(es):

(fp_win<< XPath("//TextBox[contains(text(),'Where')]")) << delete box();

Or, in an example:

Names default to here(1);

dt = Open("$Sample_data/iris.jmp");

gb = dt << Graph Builder(
	Size( 534, 456 ),
	Show Control Panel( 0 ),
	Variables( X( :Sepal length ), Y( :Species ) ),
	Elements( Line( X, Y, Legend( 6 ), Error Interval( "Range" ) ) ),
	Local Data Filter(
		Add Filter(
			columns( :Petal length ),
			Where( :Petal length >= 1 & :Petal length <= 6.4083 )
		)
	),
	SendToReport(
		Dispatch( {}, "Graph Builder", FrameBox, {Reference Line Order( 3 )} )
	)
);

(gb << XPath("//TextBox[contains(text(),'Where')]")) << delete box();