%I#10 2014年11月1日23:02:37
%S 110017189291213126885200003627155158988429250,
%电话:1267664556730792079292048515544601327354412382720479328,
%电话:2330990415439882738248594860402871360011397230362279852972869873689584148750591820169018590775045252838397206729638923750
%N 1…7的N个不可区分副本的置换数,每个部分和<=所有置换的平均部分和。
%H Alois P.Heinz,n表,n=0..11</a>
%e a(1)=1001:(1,2,3,4,5,6,7),(1,2,4,5,1,6)。。。,(4,3,5,2,1,7,6), (4,3,5,2,6,1,7).
%p b:=proc(x,y,z,u,v,w,h)选项记忆;局部n,g;
%p n:=x+y+z+u+v+w+h;g: =x+2*y+3*z+4*u+5*v+6*w+7*h-8*(n-1)/2;
%p`if`(n<2,1,`if`)(x>0且1<=g,b(x-1,y,z,u,v,w,h),0)+
%p`if`(y>0且2<=g,b(x,y-1,z,u,v,w,h),0)+
%p`if`(z>0且3<=g,b(x,y,z-1,u,v,w,h),0)+
%p`if`(u>0和4<=g,b(x,y,z,u-1,v,w,h),0)+
%p`if`(v>0且5<=g,b(x,y,z,u,v-1,w,h),0)+
%p`if`(w>0且6<=g,b(x,y,z,u,v,w-1,h),0)+
%p`如果`(h>0和7<=g,b(x,y,z,u,v,w,h-1),0))
%p端:
%pa:=n->b(n$7):
%p序列(a(n),n=0..4);
%A215561的Y行n=7。
%K nonn公司
%0、2
%阿洛伊斯·海因茨,2012年8月16日
|