u Chart-Applying Tests for Special Causes

/****************************************************************/
/*          S A S   S A M P L E   L I B R A R Y                 */
/*                                                              */
/*    NAME: SHWUEX1                                             */
/*   TITLE: u Chart-Applying Tests for Special Causes           */
/* PRODUCT: QC                                                  */
/*  SYSTEM: ALL                                                 */
/*    KEYS: Shewhart Charts, u Charts, Tests for Special Causes,*/
/*   PROCS: SHEWHART                                            */
/*    DATA:                                                     */
/*                                                              */
/*     REF: SAS/QC Software:  Usage and Reference, Version 6,   */
/*          First Edition, Volume 1 and Volume 2                */
/*                                                              */
/****************************************************************/

data Fabric3;
   input Roll Defects @@;
   datalines;
 1   6    2   9    3  14    4  17
 5   3    6   8    7   9    8   2
 9  14   10   1   11   3   12   5
13   6   14   9   15  10   16  12
17  11   18   4   19   9   20   4
;

ods graphics on;
title1 'u Chart for Fabric Defects';
title2 'Tests=1 to 4';
proc shewhart data=Fabric3;
   uchart Defects*Roll / subgroupn = 30
                         tests     = 1 to 4
                         odstitle  = title
                         odstitle2 = title2
                         tabletests
                         zonelabels;
run;