DM 'CLEAR LOG';
DM 'CLEAR OUTPUT';
OPTIONS LINESIZE=72 NODATE NONUMBER;
DATA file1;
     INFILE 'a:\pulsedat.txt';
     INPUT pulse1 pulse2 ran smoker gender height weight activity;
PROC SORT DATA=file1;
          BY gender weight pulse1;
PROC PRINT;
     VAR gender weight pulse1 pulse2 height activity ran smoker;
RUN;