|
%I #17 Aug 23 2017 16:14:51
%S 0,1,2,256,257,512,6561,6562,6817,13122,65536,65537,65792,72097,
%T 131072,390625,390626,390881,397186,456161,781250,1679616,1679617,
%U 1679872,1686177,1745152,2070241,3359232,5764801,5764802,5765057,5771362,5830337
%N Numbers that are the sum of at most 2 nonzero 8th powers.
%H Alois P. Heinz, <a href="/A004875/b004875.txt">Table of n, a(n) for n = 1..10000</a>
%o (PARI) list(lim)=my(v=List(),x8); for(x=0,sqrtnint(lim\=1,8), x8=x^8; for(y=0,min(sqrtnint(lim-x8,8),x), listput(v, x8+y^8))); Set(v) \\ _Charles R Greathouse IV_, Aug 22 2017
%o (PARI) T=thueinit('z^8+1,1);
%o is(n)=#thue(T,n)>0 \\ _Charles R Greathouse IV_, Aug 23 2017
%K nonn
%O 1,3
%A _N. J. A. Sloane_
|
