*************************************;
*** UNEQUAL SAMPLE SIZE EXAMPLE.  ***;
*************************************;

OPTIONS NODATE NONUMBER LS=72 PS=54;
/*
FILENAME TEMP 'EWMA4.EPS'; 
GOPTIONS DEVICE=PSEPSF GSFNAME=TEMP GSFLEN=132
VSIZE=5 GSFMODE=REPLACE;
*/
 data clips4;
    input day @;
    do i=1 to 5;
       input gap @; output;
    end;
lines;
  1  14.93  14.65  14.87  15.11  15.18
  2  15.06  14.95  14.91  15.14  15.41
  3  14.90  14.90  14.96  15.26  15.18
  4  15.25  14.57  15.33  15.38  14.89
  7  14.68  14.63  14.72  15.32  14.86
  8  14.48  14.88  14.98  14.74  15.48
  9  14.99  15.16  15.02  15.53  14.66
 10  14.88  15.44  15.04  15.10  14.89
 11  15.14  15.33  14.75  15.23  14.64
 14  15.46  15.30  14.92  14.58  14.68
 15  15.23  14.63    .      .      .
 16  15.13  15.25    .      .      .
 17  15.06  15.25  15.28  15.30  15.34
 18  15.22  14.77  15.12  14.82  15.29
 21  14.95  14.96  14.65  14.87  14.77
 22  15.01  15.11  15.11  14.79  14.88
 23  14.97  15.50  14.93  15.13  15.25
 24  15.23  15.21  15.31  15.07  14.97
 25  15.08  14.75  14.93  15.34  14.98
 28  15.07  14.86  15.42  15.47  15.24
 29  15.27  15.20  14.85  15.62  14.67
 30  14.97  14.73  15.09  14.98  14.46
 ;
 symbol v=dot width=3;
 proc macontrol data=clips4;
    ewmachart gap*day / weight  = 0.3
                        table tableid tableoutlim;
      label gap = 'Gap in Clip'
            day = 'April';
 TITLE 'EWMA Chart -- weight=0.3 (unequal sample sizes)';
 run;