|
| |
|
| A048931号 |
| 数字是6个正立方的总和，有3种方式。 |
|
9
|
|
|
|
221, 254, 369, 411, 443, 469, 495, 502, 576, 595, 600, 648, 658, 684, 704, 711, 720, 739, 746, 753, 760, 765, 767, 772, 774, 779, 786, 793, 811, 818, 828, 835, 844, 854, 863, 866, 874, 880, 884, 886, 892, 893, 899, 905, 910, 919, 928, 929, 935, 936, 937
(列表;图表;参考;听;历史;文本;内部格式)
|
|
|
|
抵消
|
1,1
|
|
|
评论
|
这个序列似乎有1141个术语，最后一个是26132个-多诺万·约翰逊2013年1月9日
|
|
|
链接
|
Eric Weistein的《数学世界》，立方数。
|
|
|
例子
|
由于221=216+1+1+1+1+1=125+64+8+8+8=64+64+64+27+1+1，因此221处于序列中
|
|
|
数学
|
Reap[对于[n=1，n<=1000，n++，pr=Select[PowersRepresentations[n，6，3]，Times@@#！=0 &]; 如果[pr！={}&&Length[pr]==3，打印[n，pr]；母猪[n]]][[2,1]](*Jean-François Alcover公司2013年7月31日*）
|
|
|
黄体脂酮素
|
（PARI）mx=10^6；ct=矢量（mx）；cb=矢量（99）；对于（i=1,99，cb[i]=i^3）；对于（i1=1,99，s1=cb[i1]；对于（i2=i1,99，s2=s1+cb[i2]；如果（s2+4*cb[i2]>mx，接下来是（2））；对于（i3=i2，99，s3=s2+cb[i3]；如果（s3+3*cb[i3]>mx，则下一个（2））；对于（i4=i3,99，s4=s3+cb[i4]；如果（s4+2*cb[i4]>mx，下一个（2））；对于（i5=i4，99，s5=s4+cb[i5]；如果（s5+cb[15]>mx，则下一个（2））；对于（i6=i5，99，s6=s5+cb[i6]；如果（s6>mx，接下来（2））；ct[s6]++））；n=0；对于（i=6，mx，if（ct[i]==3，n++；write（“b048931.txt”，n“”i））/*Donovan Johnson，2013年1月9日*/
|
|
|
交叉参考
|
|
|
|
关键词
|
非n
|
|
|
作者
|
|
|
|
扩展
|
由Larry Reeves（larryr（AT）acm.org）于2000年10月2日修订和扩展
|
|
|
状态
|
经核准的
|
| |
|
|
