A004864 Numbers that are the sum of at most 2 positive 7th powers.
0, 1, 2, 128, 129, 256, 2187, 2188, 2315, 4374, 16384, 16385, 16512, 18571, 32768, 78125, 78126, 78253, 80312, 94509, 156250, 279936, 279937, 280064, 282123, 296320, 358061, 559872, 823543, 823544, 823671, 825730, 839927, 901668, 1103479, 1647086
Offset: 1
Keywords
Links
- Alois P. Heinz, Table of n, a(n) for n = 1..10000
Programs
-
Mathematica
With[{p7=Range[0,8]^7},Union[Join[p7,Total/@Tuples[p7,2]]]] (* Harvey P. Dale, Jul 22 2012 *)