%I#36 2021年7月31日18:04:52

%S 6,21,36,51,66,81,86,96101116131146161166181196211226246，

%电话：261276291306321326336341356371386401406421436451466，

%电话：4865015165315465615765815966116266306416456661675676690

%N个数字是6个正四次幂的和。

%H David A.Corneth，n的表格，A（n）表示n=1..10000（T·D·Noe的前1000个术语）

%H Eric Weisstein的数学世界，<a href=“http://mathworld.wolfram.com/BiquadricNumber.html“>双二次数</a>

%e自David A.Corneth，2020年8月4日起：（开始）

%e 13090的顺序为13090=4^4+4^4+5^4+6^4+8^4+9^4。

%e 17539的顺序为17539=2^4+3^4+4^4+5^4+9^4+10^4。

%e 23732的顺序为23732=3^4+5^4+5 ^4+7 ^4+10 ^4+10^4。（结束）

%t选择[Range[1000]，AnyTrue[PowersRepresentations[#，6，4]，First[#]>0&]&]（*_Jean-François Alcover_，2017年7月18日*）

%o（Python）

%o从itertools导入组合_with_replacement为combs_with_rep

%o定义缺陷（极限）：

%o qd=[k**4对于范围（1，int（limit**.25）+2）中的k，如果k**4+5<=limit]

%o ss=集合（combs_with_rep（qd，6）中c的总和（c））

%o如果s<=限制，则返回已排序的（s代表ss中的s）

%o打印（aupto（700））#_Michael S.Branicky_，2021年6月21日

%Y参考A000583、A003329、A003339、A00.3341、A003351、A345559、A345813。

%K nonn，简单

%O 1,1号机组

%A _N.J.A.斯隆_