Producing High-Quality Figures Using SAS/GRAPH and ODS Graphics Procedures

167Box Plots

value hrdf

1 = ‘Hour 0’

2 = ‘Hour 2’

3 = ‘Hour 8’;

value bsldf

1 = ‘BSL IOP: < 24’

2 = ‘BSL IOP: > = 24 to < = 26’

3 = ‘BSL IOP: > 26’

OTHER = ‘ ’;

run;

** Generate the required number of subjects and randomly

assign to 2 treatment groups;

data subj;

do i = 1 to &subjnum.;

subjid = 1000+ i;

if ranuni (&seed.) < 0.5 then trtnum = 1;

else trtnum = 2;

output;

end;

drop i;

run;

** Set up the IOP Values based on the trt assignment and

visits/timepoints;

data iop;

set subj;

do i = 1 to 4; ** 4 visits;

do j = 1 to 3; ** 3 timepoints/visit;

visit = i;

hour = j;

if i = 1 then do; ** Baseline;

if j = 1 then iop = round((RANNOR(&seed.)* &SD.

+25),.1); ** Hour 0;

if j = 2 then iop = round((RANNOR(&seed.)* ...