1----- <~dataexec\REHM.DP> Load & Execute REHM.DAT 2 3. This is file REHM.DP 4 5DELETE Y1 Y2 X PATIENT TAG 6SKIP 25 7READ REHM.DAT Y1 Y2 X PATIENT 8TITLE REHM.DAT 9RETAIN Y1 Y2 X PATIENT SUBSET PATIENT 1 10LET N = NUMBER Y1 11LET TAG = SEQUENCE 1 4 1 300 12RETAIN TAG FOR I = 1 1 N 13MULTIPLOT 2 2 14PLOT Y TAG TAG 15MEAN CONTROL CHART Y TAG 16RANGE CONTROL CHART Y TAG 17END OF MULTIPLOT 18 19