Also, to with your Expr() approach, something like this should work
Names Default To Here(1);
dt = Open("$SAMPLE_DATA/Drug.jmp");
obj_expr = Expr(
obj = dt << Multivariate(
Y(:x, :y),
Variance Estimation("Row-wise"),
Scatterplot Matrix(1),
By(:Drug),
Group Options(Return Group(1), Layout("Arrange in Tabs"))
);
Report(obj)[TabListBox(1)] << Set Style("Combo");
);
nw = New Window("Example", OB_1 = Outline Box("Analysis", obj_expr));
But you could also consider something like
Names Default To Here(1);
dt = Open("$SAMPLE_DATA/Drug.jmp");
obj_expr = Expr(
obj = dt << Multivariate(
Y(:x, :y),
Variance Estimation("Row-wise"),
Scatterplot Matrix(1),
By(:Drug),
Group Options(Return Group(1), Layout("Arrange in Tabs"))
);
);
nw = New Window("Example",
OB_1 = Outline Box("Analysis",
multivar = obj_expr
)
);
Report(multivar)[TabListBox(1)] << Set Style("Combo");
-Jarmo