求助，如何产生排列数？

是 否 +2 论坛币

k人 参与回答

经管之家送您一份

应届毕业生专属福利!

求职就业群

赵安豆老师微信：zhaoandou666

经管之家联合CDA

送您一个全额奖学金名额~ !

立即领取

感谢您参与论坛问题回答

经管之家送您两个论坛币！

+2 论坛币

有整数若干，想写出所有排列并存放到某个数据集中
比方由四个数据 3， 5 ，9 ，13
那么数据集中是4！=24个记录
3 5 9 13
3 5 13 9
3 9 13 5
。。
。。
。。

扫码加我 拉你入群

请注明：姓名-公司-职位

以便审核进群资格，未注明则拒绝

分享0 收藏0 回帖

关键词：数据集 如何 记录

matlab
perms([3 5 9 13 ])

如果用sas呢

3# xiaosanmao

1. 
   
2. data new;
   
3. do i =3,5, 9,13;
   
4. do j =3,5 ,9,13;
   
5.   if  ^(j =i) then do;
   
6.    do k =3,5, 9,13;
   
7.     if ^(k =j |k =i)  then do;
   
8.      do l =3,5, 9,13;
   
9.       if ^(l =k | l =j |l =i)then do;
   
10.        PermN+1;
    
11.        output;
    
12.       end;
    
13.      end;
    
14.     end;
    
15.    end;
    
16.   end;
    
17. end;
    
18. end;
    
19. run;

复制代码

学习了 ~~~~~
data z;
set y;
call sortn(i,j,k,l,m,n);
if (i=2)&(j=2)&(k=3)&(l=4)&(m=5)&(n=6) then output;
run;
proc sql noprint; create table final as
select * from y
where  exists
(select * from z where y.z=z.z)
;quit;

1# xiaosanmao

8    data _null_;
9    array x(3) (1,2,3);
Here is an example.
SAS function dim=dimension
                      fact=factorial

call routine: call allperm = all permutaion.




10     do i = 1 to fact(dim(x));
11          call allperm(i, of x

);
12          put i 5. +2 x

;
13     end;
14   run;

    1  1 2 3
    2  1 3 2
    3  3 1 2
    4  3 2 1
    5  2 3 1
    6  2 1 3

6# bobguy

Right. no sense to code step by step when a function exists.

拜5楼
DATA a;
ARRAY x{4} (3 5 9 13);
DO i=1 TO FACT(dim(x));
CALL ALLPERM(i, of x1-x4);
OUTPUT;
drop i;
END;
RUN;