|
|
|
|
|
|
|
|
|
#16个通过肖恩·欧文2021年7月31日星期六22:49:42 EDT |
|
|
|
|
|
|
|
#15通过肖恩·欧文2021年7月31日星期六22:45:14 EDT |
|
|
|
|
|
|
|
#14通过布鲁诺·贝塞利2013年7月31日星期三美国东部夏令时06:00:50 |
|
|
|
|
|
|
|
#13通过Jean-François Alcover公司2013年7月31日星期三05:13:59 EDT |
|
|
|
|
|
|
|
#12通过Jean-François Alcover公司2013年7月31日星期三05:13:53 EDT |
|
| 数学
|
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日*）
|
|
| 状态
|
经核准的
编辑
|
|
|
|
|
|
|
#11通过T.D.诺伊2013年1月10日星期四01:28:07 EST |
|
|
|
|
|
|
|
#10通过多诺万·约翰逊2013年1月9日星期三21:43:19 EST |
|
|
|
|
|
|
|
#9通过多诺万·约翰逊2013年1月9日星期三21:37:26 EST |
|
| 链接
|
Eric Weisstein的《数学世界》，<a href=“http://mathworld.wolfram.com/CubicNumber.html“>立方数</a>
Eric Weisstein的《数学世界》，<a href=“http://mathworld.wolfram.com/CubicNumber.html“>立方数</a>
|
|
|
|
|
|
|
#8通过多诺万·约翰逊2013年1月9日星期三21:36:45 EST |
|
| 评论
|
这个序列似乎有1141个术语，最后一个是26132个-多诺万·约翰逊2013年1月9日
|
|
| 链接
|
多诺万·约翰逊（Donovan Johnson），<a href=“/A048931美元/b048931.txt“>n表，n=1..1141时a（n）（术语<10^7）
|
|
| 黄体脂酮素
|
（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，next（2））；ct[s6]++））；n=0；对于（i=6，mx，if（ct[i]==3，n++；write（“b048931.txt”，n“”i））/*Donovan Johnson，2013年1月9日*/
|
|
| 状态
|
经核准的
编辑
|
|
|
|
|
|
|
#7通过R.J.马塔尔2013年1月8日星期二14:40:04 EST |
|
|
|
|
|
|
