登录
OEIS由支持OEIS基金会的许多慷慨捐赠者.

 

徽标
提示
(来自的问候整数序列在线百科全书!)
A346137型 数字k,使k^3=x^3+y^3+z^3,x>y>z>=0,至少有2个不同的解。 1
18, 36, 41, 46, 54, 58, 60, 72, 75, 76, 81, 82, 84, 87, 88, 90, 92, 96, 100, 108, 114, 116, 120, 123, 126, 132, 134, 138, 140, 142, 144, 145, 150, 152, 156, 159, 160, 162, 164, 168, 170, 171, 174, 176, 178, 180, 184, 185, 186, 189, 190, 192, 198, 200, 201, 202, 203 (列表;图表;参考;;历史;文本;内部格式)
抵消
1,1
评论
这个序列是基于n=3的费马最后一个定理的推广,其中添加了三个项。费马定理指出,不存在只有两个项的解,这个序列表明,如果允许三个项,那么有许多整数存在多个解。该序列还与出租车号码相关。
链接
例子
41在序列中,因为41^3=33^3+32^3+6^3=40^3+17^3+2^3。
数学
q[k_]:=计数[IntegerPartitions[k^3,{3},Range[0,k-1]^3],_?(匿名Q@@#&)]>1;选择[范围[200],q](*阿米拉姆·埃尔达尔,2021年9月3日*)
黄体脂酮素
(Python)
从itertools导入组合
从集合导入计数器
从sympy导入integer_ntroot
定义icuberoot(n):返回integer_ntroot(n,3)[0]
定义缺陷(kmax):
立方体=[i**3表示范围内的i(kmax+1)]
cands,cubesset=(组合中c的总和(c)(立方,3)),集(立方)
c=计数器(s,单位为坎迪斯,如果s在立方体中)
如果c[s]>=2,则返回排序的(c中s的icuberoot)
打印(aupto(203))#迈克尔·布拉尼基2021年9月4日
交叉参考
的后续A023042号.
囊性纤维变性。A001235号,A346071型.
关键字
非n
作者
塞巴斯蒂安·马吉2021年7月30日
状态
经核准的

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

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

上次修改时间:2024年4月23日08:11 EDT。包含371905个序列。(在oeis4上运行。)