OPTIONS NODATE NONUMBER LS=64 PS=120;
/*
FILENAME TEMP 'C:/COURSES/ST580/SAS/XSCHART.PS';
GOPTIONS DEVICE=PS
GSFNAME=TEMP
GSFLEN=132
HSIZE=7.5IN VSIZE=10IN
GSFMODE=REPLACE;
*/
DATA IN; INFILE 'C:/COURSES/ST580/SAS/XCHART.DAT';
         DO sample =1 TO 100;
         DO unit = 1 TO 4;
            INPUT response @@; OUTPUT;
         END; END;

TITLE 'XBAR AND S CHARTS (KNOWN MU AND SIGMA)';

SYMBOL V=DOT WIDTH=1;

PROC SHEWHART DATA=IN GRAPHICS;
     XSCHART response*sample / NPANELPOS=100
                               ZONES ZONELABELS
                               MU0=100   XSYMBOL=MU0
                               SIGMA0=2  SSYMBOL=S0
                               TESTS  = 1 TO 8  LTESTS = 2
                               TESTS2 = 1
                               TABLETESTS  ALLN
                               SPLIT = '/';
     LABEL RESPONSE = 'AVERAGE RESPONSE/STANDARD DEVIATION';
RUN;