Superimposing Fitted Curves on a Histogram
/****************************************************************/
/* S A S S A M P L E L I B R A R Y */
/* */
/* NAME: CAPCURV */
/* TITLE: Superimposing Fitted Curves on a Histogram */
/* PRODUCT: QC */
/* SYSTEM: ALL */
/* KEYS: Capability Analysis, */
/* PROCS: CAPABILITY */
/* DATA: */
/* */
/* SUPPORT: saswgr */
/* REF: SAS/QC Software: Usage and Reference, Version 6, */
/* First Edition, Volume 1 and Volume 2 */
/* MISC: */
/* */
/****************************************************************/
data Plates;
label Gap='Plate Gap in cm';
input Gap @@;
datalines;
0.746 0.357 0.376 0.327 0.485 1.741 0.241 0.777 0.768 0.409
0.252 0.512 0.534 1.656 0.742 0.378 0.714 1.121 0.597 0.231
0.541 0.805 0.682 0.418 0.506 0.501 0.247 0.922 0.880 0.344
0.519 1.302 0.275 0.601 0.388 0.450 0.845 0.319 0.486 0.529
1.547 0.690 0.676 0.314 0.736 0.643 0.483 0.352 0.636 1.080
;
title;
ods graphics on;
proc capability data=Plates;
var Gap;
specs lsl = 0.3 usl = 0.8;
histogram /
midpoints=0.2 to 1.8 by 0.2
lognormal
weibull
gamma
nospeclegend;
inset n mean(5.3) std='Std Dev'(5.3) skewness(5.3)
/ pos = ne header = 'Summary Statistics';
run;