dt = Open("$SAMPLE_DATA/Big Class.jmp");
vc = dt << Variability Chart(
Y( :height ),
X( :age, :sex ),
Show Range Bars( 0 ),
Show Cell Means( 0 ),
Std Dev Chart( 1 )
);
fm = Fit Model(
Y( :height ),
Effects( :age, :sex, :age * :sex ),
Personality( "Standard Least Squares" )
);
fit = fm << Run Model;
fm << Close Window;
fit << Prediction Formula;
fit << Close Window;
vcr = vc << Report;
Summarize(
grp = By( :age, :sex ),
pred = Mean( :Pred Formula height )
);
For( g = 1, g <= N Items( grp[1] ), g++,
Eval(
Substitute(
Expr(
vcr[FrameBox(1)] << Add Graphics Script(
Pen Color("red"); H Line( bbb, eee, yyy );
)
),
Expr( bbb ),
g-1,
Expr( eee ),
g,
Expr( yyy ),
pred[g]
)
);
);
On Jul 28, 2009, at 8:29 PM, Mark Bailey wrote:
I think that you will need a script to make such a chart. It would not be too difficult.
How are you using the Variability Chart to analyze data from a DOE?
On Jul 28, 2009, at 4:40 PM, Bruey, Francis wrote:
Is there a way to add markers for another column of values (e.g. values from a prediction formula saved to a table from Fit Model) to an existing Variability Chart (e.g. a chart of raw experimental response values)?
Or do I need to write a script to do this?
Mark
They hate you if you're clever, and they despise a fool ("Working Class Hero" - John Lennon)