Action Principale : faNFactors
| 1 | |
| 2 | DATA casuser.factordata; |
| 3 | array x{10} x1-x10; |
| 4 | DO i=1 to 1000; |
| 5 | f1 = rannor(1); |
| 6 | f2 = rannor(1); |
| 7 | DO j=1 to 5; |
| 8 | x{j} = f1 + 0.5*rannor(1); |
| 9 | END; |
| 10 | DO j=6 to 10; |
| 11 | x{j} = f2 + 0.5*rannor(1); |
| 12 | END; |
| 13 | OUTPUT; |
| 14 | END; |
| 15 | drop i f1 f2 j; |
| 16 | |
| 17 | RUN; |
| 18 |