Here is one way to get what you want
names default to here(1);
// Open Data Table: big class.jmp
// → Data Table( "big class" )
dt = Open( "/C:/Program Files/SAS/JMPPRO/14/Samples/Data/big class.jmp" );
Partition(
Y( :height ),
X( :age, :sex, :weight ),
Informative Missing( 1 ),
Initial Splits( :weight < 81, {}, {:age == {12, 13}} ),
SendToReport(
Dispatch( {}, "Partition Report", FrameBox, {Frame Size( 480, 62 )} )
)
);
//this is a partition analysis
actobjrpt=Current Report();
actobjrpt=actobj<<report;
//this links to the Logworth value from the first split
actobjtable = (actobjrpt[numbercolbox( 7 )]<<get)[1];
// get the header
theHeader = actobjtable = actobjrpt[numbercolbox( 7 )]<<get heading;
show(actobjtable, theHeader);
Jim