A125260 Numbers k such that k^5 + 4 is prime.
1, 7, 9, 25, 39, 45, 73, 85, 99, 147, 163, 165, 169, 189, 213, 219, 223, 225, 249, 253, 259, 279, 333, 337, 385, 433, 457, 465, 469, 477, 499, 595, 639, 643, 655, 703, 709, 715, 729, 849, 853, 895, 969, 973, 979, 987, 1065, 1075, 1077, 1093, 1165, 1239, 1255
Offset: 1
Keywords
Links
- Carmine Suriano, Table of n, a(n) for n = 1..4431
Crossrefs
Programs
-
Mathematica
lst={};k=5;Do[If[PrimeQ[n^k+k-1], AppendTo[lst, n]], {n, 10^3}];lst (* Vladimir Joseph Stephan Orlovsky, Sep 10 2008 *) Select[Range[1300],PrimeQ[#^5+4]&] (* Harvey P. Dale, Oct 14 2019 *)
-
PARI
is(n)=isprime(n^5+4) \\ Charles R Greathouse IV, Feb 17 2017