login
A125263
Numbers k such that k^8 + 7 is prime.
7
0, 2, 4, 10, 66, 68, 86, 88, 134, 146, 200, 216, 250, 276, 306, 310, 410, 422, 472, 492, 506, 516, 538, 548, 550, 594, 638, 716, 746, 758, 862, 888, 942, 954, 964, 982, 992, 998, 1000, 1016, 1020, 1034, 1108, 1164, 1192, 1234, 1338, 1342, 1350, 1374, 1390
OFFSET
1,2
LINKS
MATHEMATICA
lst={}; k=8; Do[If[PrimeQ[n^k+k-1], AppendTo[lst, n]], {n, 0, 10^4}]; lst (* Vladimir Joseph Stephan Orlovsky, Sep 10 2008 *)
Select[Range[0, 1500], PrimeQ[#^8+7]&] (* Harvey P. Dale, Sep 04 2024 *)
PROG
(PARI) is(n)=isprime(n^8+7) \\ Charles R Greathouse IV, Feb 17 2017
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 (j=4), A125260 (j=5), A125261 (j=6), A125262 (j=7), this sequence (j=8), A125264 (j=10), A125265 (j=11)...
Sequence in context: A326325 A080090 A381412 * A326949 A215439 A120402
KEYWORD
nonn
AUTHOR
Zak Seidov, Nov 26 2006
STATUS
approved