OEIS哀悼西蒙斯感谢西蒙斯基金会支持包括OEIS在内的许多科学分支的研究。
登录
OEIS由OEIS基金会的许多慷慨捐赠者.

 

标志
提示
(来自的问候整数序列在线百科全书!)
A186885号 其平方是两个不同正数立方体的平均数的数字。
6, 42, 48, 78, 147, 162, 196, 336, 384, 456, 624, 722, 750, 1050, 1134, 1176, 1296, 1342, 1568, 1573, 1674, 1694, 2028, 2058, 2106, 2366, 2387, 2450, 2522, 2646, 2688, 2899, 3072, 3087, 3211, 3648, 3698, 3969, 4374, 4992, 5250, 5292, 5550, 5776, 5915, 6000 (列表图表参考历史文本内部格式)
抵消
1,1
评论
如果m在这个序列中,那么对于所有k>=1,m*k^3也是如此:例如,m=6和6000=m*10^3都在这个序列中。此外,这个序列中没有素数。
该表给出了所有396个三元组(n,a,b),其中n^2=(a^3+b^3)/2和n<5*10^5。
a和b的奇偶校验相等:a==b(mod 2)-大卫·A·科内斯2018年10月13日
交叉点的平方根A000290型A268319型. -安蒂·卡图恩2019年1月15日
链接
配方奶粉
n^2是两个立方体的平均值:n^2=(a^3+b^3)/2,0<a<b。
例子
6^2 = (2^3 + 4^3)/2;
42^2 = (11^3 + 13^3)/2;
147^2 = (7^3 + 35^3)/2.
数学
nn=13552;lim=地板[(2 nn^2)^(1/3)];排序[Reap[Do[num=(a^3+b^3)/2;If[IntegerQ[num]&&num<=nn^2&&IntegerQ[Sqrt[num]],Sow[Sqrt[num4]],{a,lim},{b,a-1}][[2,1]]
(*第二个节目:*)
Sqrt[#]&/@Select[Mean/@Subsets[Range[500]^3,{2}],IntegerQ[Sqrt[#]]&]//并集(*哈维·P·戴尔2018年10月13日*)
上限[m_]:=模[{res={},n=m*m,i,j,k},对于[i=1,i<=Floor[商[n,2]^(1/3)],i++,对于[j=i+2,j<=Floor[(n-i^3)^(1/3)],j+=2,如果[IntegerQ[k=Sqrt[(i^3+j^3)/2]],AppendTo[res,k]];排序[res]];20000以下(*Jean-François Alcover公司2019年1月17日之后大卫·A·科内斯*)
黄体脂酮素
(PARI)小于等于(n)={my(res=List(),k);n*=n;对于(i=1,sqrtnint(n\2,3)),对于步骤(j=i+2,squartnitt(n-i^3,3),2,如果(issquare((i^3+j^3)/2,&k),
列表(res,k));列表排序(res);资源}\\大卫·A·科内斯2018年11月25日
交叉参考
囊性纤维变性。A000290型,A000578号,1968年2月19日.
另请参阅A273822型.
关键词
非n
作者
扎克·塞多夫2011年2月28日
扩展
编辑人M.F.哈斯勒2018年12月10日
状态
经核准的

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

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

上次修改时间:2024年6月5日08:55 EDT。包含373105个序列。(在oeis4上运行。)