年度呼吁：请向OEIS基金会捐款支持OEIS的持续开发和维护。现在是我们的第61年，我们有超过378000个序列，我们已经被引用了11000次（通常说“多亏了OEIS才被发现”）。
检验过的
经核准的
提出
编辑
M=40000；（*获得术语<=M*）
R={}；
对于[a=1，a<=楼层[M^（1/3）]，a++，
Bs=选择[Divisors[a^3]，#^3+a^3<=M&&Mod[#^3，a]==0&]；
R=联合[R，a^3+#^3&/@Bs]]；
排序[R](*Jean-François Alcover公司2022年1月1日之后罗伯特·伊斯雷尔*)
形式为a^3+b^3的数字，其中a除以b^3，b除以a^3-罗伯特·伊斯雷尔2020年11月1日
Robert Israel，<a href=“/A337529型/b337529.txt“>n，a（n）表，n=1..10000</a>
N： =50000:#以获得术语<=N
R： =空：
对于从1到地板（N^（1/3））的情况
Bs:=选择（b->b^3+a^3<=N和b^3 mod a=0，数论：-除数（a^3））；
R： =R联合映射（b->a^3+b^3，Bs）；
日期：
排序（转换（R，列表））#罗伯特·伊斯雷尔2020年11月1日
囊性纤维变性。A094147号(总和 总和 两个平方因子）。
