显示找到的2个结果中的1-2个。
第页1
1, 1, 2, 2, 4, 4, 6, 7, 11, 12, 16, 19, 25, 29, 37, 44, 56, 64, 79, 92, 112, 130, 157, 182, 217, 250, 296, 341, 401, 461, 539, 615, 717, 817, 945, 1076, 1240, 1409, 1614, 1830, 2091, 2365, 2692, 3040, 3451, 3885, 4398, 4942, 5581, 6260, 7050, 7896, 8870, 9916
MAPLE公司
h: =proc(n)选项记忆`如果`(n<1,0,
`if`(加(i,i=位[分割](n))::奇数,n,h(n-1))
结束时间:
b: =proc(n,i)选项记住`如果`(n=0或i=1,
b(n,h(i-1))+b(n-i,h(min(n-i),i))
结束时间:
a: =n->b(n,h(n)):
数学
f[n_]:=f[n]=数字计数[n,2][[1]]//OddQ//Boole;
etr[p_]:=模[{b},b[n_]:=b[n]=如果[n==0,1,Sum[Sum[dp[d],{d,除数[j]}]b[n-j],{j,1,n}]/n];b] ;
a[n]:=etr[f][n];
1, 0, 0, 1, 0, 1, 1, 0, 1, 2, 1, 1, 2, 1, 2, 4, 1, 3, 5, 2, 5, 5, 3, 7, 7, 5, 8, 10, 7, 11, 13, 8, 16, 17, 12, 20, 20, 17, 26, 26, 22, 31, 34, 30, 40, 43, 37, 51, 54, 48, 64, 66, 62, 80, 83, 78, 98, 103, 98, 121, 128, 122, 150, 158, 149, 184, 193, 185, 226, 233, 228, 275, 285, 280
MAPLE公司
g: =proc(n)选项记忆;是(添加(i,i=位[分割](n))::偶数)结束:
b: =proc(n,i)选项记住`如果`(i*(i+1)/2<n,0,`如果`(n=0,1,
b(n,i-1)+`if`(g(i),b(n-i,min(n-i、i-1)),0))
结束时间:
a: =n->b(n$2):
黄体脂酮素
(PARI)seq(n)=Vec(prod(k=1,n,if(hammingweight(k)%2==0,1+x^k,1)+O(x*x^n))\\安德鲁·霍罗伊德,2018年6月22日
搜索在0.003秒内完成
|