OEIS哀悼西蒙斯并感谢西蒙斯基金会对包括OEIS在内的许多科学分支研究的支持。
登录
OEIS由OEIS基金会的许多慷慨捐助者.

 

标志
提示
(来自的问候整数序列在线百科全书!)
A096436号 a(n)=求和到n所需的平方素数和1的个数。 4
1, 2, 3, 1, 2, 3, 4, 2, 1, 2, 3, 3, 2, 3, 4, 4, 3, 2, 3, 4, 4, 3, 4, 5, 1, 2, 3, 4, 2, 3, 4, 5, 3, 2, 3, 4, 4, 3, 4, 5, 5, 4, 3, 4, 5, 5, 4, 5, 1, 2, 3, 4, 2, 3, 4, 5, 3, 2, 3, 4, 4, 3, 4, 5, 5, 4, 3, 4, 5, 5, 4, 5, 6, 2, 3, 4, 5, 3, 4, 5, 6, 4, 3, 4, 5, 5, 4, 5, 6, 6, 5, 4, 5, 6, 6, 5, 6, 2, 3, 4, 5, 3, 4, 5, 6 (列表图表参考历史文本内部格式)
抵消
1,2
评论
a(n)在n=1,2,3,7,24,73266795处有一个新的最大值。
我怀疑a(n)<=9代表所有n-罗伯特·威尔逊v2004年9月18日
链接
尼古拉斯·马特奥,n=1..10000时的n,a(n)表
例子
a(5)=2,因为5=4+1。
a(17)=3,因为17=9+4+4。
一个数可能有许多这样的和:27=25+1+1=9+9+9,50=25+25=49+1。
数学
f[n_]:=块[{d=n,k=PrimePi[Sqrt[n]],sp={}},而[d>3,而[p=Prime[k];d>=p^2,附加到[sp,p];d=d-p^2];k--];当[d!=0时,追加到[sp,1];d=d-1];如果[Position[sp,3]!={}&&sp[[-3]]==1,sp=删除[Drop[sp,-3],Position[sp,3][[1]]];附加到[sp,{2,2,2}]];反转[Sort[Flatten[sp]]];表[长度[f[n]],{n,105}](*罗伯特·威尔逊v2004年9月20日*)
交叉参考
关键词
非n,容易的
作者
Tom Raes(tommy1729(AT)hotmail.com),2004年8月10日
扩展
编辑和扩展人罗伯特·威尔逊v2004年9月18日
编辑人唐·雷布尔2006年4月23日
状态
经核准的

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

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

上次修改时间:美国东部夏令时2024年6月15日01:31。包含373402个序列。(在oeis4上运行。)