OPTIONS NODATE NONUMBER LS=80 PS=60;

******************************************************;
***                  NP-chart                      ***;
*** The response is the number of failing circuits ***;
***          from 20 batches of size 500           ***;
******************************************************;


 data circuit3;
    input batch fail @@;
 cards;
  1 12    2 21    3 16    4  9
  5  3    6  4    7  6    8  9
  9 11   10 13   11 12   12  7
 13  2   14 14   15  9   16  8
 17 14   18 10   19 11   20  9
 ;

 title1 'np Chart for the Number of Failing Circuits';

 symbol v=dot width=3;
 proc shewhart data=circuit3 graphics;
    npchart fail*batch / subgroupn = 500
                         tests     = 1 to 8
                         ltests    = 20
                         zonelabels
                         tabletests
                         tablelegend;
    label batch = 'Batch Number'
          fail  = 'Number of Circuits Failing';
 run;