A123035 Prime sums of 6 positive 5th powers.
37, 521, 1091, 1153, 1997, 2083, 2239, 3137, 3559, 4129, 4153, 4457, 4637, 5449, 6199, 7253, 8147, 8573, 9319, 9323, 10069, 10463, 11959, 14029, 15083, 15649, 16649, 16843, 16883, 17327, 17389, 17569, 17959, 18077, 18773, 18803, 19373, 20029
Offset: 1
Keywords
Examples
a(1) = 37 = 1^5 + 1^5 + 1^5 + 1^5 + 1^5 + 2^5. a(2) = 521 = 1^5 + 1^5 + 1^5 + 2^5 + 3^5 + 3^5. a(3) = 1091 = 1^5 + 1^5 + 1^5 + 2^5 + 2^5 + 4^5. a(4) = 1153 = 1^5 + 2^5 + 2^5 + 2^5 + 2^5 + 4^5.
Links
- Giovanni Resta, Table of n, a(n) for n = 1..10000
Programs
-
Mathematica
up = 10^6; q = Range[up^(1/5)]^5; a = {0}; Do[b = Select[ Union@ Flatten@Table[e + a, {e, q}], # <= up &]; a = b, {k, 6}]; Select[a, PrimeQ] (* Giovanni Resta, Jun 13 2016 *)
Extensions
More terms from Max Alekseyev, Sep 24 2011
Comments