Hoja de preparación de datos

data casuser.factordata; array x{10} x1-x10; do i=1 to 1000; f1 = rannor(1); f2 = rannor(1); do j=1 to 5; x{j} = f1 + 0.5*rannor(1); end; do j=6 to 10; x{j} = f2 + 0.5*rannor(1); end; output; end; drop i f1 f2 j; run;