login
A004856
Numbers that are the sum of at most 5 nonzero 6th powers.
1
0, 1, 2, 3, 4, 5, 64, 65, 66, 67, 68, 128, 129, 130, 131, 192, 193, 194, 256, 257, 320, 729, 730, 731, 732, 733, 793, 794, 795, 796, 857, 858, 859, 921, 922, 985, 1458, 1459, 1460, 1461, 1522, 1523, 1524, 1586, 1587, 1650, 2187, 2188, 2189, 2251, 2252, 2315
OFFSET
1,3
LINKS
MATHEMATICA
Reap[For[n = 0, n < 3000, n++, If[MatchQ[PowersRepresentations[n, 5, 6], {Table[_, 5], ___}], Print[n]; Sow[n]]]][[2, 1]] (* Jean-François Alcover, Oct 30 2017 *)
CROSSREFS
Sequence in context: A037330 A062939 A069881 * A325653 A037327 A075832
KEYWORD
nonn
EXTENSIONS
More terms from Alois P. Heinz, Sep 16 2016
STATUS
approved