options ps=60 ls=70; data set1; do th = 1 to 8; do rep = 1 to 9; ran = ranuni(0); output; end; end; run; proc sort; by ran; run; proc print; var th rep ran; run;