A216976 Numbers k such that k^5+2 is prime.

0, 1, 9, 11, 15, 27, 39, 51, 57, 105, 149, 179, 197, 219, 225, 231, 275, 281, 285, 299, 315, 317, 321, 335, 369, 389, 401, 405, 411, 419, 425, 491, 509, 545, 561, 587, 725, 741, 779, 789, 819, 855, 879, 909, 915, 977, 1007, 1019, 1059, 1115, 1145, 1161, 1199

Offset

1,3

Links

Robert Israel, Table of n, a(n) for n = 1..10000

Maple

select(t->isprime(t^5+2), [$0..10000]); # Robert Israel, Jan 01 2021

Mathematica

lst={}; Do[If[PrimeQ[n^5+2], AppendTo[lst, n]], {n, 0, 10^3}]; lst
Select[Range[0, 1200], PrimeQ[#^5+2]&] (* Harvey P. Dale, Jan 30 2025 *)

Prog

(PARI) select(n->isprime(n^5+2), vector(2000, n, n-1)) /* Joerg Arndt, Sep 21 2012 */

Crossrefs

Cf. A067200, A067201.

Sequence in context: A027694 A063191 A329167 * A236390 A048464 A075824

Adjacent sequences: A216973 A216974 A216975 * A216977 A216978 A216979

Keyword

nonn,changed

Author

Michel Lagneau, Sep 21 2012

Status

approved