You can go the complicated way of using graphic script
Names Default To Here(1);
dt = open("$SAMPLE_DATA/Big Class.jmp");
gb = dt << Graph Builder(
Variables(X(:weight), Y(:height), Group Y(:sex)),
Elements(Points(X, Y, Legend(11)))
);
fbs = Report(gb) << XPath("//FrameBox");
lines = {60, 65};
For Each({fb, idx}, fbs,
Eval(EvalExpr(
fb << Add Graphics Script(
H Line(Expr(lines[idx]));
);
));
);
or easier option of adding new chart
Names Default To Here(1);
dt = open("$SAMPLE_DATA/Big Class.jmp");
dt << New Column("Line", Numeric, Continuous, << Set Each Value(
If(:sex == "M", 65, 60)
));
gb = dt << Graph Builder(
Size(567, 523),
Show Control Panel(0),
Variables(X(:weight), Y(:height), Y(:Line, Position(1)), Group Y(:sex)),
Elements(Points(X, Y(1), Legend(8)), Line(Y(2), Legend(10)))
);
-Jarmo