搜索: 编号:a209423
|
|
|
|
1, 1, 4, 4, 10, 13, 24, 30, 52, 68, 105, 137, 202, 264, 376, 485, 669, 864, 1162, 1486, 1968, 2501, 3256, 4110, 5285, 6630, 8434, 10511, 13241, 16417, 20505, 25273, 31344, 38438, 47346, 57782, 70746, 85947, 104663, 126594, 153386, 184793, 222865, 267452
(列表;图表;参考;听;历史;文本;内部格式)
|
|
|
抵消
|
1,3
|
|
评论
|
a(n)=n的所有分区中奇数重数部分的数量(每个部分只计数一次)。例如:a(5)=10,因为我们有[5']、[4'、1']、[3]、2']、=3'、1,1]、[2,2,1'],[2'、1'、1,1'和[1'、1,1,1](标记了10个计数部分)-Emeric Deutsch公司2016年2月8日
|
|
链接
|
|
|
公式
|
a(n)~log(2)*exp(Pi*sqrt(2*n/3))/(2^(3/2)*Pi*squart(n))-瓦茨拉夫·科特索维奇2018年5月25日
|
|
例子
|
5的分区是[5]、[4,1]、[3,2]、[3,1,1]、[2,2,1]、[2,1,1]和[1,1,1,1],总共有15个奇数部分和5个偶数部分,因此a(5)=10。
|
|
MAPLE公司
|
b: =proc(n,i)选项记忆;局部m、f、g;
m: =irem(i,2);
如果n=0,则[1,0,0]
elif i<1,然后[0,0,0]
否则f:=b(n,i-1);g: =`if`(i>n,[0$3],b(n-i,i));
[f[1]+g[1],f[2]+g[2]+m*g[1],f[3]+g[3]+(1-m)*g[1]
fi(菲涅耳)
结束:
a: =n->b(n,n)[2]-b(n,n)[3]:
g:=加(x^j/(1+x^j),j=1。。80)/mul(1-x^j,j=1..80):gser:=系列(g,x=0,50):seq(系数(gser,x,n),n=0。。45); #Emeric Deutsch公司2016年2月8日
|
|
数学
|
f[n_,i_]:=计数[压扁[整数分区[n]],i]
o[n]:=和[f[n,i],{i,1,n,2}]
e[n]:=和[f[n,i],{i,2,n,2}]
b[n_,i_]:=b[n,i]=模[{m,f,g},m=模[i,2];如果[n==0,{1,0,0},如果[i<1,{0,0,0},f=b[n,i-1];g=如果[i>n,{0,0,0},b[n-i,i]];{f[[1]]+g[[1]],f[[2]]+g[2]]+m*g[1]]、f[[3]]+g[[3]]+(1-m)*g[1]]}]];a[n]:=b[n,n][2]-b[n,n][[3]];表[a[n],{n,1,50}](*Jean-François Alcover公司2015年11月16日,之后阿洛伊斯·海因茨*)
|
|
交叉参考
|
|
|
关键字
|
非n
|
|
作者
|
|
|
状态
|
经核准的
|
|
|
搜索在0.003秒内完成
|