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

 

标志
提示
(来自的问候整数序列在线百科全书!)
A130872号 将8n-1写成7个(不一定不同)奇数平方和的方法的数量。 1
1, 1, 1, 2, 2, 2, 4, 4, 3, 5, 5, 5, 7, 7, 6, 9, 10, 8, 11, 11, 10, 15, 14, 12, 16, 17, 15, 19, 19, 17, 22, 24, 20, 25, 27, 23, 30, 29, 26, 32, 34, 30, 36, 38, 33, 40, 43, 37, 44, 47, 41, 50, 52, 45, 53, 55, 50, 58, 62, 54, 63, 70, 59, 68, 71, 64, 75, 79, 70, 79, 85, 77, 85, 89, 81 (列表;图表;参考文献;;历史;文本;内部格式)
抵消
1,4
评论
由于所有奇数平方都与1模8同余,因此不可能将与7模8同余数表示为小于7个奇数平方的和。
链接
阿洛伊斯·海因茨,n=1..20000时的n,a(n)表
例子
a(2)=1,因为15=9+1+1+1+1+1是唯一这样的表示。
a(4)=2,因为31=25+1+1+1+1+1=9+9+9+1+1+1。
MAPLE公司
A130872复发:=proc(n,jmin,n)局部a,s;如果N=1,那么如果N mod 2=1,issqr(N)和N>=jmin^2,那么返回(1);否则返回(0);fi;否则a:=0;对于从2*层(jmin/2)+1到层(sqrt(n))乘2的s,执行a:=a+A130872递归(n-s^2,s,n-1);od;返回(a);fi;结束时间:A130872号:=proc(n)选项记住:A130872复发(8*n-1,1,7);结束:seq(A130872号(n) ,n=1..100)#R.J.马塔尔2007年8月2日
#第二个Maple项目:
b: =proc(n,i)选项记忆;转换(序列(`if`(n=0,1,`if`)(i<1,0,
展开(添加(b(n-i^2*j,i-2)*x^j,j=0..min(7,n/i^2))),x,8),多项式)
结束时间:
a: =n->系数(b(8*n-1,(t->`如果`(t::奇,t,t-1))(isqrt(8*n-1))),x,7):
seq(a(n),n=1..100)#阿洛伊斯·海因茨2024年1月27日
数学
a[n_]:=整数分区[8 n-1,{7},选择[Range[1,8 n-1,2],IntegerQ[Sqrt[#]]&]]//长度;
表[a[n],{n,1100}](*Jean-François Alcover公司2024年1月27日*)
交叉参考
关键词
非n
作者
乔尔·刘易斯2007年7月24日
扩展
更多术语来自R.J.马塔尔2007年8月2日
状态
已批准

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

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

上次修改时间:2024年4月27日21:44 EDT。包含372020个序列。(在oeis4上运行。)