|
|
A051302号 |
| 其平方可以用多种方式表示为两个正立方体之和的数字。 |
|
6
|
|
|
77976, 223587, 623808, 894348, 1788696, 2105352, 2989441, 4298427, 4672423, 4990464, 5986575, 6036849, 7154784, 8437832, 9747000, 14309568, 16842816, 23915528, 24147396, 24770529, 26745768, 27948375, 34387416, 34634719, 36570744, 37379384, 39923712, 47892600
(列表;图表;参考;听;历史;文本;内部格式)
|
|
|
抵消
|
1,1
|
|
评论
|
通过a(64)=306761364观察到的术语:所有术语都是7^2、13^2和/或19^2的倍数。除了2、3、5和11之外,它们唯一的素因子是7、13、19、31、43、61、67、79、127、151和181(每个因子都超过6乘以1的倍数)。无是立方体或更高的幂;正方形的是a(7)、a(12)、a、a(17)、a-乔恩·肖恩菲尔德2006年10月8日
a(64)以外的许多术语具有除a(1)到a(64;然而,通过a(774)的每个项至多有一个不同的素因子p>5,该因子不超过6乘以1的倍数,如果存在这样的素因子,则p的重数m=3,只有少数例外:n=651和n=713(其中p^m是11^2),n=346和n=770(其中p*m是17^2)、n=699和n=740(其中p*m是23^2),n=741(其中p^m为11^6)-乔恩·肖恩菲尔德2013年10月20日
第一个不同于A145553号在A051302号(172)=3343221000,其中3343221000^2=279300^3+2234400^3=790020^3+2202480^3=1256850^3+2094750^3。
这个序列是无限的。如果n是这个序列的成员,那么n^2=a^3+b^3=c^3+d^3,其中(a,b)和(c,d)是不同的对。如果n^2=a^3+b^3=c^3+d^3,则(n*k^3)^2=n^2*k^6=k^6*(a^3+b^3)=k^6*。很明显,如果(a,b)和(c,d)是不同的,那么(k^2*a,k^2*b),(k^2*c,k^2*d)对于k的所有非零值也是不同的。因此,如果n在这个序列中,那么n*k^3对于所有k>0都在这个序列里-阿尔图格·阿尔坎2016年5月10日
|
|
链接
|
|
|
例子
|
2989441^2=1729^3+20748^3=15561^3+17290^3,因此2989441在序列中。
|
|
数学
|
(*警告:此脚本只是对原始b文件中64个术语的重新计算乔恩·肖恩菲尔德,不应用于扩展数据。*)
最大值=310000000;cubeFreeParts={361、8281、33124、159201、169309、221725、565068、628849、917427、1054729、2370963、2989441、4672423、8968323、9402967、9795747、34634719};
r[x_]:=减少[0<y<=z&&x^2==y^3+z^3,{y,z},整数];
okQ[primes_]:=交集[{2,3,5,7,11,13,19,31,43,61,67,79,127,139,151,181},primes]==素数;
作物[n_]:=收获[For[m=1,True,m++,x=n*m^3;If[x>max,Break[]];如果[okQ[FactorInteger[x][[All,1]]],如果[Head[rx=r[x]]===或,打印[“x=”,x,“”,rx];母猪[x]];]]][[2, 1]];
|
|
黄体脂酮素
|
(PARI)T=thueinit('x^3+1,1);
是(n)=我的(v=thue(T,n^2));总和(i=1,#v,v[i][1]>=0&&v[i][2]>=v[i[1])>1\\查尔斯·格里特豪斯四世2016年5月10日
|
|
交叉参考
|
|
|
关键词
|
非n,美好的
|
|
作者
|
|
|
扩展
|
|
|
状态
|
经核准的
|
|
|
|