A125262 Numbers k such that k^7 + 6 is prime.

1, 13, 17, 23, 61, 73, 77, 101, 137, 215, 221, 283, 307, 317, 361, 431, 457, 473, 481, 641, 731, 767, 817, 881, 985, 1015, 1061, 1145, 1235, 1283, 1333, 1337, 1343, 1531, 1693, 1711, 1817, 1847, 1853, 1867, 1903, 1963, 2057, 2093, 2113, 2161, 2201, 2363

Offset: 1

Author

Zak Seidov, Nov 26 2006

Keywords

• nonn

Links

• Carmine Suriano, Table of n, a(n) for n = 1..2374

Crossrefs

Other sequences of the type "Numbers k such that k^j + j - 1 is prime": A000040 (j=1), A005574 (j=2), A067200 (j=3), A125259-A125265 (j=4..11).

Programs

Mathematica

lst={};k=7;Do[If[PrimeQ[n^k+k-1], AppendTo[lst, n]], {n, 0, 10^4}];lst (* Vladimir Joseph Stephan Orlovsky, Sep 10 2008 *)
Select[Range[2500],PrimeQ[#^7+6]&] (* Harvey P. Dale, May 05 2016 *)

PARI

is(n)=isprime(n^7+6) \\ Charles R Greathouse IV, Feb 17 2017