A067557 Primes p such that p-5 == 0 (mod phi(p-5)).

7, 11, 13, 17, 23, 29, 37, 41, 53, 59, 101, 113, 149, 167, 197, 293, 389, 491, 653, 773, 977, 1301, 1733, 1949, 2053, 2309, 3461, 5189, 6917, 8753, 9221, 13127, 13829, 23333, 26249, 27653, 39371, 49157, 62213, 78737, 110597, 186629, 196613, 279941

Offset

1,1

Links

Amiram Eldar, Table of n, a(n) for n = 1..100

Mathematica

Select[Prime[Range[4, 25000]], Divisible[#-5, EulerPhi[#-5]]&] (* Harvey P. Dale, Jul 18 2012 *)

Crossrefs

Cf. A000010.

Sequence in context: A049481 A175412 A173700 * A103485 A191079 A279190

Adjacent sequences: A067554 A067555 A067556 * A067558 A067559 A067560

Keyword

easy,nonn

Author

Benoit Cloitre, Feb 22 2002

Status

approved