Here is a simple example of a "Live" Prediction Profiler in a Journal. I hope this is what you are looking for.
Names Default To Here( 1 );
dt =
// Open Data Table: semiconductor capability.jmp
// → Data Table( "semiconductor capability" )
Open( "$SAMPLE_DATA/semiconductor capability.jmp" );
fm = Fit Model(
Y( :NPN1 ),
Effects( :PNP1, :NPN2 ),
Personality( "Generalized Regression" ),
Generalized Distribution( "Normal" ),
Run(
Fit( Estimation Method( Standard Least Squares ), Validation Method( None ), save prediction formula ),
Fit( Estimation Method( Lasso ), Validation Method( AICc ) )
)
);
fm << close window;
New Window( "The Journal",
<<journal,
Outline Box( "Profiler in a Journal",
Profiler(
Y( :NPN1 Prediction Formula ),
Profiler(
1,
Term Value( PNP1( 297.02, Lock( 0 ), Show( 1 ) ), NPN2( 113.75, Lock( 0 ), Show( 1 ) ) )
),
Custom Profiler(
1,
Term Value( PNP1( 297.02, Lock( 0 ), Show( 1 ) ), NPN2( 114.039, Lock( 0 ), Show( 1 ) ) ),
Objective Formula( :NPN1 Prediction Formula )
)
)
)
);
Jim