Location via proxy:   [ UP ]  
[Report a bug]   [Manage cookies]                
A004875
Numbers that are the sum of at most 2 nonzero 8th powers.
2
0, 1, 2, 256, 257, 512, 6561, 6562, 6817, 13122, 65536, 65537, 65792, 72097, 131072, 390625, 390626, 390881, 397186, 456161, 781250, 1679616, 1679617, 1679872, 1686177, 1745152, 2070241, 3359232, 5764801, 5764802, 5765057, 5771362, 5830337
OFFSET
1,3
LINKS
PROG
(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
(PARI) T=thueinit('z^8+1, 1);
is(n)=#thue(T, n)>0 \\ Charles R Greathouse IV, Aug 23 2017
CROSSREFS
Sequence in context: A070782 A370965 A078167 * A067480 A062077 A190539
KEYWORD
nonn
STATUS
approved