本帖最后由 skyfree 于 2013-8-20 20:41 编辑
2. JSL法:
编写JSL代码快速实现此功能:
//--------
v1 = V List Box( Text Box( "Box plots and Histograms" ) );
csp = NewWindow("Plots",
Outline Box("Plots",
H List Box(
V List Box(
cc = Oneway(
Y( ::"Max Load(N)" ),
X( :Category),
Means and Std Dev( 1 ),
Box Plots( 1 ),
Mean Diamonds( 0 ),
X Axis proportional( 0 ),
Points Jittered( 1 ),
SendToReport(
Dispatch(
{},
"1",
ScaleBox,
{Format( "Best", 10, Min( lsl ), Max( usl ) ), Add Ref Line( lsl, Solid, {0, 64, 64}, "LSL" ),
Add Ref Line( usl, Solid, {0, 64, 64}, "USL" )}
),
Dispatch( {}, "Oneway Plot", FrameBox, Frame Size( 398, 291 ) ),
Dispatch( {}, "", NomAxisBox, Rotated Tick Labels( 1 ) )
),
);
),
V List Box(
dist = Distribution(
Column( ::"Max Load(N)" ),
Quantiles( 0 ),
Moments( 0 ),
Horizontal Layout( 1 ),
Vertical( 0 ),
Capability Analysis( LSL( lsl ), USL(usl) ),
By( :Category)
)
)
);
);
);
v1 << append(csp);
newFit = NewWindow("Box plots",v1);
//-------------
运行结果如下:
|