- 论坛徽章:
- 2
|
本帖最后由 yinyuemi 于 2011-05-10 06:34 编辑
回复 1# sequencing
- {a[$1":"$2]=1;a[$2":"$1]=1}
- END{
- for(i=1;i<=12;i++)
- {for(j=1;j<=12;j++)
- if(a[i":"j]&&i!=j)
- s=s?s FS j:j
- b[i]=s
- s=""
- }
- t="1 2 3 4 5 6 7 8 9 10 11 12 "
- {for(m=1;m<=12;m++){
- x=t;
- l=split(b[m],c)
- {for(k=1;k<=l;k++)
- x=gensub(c[k] FS,"","1",x)}
- for(n=1;n<=12;n++){
- if(sub(n FS,n FS,x)&&m!=n){
- l=split(b[n],c)
- {for(k=1;k<=l;k++)
- x=gensub(c[k] FS,"","1",x)}
- }
- }
- print x}
- }
- }
- awk -f awk.script file
- 1 2 4 6
- 1 2 4 6
- 2 4 6
- 1 2 4 6
- 2 4 6
- 1 2 4 6
- 1 2 4 7
- 2 4 6
- 1 2 6 9
- 2 3 4 5 6 8 10
- 1 4 6 11
- 1 4 6
复制代码 |
|