%I#25 2020年8月3日08:52:10
%第212925621882315437416385165121857132768781267825380312页,
%电话:9450915625027993728006428212329632035861559872823544823671,
%电话:825730839927901678110347916470862097153209728020993392113536
%N是2个正七次幂之和的数字。
%H Robert Israel,n的表,a(n)表示n=1..10000</a>
%e自David A.Corneth,2020年8月3日起:(开始)
%e 3909794986386的顺序为3909794886=57^7+57^7。
%e 6061605477062的顺序为60616054 77062=19^7+67^7。
%e 26019535290982的顺序为26019535290982=61^7+81^7。(结束)
%p N:=10^7:#获取所有术语<=N
%p S:=选择(`<=`,{seq(seq(a^7+b^7,a=1..b),b=1..楼层(N^(1/7)))},N):
%p排序(转换(S,列表));#_罗伯特·伊斯雷尔,2017年9月3日
%t lst={};做[如果[(a^7+b^7)==n,附加到[lst,n]],{n,200000},{a,(n/2)^(1/7)},};第一次(2017年9月3日*徐平雅)
%t模块[{upto=10},选择[Union[Total/@Tuples[Range[upto]^7,2],#<=(upto^7)&]](*_哈维P.Dale_,2019年2月4日*)
%Y参见A000404(2个正方形)、A003325(2个立方体)、A00.3336(2个四分之一)、A0003347(2个五分之一),A003358(2个六分之一)和A088719(2个七分之一)以及A003380(2个八分之一)。
%Y参见A001015(七次方)。
%K nonn,简单
%O 1,1号机组
%A _N.J.A.斯隆_