|
|
|
|
1, 1, 3, 7, 19, 46, 124, 320, 858, 2282, 6161, 16647, 45352, 123861, 340000, 936098, 2586518, 7166394, 19911638, 55456892, 154814055, 433081632, 1213901668, 3408659401, 9587879987, 27011564035, 76212078500
(列表;图表;参考;听;历史;文本;内部格式)
|
|
|
抵消
|
5,3
|
|
评论
|
|
|
参考文献
|
F.Harary和E.M.Palmer,《图形计数》,纽约学术出版社,1973年,第53页。
|
|
链接
|
|
|
配方奶粉
|
a(n)=Sum_(P){Prod_(1^a1 2^a2 3^a3…){二项式(f(i)+a_i-1,a_i)}},其中P是n的四部分划分集,f=A000081号. -华盛顿·邦菲姆2012年7月10日
|
|
数学
|
需求[“Combinatorica`”];
nn=30;s[n_,k_]:=s[n,k]=a[n+1-k]+如果[n<2k,0,s[n-k,k]];a[1]=1;a[n]:=a[n]=和[a[i]s[n-1,i]i,{i,1,n-1}]/(n-1);rt=表[a[i],{i,1,nn}];删除[Take[CoefficientList[CycleIndex[SymmetricGroup[4],s]/。表[s[j]->表[Sum[rt[[i]]x^(k*i),{i,1,nn}],{k,1,nn}][[j]],{j,1,nne}],x],nn],4](*杰弗里·克雷策,2012年10月14日,编码后罗伯特·拉塞尔在里面A000081号*)
|
|
黄体脂酮素
|
(PARI)
最大n=200;f=矢量(max_n);\\f[n]=A000081号[n] ,n=1..最大n
sum2(k)={本地;s=0;fordiv(k,d,s+=d*f[d]);返回};
初始_ f()={f[1]=1;
对于(n=1,max_n-2,s=0;对于(k=1,n,s+=sum2(k)*f[n-k+1]);f[n+1]=s/n)};
S=0;P=[0,1,1,1,1,0];
访问4()={i=3;k=2;p=p[2];Pr=1;
while(1,while)(P[i]==P,i++);c=i-k;Pr*=二项式(f[P[k]]+c-1,c);
如果(P[i]==0,S+=Pr;返回);p=p[i];k=i;i++)};
\\F.Ruskey分区发生器
部分(n,k,s,t)={P[t]=s;
如果((k==1)||(n==k),visit4(),L=最大值(1,ceil((n-s)/(k-1)));
对于(j=L,min(s,n-s-k+2),部分(n-s,k-1,j,t+1));P[t]=1;};
\\
a(n)={S=0;n--;部分(2*n,4+1,n,1);返回(S)}
初始_ f();对于(n=5,max_n,打印(n,“,a(n)))\\b文件格式
|
|
交叉参考
|
|
|
关键字
|
非n
|
|
作者
|
|
|
状态
|
经核准的
|
|
|
|