登录
A053603号
将n写成两个非零三角形数的有序和的方法的数目。
14
0, 0, 1, 0, 2, 0, 1, 2, 0, 2, 0, 2, 1, 2, 0, 0, 4, 0, 2, 0, 1, 2, 2, 0, 2, 2, 0, 2, 0, 2, 1, 4, 0, 0, 2, 0, 2, 2, 2, 2, 0, 0, 3, 2, 0, 0, 4, 0, 2, 2, 0, 4, 0, 0, 0, 2, 3, 2, 2, 0, 2, 2, 0, 0, 2, 2, 2, 2, 0, 2, 2, 0, 3, 2, 0, 0, 4, 0, 0, 2, 0, 6, 0, 2, 2, 0, 0, 2, 2, 0, 1, 2, 2
抵消
0,5
评论
一个(A051611号(n) )=0;A051533号(a(n))>0。 -莱因哈德·祖姆凯勒2013年6月27日
链接
莱因哈德·祖姆凯勒(Reinhard Zumkeller),n=0..10000时的n,a(n)表
公式
通用公式:(和{k>=1}x ^(k*(k+1)/2))^2。 -伊利亚·古特科夫斯基2016年12月24日
a(n)=和{k=1..n-1}c(k)*c(n-k),其中c(n)=A010054号(n) ●●●●。 -韦斯利·伊万·赫特2024年1月6日
数学
nmax=100;m0=10;A053603号:=表[a[n],{n,0,nmax}];清除[计数];计数[m]:=计数[m]=(清除[a];a[_]=0;执行[k=i*(i+1)/2+j*(j+1)/2;a[k]=a[k]+1,{i,1,m},{j,1,m}];A053603号);计数[m=m0];计数[m=2*m];虽然[counts[m]!=计数[m/2],m=2*m];A053603号(*Jean-François Alcover公司2013年9月5日*)
黄体脂酮素
(哈斯克尔)
a053603 n=总和$map(a010054.(n-))$
takeWhile(<n)$tail a000217_list
--莱因哈德·祖姆凯勒2013年6月27日
(PARI)
istriang(n)={n>0&&平方(8*n+1);}
a(n)={my(t=1,ct=0,j=1);而(t<n,ct+=istriang(n-t);j+=1;t+=j;);ct;}
\\约尔格·阿恩特2013年9月5日
关键词
非n
作者
N.J.A.斯隆2000年1月20日
状态
经核准的