Here is one option
Names Default To Here(1);
dt = Open("$SAMPLE_DATA/Big Class.jmp");
// create table with
dt_summary = dt << Summary(
Group(:age),
Mean(:height),
Mean(:weight),
Freq("None"),
Weight("None")
);
source_script = dt_summary << Get Property("Source");
close(dt_summary, no save);
Eval(EvalExpr(
dt << New Script("SourceFromSummary",
Expr(Name Expr(source_script))
);
));
-Jarmo