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

 


A025411号
4个不同正数立方体的总和。
100, 161, 198, 217, 224, 252, 289, 308, 315, 350, 369, 376, 379, 406, 413, 416, 432, 435, 442, 477, 496, 503, 533, 540, 548, 559, 568, 585, 587, 594, 604, 611, 624, 631, 646, 650, 665, 672, 685, 692, 702, 709, 711, 728, 737, 748, 756, 763, 765, 793, 800, 802, 819, 821, 828, 854, 861, 863, 864, 880, 882, 883, 889, 890, 917, 919, 920, 926, 927, 945, 946, 954, 973, 980, 981, 988, 1007, 1010, 1017, 1036
抵消
1,1
评论
第一个不同于A025408号在a(80)=1036处-雷·钱德勒2005年2月19日
例子
a(80)=1036=1+8+27+1000=27+64+216+729。
MAPLE公司
isA025411:=进程(n)
局部a、x、y、z、wcu;
对于x从1 do
如果4*x^3>n,则
返回false;
结束条件:;
对于x+1 do中的y
如果x^3+3*y^3>n,则
断裂;
结束条件:;
从y+1到z do
如果x^3+y^3+2*z^3>n,则
断裂;
结束条件:;
wcu:=n-x^3-y^3-z^3;
如果wcu>z^3且为A000578(wcu),则
返回true;
结束条件:;
结束do
结束do:
结束do:
结束进程:
n从1到1100 do
如果是A025411(n),则
printf(“%d,”,n);
结束条件:;
结束do:#R.J.马塔尔,2018年6月15日
数学
smax=1036;
imax=smax^(1/3)//天花板;
表[If[Less[i,j,k,l]&&(s=i^3+j^3+k^3+l^3)<=smax,s,Nothing](*Jean-François Alcover公司2023年6月26日*)
关键字
非n
扩展
更多术语来自雷·钱德勒2005年2月19日
状态
经核准的

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

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

上次修改时间:美国东部夏令时2024年9月21日08:46。包含376084个序列。(在oeis4上运行。)