Inset for Areas Under a Fitted Curve
/****************************************************************/
/* S A S S A M P L E L I B R A R Y */
/* */
/* NAME: CAPINS4 */
/* TITLE: Inset for Areas Under a Fitted Curve */
/* PRODUCT: QC */
/* SYSTEM: ALL */
/* KEYS: Capability Analysis, Insets, */
/* PROCS: CAPABILITY */
/* DATA: */
/* */
/* SUPPORT: saswgr */
/* REF: SAS/QC Software: Usage and Reference, Version 6, */
/* First Edition, Volume 1 and Volume 2 */
/* MISC: */
/* */
/* Examples in the documentation were created using the */
/* statement: ods listing style=statistical; */
/* */
/****************************************************************/
data Wire;
label Strength='Torsion Strength in lb/in';
input Strength @@;
datalines;
25 25 36 31 26 36 29 37 37 20
34 27 21 35 30 41 33 21 26 26
19 25 14 32 30 29 31 26 22 24
34 33 28 26 43 30 40 32 32 31
25 26 27 34 33 27 33 29 30 31
;
ods graphics off;
title 'Torsion Strength of Copper Wire';
legend2 FRAME CFRAME=ligr CBORDER=black POSITION=center;
proc capability data=Wire noprint;
spec lsl=22 llsl=2 clsl=black cleft=vibg
usl=38 lusl=20 cusl=black;
histogram Strength / cframe = ligr
cfill = bibg
legend = legend2
normal(color=black noprint fill);
inset lsl='LSL' lslpct / cfill=ywh cshadow=dagr;
run;