搜索: 编号:a000164
|
|
|
|
1, 1, 1, 1, 1, 1, 1, 0, 1, 2, 1, 1, 1, 1, 1, 0, 1, 2, 2, 1, 1, 1, 1, 0, 1, 2, 2, 2, 0, 2, 1, 0, 1, 2, 2, 1, 2, 1, 2, 0, 1, 3, 1, 1, 1, 2, 1, 0, 1, 2, 3, 2, 1, 2, 3, 0, 1, 2, 1, 2, 0, 2, 2, 0, 1, 3, 3, 1, 2, 2, 1, 0, 2, 2, 3, 2, 1, 2, 1, 0, 1, 4, 2, 2, 1, 2, 3, 0, 1, 4, 3, 1, 0, 1, 2, 0, 1, 2, 3, 3, 2, 4, 2, 0, 2
(列表;图表;参考;听;历史;文本;内部格式)
|
|
|
抵消
|
0,10
|
|
评论
|
a(n)=整数[i,j,k]的三元组数,其中i>=j>=k>=0,n=i^2+j^2+k^2-迈克尔·索莫斯2012年6月5日
|
|
参考文献
|
E.Grosswald,整数表示为平方和。Springer-Verlag,纽约州,1985年,第84页。
|
|
链接
|
|
|
配方奶粉
|
设e(n,r,s,m)是n的r(mod m)除数超过s(mod m)除数的部分,如果n是一个完全平方,则delta(n)=1,否则为0。然后,如果我们定义α(n)=5*delta(n)+3*delta(n/2)+4*delta(n/3),β(n)=4*e(n,1,3,4)+3*e(n,1,7,8)+3*e(n,3,5,8),γ(n)=2*Sum_{1<=k^2<n}e(n-k^2,1,3,4),则得出a(n)=(1/12)*(α(n)+β(n)+γ(n))-蚂蚁王2010年10月15日
|
|
例子
|
G.f.=1+x+x^2+x^3+x^4+x^5+x^6+x^8+2*x^9+x^10+x^11+x^12+x^13+。。。
|
|
枫木
|
局部a,x,y,z2,z;
a:=0;
对于0中的x do
如果3*x^2>n,则
返回a;
结束条件:;
对于x do中的y
如果x^2+2*y^2>n,则
断裂;
结束条件:;
z2:=n-x^2-y^2;
如果issqr(z2),则
z:=sqrt(z2);
如果z>=y,则
a:=a+1;
结束条件:;
结束条件:;
结束do:
结束do:
a;
|
|
数学
|
长度[PowersRepresentations[#,3,2]]和/@范围[0,104]
e[0,r,s,m]=0;e[n_,r_,s_,m_]:=长度[Select[Divisors[n],Mod[#,m]==r&]]-长度[Select[Divisors[n]、Mod[#,m]==s&]];α[n]:=5delta[n]+3delta[1/2 n]+4delta[1/3n];β[n]:=4e[n,1,3,4]+3e[n、1,7,8]+3e[n,3,5,8];δ[n_]:=如果[IntegerQ[Sqrt[n]],1,0];f[n_]:=表[n-k^2,{k,1,楼层[Sqrt[n]]}];伽马[n_]:=2加@@(e[#,1,3,4]和/@f[n]);p3[n]:=1/12(α[n]+β[n]+gamma[n]);p3[#]和/@范围[0,104]
a[n_]:=如果[n<0,0,和[Boole[n==i^2+j^2+k^2],{i,0,Sqrt[n]},{j,0,i},},[k,0,j}]];(*迈克尔·索莫斯2015年8月15日*)
|
|
黄体脂酮素
|
(PARI){a(n)=如果(n<0,0,和(i=0,平方(n),和(j=0,i,和(k=0,j,n==i^2+j^2+k^2)))}/*迈克尔·索莫斯2012年6月5日*/
(Python)导入集合;a=集合。计数器(i*i+j*j+k*k代表范围(100)内的i,j代表范围(i+1)内的j,k代表范围内的k(j+1))#大卫·拉德克利夫2019年4月15日
|
|
交叉参考
|
|
|
关键词
|
非n
|
|
作者
|
|
|
扩展
|
|
|
状态
|
经核准的
|
|
|
搜索在0.010秒内完成
|