大道至简 学习了 我的方法比较直白了。。。

老哥稳 用这个方法封包成宏 可以推而广之另外不是很理解fact（）的用法，可否指点一二。

fact(n)=n!

我懒得算6!是多少 所以写了fact(6) ...

可以用 PROC PLAN实现。

%macro fact(n);
  %sysfunc(fact(&n))
%mend fact;

%let N = 6;
proc plan;
   factors subjects = %fact(&N) ordered  x = &N perm;
   output out = test;
run;

proc transpose data=test out = test2;
   by subjects;
run;

proc print data = test2;
run;



Obs    subjects    _NAME_    COL1    COL2    COL3    COL4    COL5    COL6

  1        1         x         1       2       3       4       5       6
  2        2         x         1       2       3       4       6       5
  3        3         x         1       2       3       5       4       6
  4        4         x         1       2       3       5       6       4
  5        5         x         1       2       3       6       4       5
  6        6         x         1       2       3       6       5       4
  7        7         x         1       2       4       3       5       6
  8        8         x         1       2       4       3       6       5
  9        9         x         1       2       4       5       3       6
10       10         x         1       2       4       5       6       3
11       11         x         1       2       4       6       3       5
12       12         x         1       2       4       6       5       3
13       13         x         1       2       5       3       4       6
14       14         x         1       2       5       3       6       4
15       15         x         1       2       5       4       3       6
16       16         x         1       2       5       4       6       3
17       17         x         1       2       5       6       3       4
18       18         x         1       2       5       6       4       3
19       19         x         1       2       6       3       4       5
20       20         x         1       2       6       3       5       4
21       21         x         1       2       6       4       3       5
22       22         x         1       2       6       4       5       3
23       23         x         1       2       6       5       3       4
24       24         x         1       2       6       5       4       3
25       25         x         1       3       2       4       5       6
26       26         x         1       3       2       4       6       5
27       27         x         1       3       2       5       4       6
28       28         x         1       3       2       5       6       4
29       29         x         1       3       2       6       4       5
30       30         x         1       3       2       6       5       4
31       31         x         1       3       4       2       5       6
32       32         x         1       3       4       2       6       5
33       33         x         1       3       4       5       2       6
34       34         x         1       3       4       5       6       2
35       35         x         1       3       4       6       2       5
36       36         x         1       3       4       6       5       2

...