登录
OEIS由支持OEIS基金会的许多慷慨捐赠者.

 

标志
提示
(来自的问候整数序列在线百科全书!)
A025428号 将n划分为4个非零正方形的分区数。 39
0, 0, 0, 0, 1, 0, 0, 1, 0, 0, 1, 0, 1, 1, 0, 1, 1, 0, 1, 1, 1, 1, 1, 1, 0, 1, 1, 1, 3, 0, 1, 2, 0, 1, 2, 1, 2, 2, 1, 2, 1, 0, 3, 2, 1, 2, 1, 2, 1, 2, 2, 1, 4, 1, 2, 3, 0, 2, 4, 1, 3, 2, 1, 4, 1, 1, 3, 3, 2, 2, 4, 2, 1, 3, 2, 3, 4, 2, 3, 3, 1, 2, 5, 2, 4, 3, 2, 4, 1, 1, 6, 4, 3, 4, 2, 3, 0, 4, 4, 3, 5, 1, 5, 5, 1, 4, 5, 2 (列表;图表;参考;;历史;文本;内部格式)
抵消
0,29
评论
记录发生在n=4、28、52、82、90、130、162、198、202、210-R.J.马塔尔2015年9月15日
链接
配方奶粉
对于n>0,a(n)=(A063730型(n) +6个*A213024型(n) +3个*A063725美元(无2)+8*A092573号(n) +6个*A010052号(n/4))/24-马克斯·阿列克塞耶夫2012年9月30日
a(n)=(A000118号(n) -4个*A005875号(n) -6个*2018年4月(n) -12岁*A000122号(n) -15*A000007美元(n) +12个*A014455号(n) -24岁*A033715号(n) -12岁*A000122号(无2)+12*2018年4月(无2)+32*A033716美元(n) -32岁*A000122号(n/3)+48*A000122号(n/4)/384-马克斯·阿列克塞耶夫2012年9月30日
a(n)=[x^ny^4]产品{k>=1}1/(1-y*x^(k^2))-伊利亚·古特科夫斯基2019年4月19日
a(n)=求和{k=1.floor(n/4)}求和{j=k.floor((n-k)/3)}A010052号(i)*A010052号(j)*A010052号(k)*A010052号(n-i-j-k)-韦斯利·伊万·赫特2019年4月19日
MAPLE公司
A025428号:=进程(n)
局部a、i、j、k、lsq;
a:=0;
因为我从一开始
如果4*i^2>n,则
返回a;
结束条件:;
对于来自i do的j
如果i^2+3*j^2>n,则
断裂;
结束条件:;
从j-do求k
如果i^2+j^2+2*k^2>n,那么
断裂;
结束条件:;
lsq:=n-i^2-j^2-k^2;
如果lsq>=k^2和issqr(lsq),则
a:=a+1;
结束条件:;
结束do:
结束do:
结束do:
结束进程:
序列(A025428号(n) ,n=1..40)#R.J.马塔尔,2018年6月15日
#第二个Maple项目:
b: =proc(n,i,t)选项记住`如果`(n=0,`如果`(t=0,1,0),
`如果`(i<1或t<1,0,b(n,i-1,t)+`如果`(i ^2>n,0,b(n-i ^2,i,t-1)))
结束时间:
a: =n->b(n,isqrt(n),4):
seq(a(n),n=0..100)#阿洛伊斯·海因茨2019年4月14日
数学
nn=100;lim=平方[nn];t=表[0,{nn}];做[n=a^2+b^2+c^2+d^2;如果[n<=nn,t[[n]]++],{a,lim},{b,a,lim},{c,b,lim},{d,c,lim{];t吨(*T.D.诺伊2012年9月28日*)
f[n_]:=长度@整数分区[n,{4},范围[楼层[Sqrt[n-1]]^2];阵列[f,105](*罗伯特·威尔逊v2012年9月28日*)
黄体脂酮素
(PARI)A025428号(n) =总和(a=1,n,总和(b=1,a,总和(c=1,b,总和(d=1,c,a^2+b^2+c^2+d^2==n))
(PARI)A025428号(n) =总和(a=1,平方(最大值(n-3,0)),总和(b=1,最小值(平方(n-a^2-2),a),总和
(PARI)A025428号(n) =sum(a=平方(max(n,4)\4),平方(max(n-3,0)),sum(b=平方((n-a^2)\3-1)+1,min(平方(n-a^2),a),sum(c=平方((t=n-a^2-b^2)\2-1)+1,min(平方(t-1),b),issquare(t-c^2)))\\-M.F.哈斯勒2012年9月17日
对于(n=1100,打印1(A025428号(n) ,“,”))
(PARI)T(n)={a=矩阵(n,4,i,j,0);对于(d=1,平方(n),对于步骤(i=n,d*d+1,-1,对于(j=2,4,a[i,j]+=总和(k=1,j,如果(k<j&&i-k*d*d>0,a[i-k*d,j-k],如果(k==j&i-k*d*d=0,1)));a[d*d,1]=1);对于=1,n,打印(i“”a[i,4])}/*罗伯特·格比茨2012年9月28日*/
交叉参考
囊性纤维变性。A000414号,A000534号,A025357号-A025375美元,A216374号,A025416号(贪婪的反面)。
第k列=第4列,共列A243148型.
关键字
非n,容易的
作者
扩展
双重检查(0..10^4)的值M.F.哈斯勒2012年9月17日
状态
经核准的

查找|欢迎光临|维基|注册|音乐|地块2|演示|索引|浏览|更多|网络摄像头
贡献新的seq。或评论|格式|样式表|变换|超级搜索|最近
OEIS社区|维护人OEIS基金会。

许可协议、使用条款、隐私政策。.

上次修改时间:2024年4月23日12:08 EDT。包含371912个序列。(在oeis4上运行。)