Hiding 'Where (...)' textboxes in graphics using JSL

BJensen

Hello,

 

Is it possible to hide/remove the line of text with Where(col="x") as shown in the attached image using scripting? I'm new to JMP and haven't quite figured out all the ins and outs yet.

 

I have a set of stacked data where all of the metabolites/count labels (pH, osmo, etc) are in one column and all of the corresponding data is in another. In my case, the where() textbox is irrelevant since I've renamed my figure titles with the same label. I can manually hide the text box temporarily by right clicking when I view the image in JMP, but aren't sure how to hide it using JSL and keep it hidden when I export to html.

 

 

 

Here is an example script for one of my graphics:

Graph Builder(
			Size( 531, 464 ),
			Show Control Panel( 0 ),
			Variables(
				X( :Step ),
				Y( :Name( "BR Metabolite/Count Data" ) ),
				Overlay( :Run )
			),
			Elements(
				Line( X, Y, Legend( 1 ) ),
				Points( X, Y, Legend( 2 ), Jitter Limit( 0.2018 ) )
			),
			Where( :Name( "Metabolite/Count" ) == "pH" ),
			SendToReport(
				Dispatch(
					{},
					"Graph Builder",
					OutlineBox,
					{Set Title( "pH" ), Image Export Display( Normal )}
				),
				Dispatch(
					{},
					"graph title",
					TextEditBox,
					{Set Text( "pH vs. Step" )}
				),
				Dispatch( {}, "Y title", TextEditBox, {Set Text( "pH" )} )
			)
		);

Thank you for the help!

Where line.jpg

txnelson

Here is one way of handling it

Names Default To Here( 1 );
dt = Open( "$SAMPLE_DATA/big class.jmp" );

New Window( "big class - Graph Builder", vlb = V List Box() );

gb1 = Graph Builder(
	invisible,
	Size( 528, 456 ),
	Show Control Panel( 0 ),
	Variables( X( :weight ), Y( :height ) ),
	Elements( Points( X, Y, Legend( 1 ) ), Smoother( X, Y, Legend( 2 ) ) ),
	Where( :age == 12 )
);
(Report( gb1 ) << top parent)[Text Box( 1 )] << delete;
vlb << append( Report( gb1 ) );

gb2 = Graph Builder(
	invisible,
	Variables( X( :weight ), Y( :height ) ),
	Show Control Panel( 0 ),
	Elements( Points( X, Y, Legend( 1 ) ), Smoother( X, Y, Legend( 2 ) ) ),
	Where( :age == 13 )
);
(Report( gb2 ) << top parent)[Text Box( 1 )] << delete;
vlb << append( Report( gb2 ) );
gb3 = Graph Builder(
	invisible,
	Variables( X( :weight ), Y( :height ) ),
	Show Control Panel( 0 ),
	Elements( Points( X, Y, Legend( 1 ) ), Smoother( X, Y, Legend( 2 ) ) ),
	Where( :age == 14 )
);
(Report( gb2 ) << top parent)[Text Box( 1 )] << delete;
vlb << append( Report( gb3 ) );