A092050 Numbers n such that prime(n) == -8 (mod n).

1, 63, 435, 100347, 100353, 100359, 637335, 129992911, 129993001, 129993007, 129993171, 8179002121, 8179002123, 8179002177, 382465573539

Offset

1,2

Comments

No more terms < 2*10^12. - David Wasserman, Jun 09 2005

Links

Table of n, a(n) for n=1..15.

Mathematica

NextPrim[n_] := Block[{k = n + 1}, While[ !PrimeQ[k], k++ ]; k]; p = 1; Do[ If[ Mod[p = NextPrim[p], n] == n - 8, Print[n]], {n, 1, 10^9}]

Crossrefs

Cf. A023150, A045924, A092044, A092045, A092046, A092047, A092048, A092049, A092051, A092052.

Sequence in context: A131993 A251019 A251012 * A055817 A075934 A075939

Adjacent sequences: A092047 A092048 A092049 * A092051 A092052 A092053

Keyword

nonn

Author

Robert G. Wilson v, Feb 18 2004

Extensions

Corrected by Mohammed Bouayoun (bouyao(AT)wanadoo.fr), Feb 20 2004

More terms from David Wasserman, Jun 09 2005

Status

approved