A100272 Primes of the form a^5 + b^2 with a>0.

2, 5, 17, 37, 41, 101, 113, 197, 257, 307, 401, 439, 499, 577, 643, 677, 727, 761, 919, 1033, 1049, 1193, 1249, 1297, 1399, 1553, 1601, 1753, 2113, 2179, 2393, 2633, 2917, 3049, 3137, 3449, 3607, 3701, 3833, 4001, 4049, 4273, 4339, 4357, 4421, 4793, 4889

Offset: 1

Author

T. D. Noe, Nov 18 2004

Keywords

• nonn

Links

• Vincenzo Librandi, Table of n, a(n) for n = 1..1000

Crossrefs

Cf. A100292 (numbers of the form a^5 + b^2).

Programs

Mathematica

lst={}; Do[p=a^5+b^2; If[p<10000&&PrimeQ[p], AppendTo[lst, p]], {a, 16}, {b, 1024}]; Union[lst]