A Simple JMP Script question: How to rotate word which is outside of graph

Steve_Kim

Hi All,

 

I'd like to rotate a word "where( :age==14)" which is outside of graph in a popup window.

 

Here is the script. 

Could you tell me how to make a script?  Thanks in advance. : )

 

 

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

nw = dt << Graph Builder(
 Size( 563, 452 ),
 Show Control Panel( 0 ),
 Variables( X( :weight ), Y( :height ) ),
 where( :age == 14 ),  //   <-  I want to rotate this text in the graph window. 
 Elements( Points( X, Y, Legend( 8 ) ), Smoother( X, Y, Legend( 9 ) ) ),
 SendToReport(
  Dispatch( {}, "Graph Builder", OutlineBox, {Set Title( "Hight " )} ),
  Dispatch( {}, "graph title", TextEditBox, {Set Text( "" )} )
 )
);

 

 

 

 

  

Graph question.jmp

txnelson

Here is a method that I have used in the past.  It uses an invisible Outline Box() to gain easy access to the Text Box() you want to manipulate, which lies outside of the Platform Object

dt = Open( "$SAMPLE_DATA/Big Class.jmp" );
nw = New Window( "the output",
	ob = Outline Box( "",
		dt << Graph Builder(
			Size( 563, 452 ),
			Show Control Panel( 0 ),
			Variables( X( :weight ), Y( :height ) ),
			where( :age == 14 ),  //   <-  I want to rotate this text in the graph window. 
			Elements( Points( X, Y, Legend( 8 ) ), Smoother( X, Y, Legend( 9 ) ) ),
			SendToReport(
				Dispatch( {}, "Graph Builder", OutlineBox, {Set Title( "Hight " )} ),
				Dispatch( {}, "graph title", TextEditBox, {Set Text( "" )} )
			)
		)
	)
);
nw[Outline Box( 1 )][Text Box( 1 )] << rotate text( left );