SAS 如何生成非重复的全排列？

是 否 +2 论坛币

k人 参与回答

经管之家送您一份

应届毕业生专属福利!

求职就业群

赵安豆老师微信：zhaoandou666

经管之家联合CDA

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

立即领取

感谢您参与论坛问题回答

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

+2 论坛币

请教SAS  如何生成1-30个数的全排列（非重复的）；
、比如说下面是1-5的排列
x   y   z
1   2   3  
1   2   4
1   2   5
2   3   4
2   3   5
3   4   5
我想生成1-30的； 求教

扫码加我 拉你入群

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

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

分享0 收藏0 回帖

关键词：如何

求教

1. %let n=30;
   
2. data a;
   
3. do i=1 to %eval(&n-2);
   
4. do j=1 to %eval(&n-1)-i;
   
5. a=i;b=i+1;c=b+j;
   
6. output;
   
7. end;
   
8. end;
   
9. drop i j;
   
10. run;

复制代码

Imasasor 发表于 2012-10-16 16:11

偶像。。。。好厉害啊 。。。回答了我好多问题太谢谢了

Imasasor 发表于 2012-10-16 16:11

你好，麻烦再问一下；我想做购物篮分析
data dd;
input kr sp1 sp2 sp3 sp4 sp5 sp6 sp7 sp8 sp9 sp10;
cards;
1        1        1        1        1        0        0        0        1        0        0
2        1        0        1        0        1        0        1        0        0        0
3        0        1        0        0        1        0        1        0        0        0
4        1        0        1        0        0        1        0        1        0        0
5        0        1        0        0        1        0        0        0        1        0
6        0        1        0        0        0        1        1        0        0        0
7        0        0        1        1        0        0        0        0        1        1
8        0        1        0        0        0        1        0        0        0        0
9        1        1        0        0        0        1        0        0        0        0
10        0        1        0        1        0        0        0        1        0        0
11        1        0        0        1        0        0        0        1        0        0
12        0        0        0        0        0        0        0        1        0        1
13        1        0        0        0        0        0        0        0        0        0
14        0        1        0        1        0        0        1        0        0        1
15        0        1        0        0        0        1        1        0        0        0
16        0        0        1        1        0        0        0        0        1        1
17        0        1        0        0        0        1        0        0        0        0
18        1        1        1        0        0        1        0        0        0        0
19        0        1        0        1        0        0        0        1        0        0
20        1        0        0        1        0        0        0        1        0        0
;
run;
我想得到任意3个sp的组合的kr数；比如说SP1 SP2 SP3 都为1的kr数是2    SP1 SP2 SP4 都为1的数为1的数是1    SP1 SP2 SP5 都为1的数为1的数是0
得到data
X  Y  Z  KR;
1  2  3  2
1  2  4  1
1  2  5  0
......;
这个是我的想法   可以实现么？

applebobysps 发表于 2012-10-16 17:37
你好，麻烦再问一下；我想做购物篮分析
data dd;
input kr sp1 sp2 sp3 sp4 sp5 sp6 sp7 sp8 sp9 sp10; ...

对不起，没能理解你的需求，要不去群里详谈

Imasasor 发表于 2012-10-16 17:42
对不起，没能理解你的需求，要不去群里详谈

我进群了 你是？？

applebobysps 发表于 2012-10-16 17:37
你好，麻烦再问一下；我想做购物篮分析
data dd;
input kr sp1 sp2 sp3 sp4 sp5 sp6 sp7 sp8 sp9 sp10; ...

我举个例子，你用循环就可以实现啦，仅供参考啊..
data a1;
        input x y z;
cards;
1 0 1
1 1 1
1 0 1
1 1 0
1 1 1
1 1 1
0 1 1
;
run;
data a2;
        set a1;
        xyz=cats(x,y,z);
run;

proc sort data=a2;
by xyz;
run;

data a3(keep=xyz count);
        set a2;
        by xyz;
        retain count 0;
        if first.xyz then count=0;
        count=count+1;
        if last.xyz;
run;