Specifying Two-Sided Cusum Parameter h
/****************************************************************/
/* S A S S A M P L E L I B R A R Y */
/* */
/* NAME: CUSTWOS4 */
/* TITLE: Specifying Two-Sided Cusum Parameter h */
/* PRODUCT: QC */
/* SYSTEM: ALL */
/* KEYS: Cusum Charts, */
/* PROCS: CUSUM */
/* DATA: */
/* */
/* REF: SAS/QC Software: Examples */
/* MISC: The history data set SUMMARY is created in the */
/* program CUSTWOS3 in the SAS/QC Sample Library. */
/* */
/****************************************************************/
options ls=120 ps=50 nodate;
data summary;
input hour weightx weights weightc weightn;
cards;
1 8.09375 0.059640 -0.25 4
2 8.09250 0.090220 -0.55 4
3 8.10100 0.076346 -0.51 4
4 8.11975 0.025552 0.28 4
5 8.10125 0.026500 0.33 4
6 8.08000 0.075617 -0.47 4
7 8.11450 0.037242 0.11 4
8 8.08300 0.059290 -0.57 4
9 8.06175 0.005737 -2.10 4
10 8.10225 0.046522 -2.01 4
11 8.10650 0.040542 -1.75 4
12 8.09925 0.056103 -1.78 4
13 8.15325 0.023977 0.35 4
14 8.12125 0.017173 1.20 4
15 8.14950 0.071248 3.18 4
;
title 'Two-Sided Cusum Chart for Data in SUMMARY';
proc cusum history=summary lp;
xchart weight*hour='*' /
mu0 =8.1
sigma0=0.050
delta =1
h =4.4
dataunits;
label weightx='Cumulative Sum in Ounces';
run;
title;
