A125262 Numbers n such that n^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,2

Links

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

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 *)

Prog

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

Crossrefs

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

Sequence in context: A126143 A145483 A349978 * A163754 A104278 A129070

Adjacent sequences: A125259 A125260 A125261 * A125263 A125264 A125265

Keyword

nonn

Author

Zak Seidov, Nov 26 2006

Status

approved