cancel
Showing results for 
Show  only  | Search instead for 
Did you mean: 
The Discovery Summit 2025 Call for Content is open! Submit an abstract today to present at our premier analytics conference.
Choose Language Hide Translation Bar
RSantana
Level II

Adding lines of text between graphs in a Journal

I have created a fairly extensive journal and would like to add lines of text between i.e., graphs, as this will help the users know what the following reports and graphs are about.  I have tried the following (a solution from a prior question in the forum):

 

w1 = New Window ("Reports", <<Journal,
hlb = H List Box(
lub = Lineup Box(
tb1 = Text Box( "************************ TEST TEXT ************************" )
)));

 

However, this splits my journal into multiple windows, and that is undesirable.

Is there a way to insert lines of text between graphs and reports in a Journal?

1 ACCEPTED SOLUTION

Accepted Solutions
txnelson
Super User

Re: Adding lines of text between graphs in a Journal

Here is an example of one way to do this

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

NW = New Window( "My Journal", <<journal, vlb = V List Box() );

dis = Distribution(
	invisible,
	Continuous Distribution( Column( :weight ) ),
	Nominal Distribution( Column( :age ) )
);

vlb << append( Report( dis )[Outline Box( 1 )] );

vlb << append( Text Box( "here is a line of text" ) );
vlb << append( Text Box( "a second line" ) );

biv = Bivariate( Y( :weight ), X( :height ), Fit Line( {Line Color( {212, 73, 88} )} ), invisible );
vlb << append( Report( biv )[Outline Box( 1 )] );
vlb << append( Text Box( "some more text" ) );
vlb << append( Text Box( "and still another line of text" ) );
Jim

View solution in original post

1 REPLY 1
txnelson
Super User

Re: Adding lines of text between graphs in a Journal

Here is an example of one way to do this

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

NW = New Window( "My Journal", <<journal, vlb = V List Box() );

dis = Distribution(
	invisible,
	Continuous Distribution( Column( :weight ) ),
	Nominal Distribution( Column( :age ) )
);

vlb << append( Report( dis )[Outline Box( 1 )] );

vlb << append( Text Box( "here is a line of text" ) );
vlb << append( Text Box( "a second line" ) );

biv = Bivariate( Y( :weight ), X( :height ), Fit Line( {Line Color( {212, 73, 88} )} ), invisible );
vlb << append( Report( biv )[Outline Box( 1 )] );
vlb << append( Text Box( "some more text" ) );
vlb << append( Text Box( "and still another line of text" ) );
Jim