|
|
|
|
#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 |
|
|
|