A242177 - OEIS

A242177

Numbers k such that k*7^k + 1 is prime.

34, 1980, 9898

(list; graph; refs; listen; history; text; internal format)

OFFSET

1,1

LINKS

MATHEMATICA

Select[Range[3500], PrimeQ[# 7^# + 1] &]

PROG

(Magma) [n: n in [0..3500] | IsPrime(n*7^n+1)];

(PARI) is(n)=ispseudoprime(n*7^n+1) \\ Charles R Greathouse IV, May 22 2017

CROSSREFS

Cf. similar sequences listed in A242176.

KEYWORD

nonn,more,bref

AUTHOR

EXTENSIONS

a(3) from Loeh's list (see Links) - Bruno Berselli, May 08 2014

STATUS

approved